Thema: Delphi ShowModal im OnFormShow

Einzelnen Beitrag anzeigen

Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
9.379 Beiträge
 
Delphi 11 Alexandria
 
#3

AW: ShowModal im OnFormShow

  Alt 10. Mär 2015, 17:57
Ja, kann ich, ich mußte nur das CreateForm der 2.Form vor dem CreateForm der Mainform aufrufen.
Oder gar nicht im Projektquelltext erstellen, was meistens sinnvoller ist...
Delphi-Quellcode:
procedure TFirstForm.FormShow(Sender: TObject);
var
  ExampleForm: TExampleForm;
begin
  ExampleForm := TExampleForm.Create(Self);
  try
    if IsPositiveResult(ExampleForm.ShowModal) then
      ...
  finally
    ExampleForm.Free;
  end;
end;
Aber, jetzt reagiert mein 2.Form nicht mehr auf ModalResult, auch nicht, wenn ich direkt in den Button-Eigenschaften festlegen.
Das kann ich nicht reproduzieren. Hast du vielleicht ein kleines Beispielprojekt?
Sebastian Jänicke
Alle eigenen Projekte sind eingestellt, ebenso meine Homepage, Downloadlinks usw. im Forum bleiben aktiv!
  Mit Zitat antworten Zitat