Du hast doch den
VCL-Quellcode, warum dann nicht selber nachsehen?
OnCloseQuery kennst du und kannst danach suchen.
Es findet sich das CloseQuery.
Nun könnte man nach dem CloseQuery suchen und schauen wo es aufgerufen wird.
Das ist eine Menge und nicht Alle kommen direkt über eine Windowsmessage, welche man eventuell alle abfangen müsste.
Also bleibt nur CloseQuery.
Delphi-Quellcode:
function CloseQuery: Boolean; virtual;
function TCustomForm.CloseQuery: Boolean;
var
I: Integer;
begin
if FormStyle = fsMDIForm then
begin
Result := False;
for I := 0 to MDIChildCount - 1 do
if not MDIChildren[I].CloseQuery then Exit;
end;
Result := True;
if Assigned(FOnCloseQuery) then FOnCloseQuery(Self, Result);
end;
Tja, das ist virtual, also lässt es sich überschreiben
und wenn du noch vor die Childs willst, dann kommt dein Code halt vor das inherited.
