Hallo. Einfach schreiben:
NeuesForm.OnCloseQuery := nil;
Das müsste gehen.
Wenn du eine ganz andere Prozedur zuweisen willst, musst du eine eigene Prozedur erstellen, deren Kopf so aussieht:
Delphi-Quellcode:
procedure TOriginalForm.FormCloseQuery(Sender: TObject; var CanClose: Boolean); //Ich hab das Form jetzt einfach mal "OriginalForm" genannt.
begin
ShowMessage('Hallo');
end;
diese Prozedur kannst du dann so zuweisen:
NeuesForm.OnCloseQuery := OriginalForm.FormCloseQuery;
Man liest sich, Stanlay
