Source position: ubitmapper.pas line 35
procedure TfrmBitMapper.FormCloseQuery(
Sender: TObject;
var CanClose: Boolean
);