Source position: extdlgs.pas line 151
protected procedure TCalculatorDialog.OnDialogClose(
Sender: TObject;
var CloseAction: TCloseAction
);