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