Source position: extdlgs.pas line 157
protected procedure TCalculatorDialog.OnDialogCloseQuery(
Sender: TObject;
var CanClose: Boolean
);