Thema: Delphi ShowModal im OnFormShow

Einzelnen Beitrag anzeigen

Benutzerbild von jaenicke
jaenicke

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

AW: ShowModal im OnFormShow

  Alt 10. Mär 2015, 18: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
AppCentral
  Mit Zitat antworten Zitat