Hallo zusammen,
ich hab was ganz seltsames hier.
Ausgangssituation:
Ein form erzeugt und zeigt, mittels ShowModal, ein zweites Formular an.
Das OnCreate des modalen Forms ist definiert und, jetzt kommen wir zu dem seltsamen, es wird zweimal aufgerufen, und mir ist absolut nicht klar, wieso, weshalb, warum???!
Der aufrufende code:
Delphi-Quellcode:
with TForm2.Create (self) do
try
ShowModal;
finally
free;
end;
das OnCreate sieht so aus:
Delphi-Quellcode:
procedure TForm2.FormCreate(Sender: TObject);
begin
BorderIcons := [];
end;
und noch das ShowModal:
Delphi-Quellcode:
function TForm2.ShowModal: integer;
begin
result := inherited ShowModal;
end;
Allso, eigentlich, alles ganz klassisch.
Der Debugger behauptet, lasse ich mir den Stack anzeigen, dass ShowModal das OnCreate aufruft?
Hattet ihr so was schon mal?
Völlig ratlose Grüße
Marco