parent schliessen

[khh]

Zitat von shmia:

Entweder ruftst du Application.Terminate (Holzhammermethode) auf oder du fragst das ModalResult (eleganter) ab:

Delphi-Quellcode:

procedure TMainForm.FormActivate(...);
var
  frm : TPasswortForm;
  ende : Boolean;
begin
  frm := TPasswortForm.Create(nil);
  try
    // Fomular modal anzeigen - wenn nicht OK-Button gedrückt wurde
    // ist ende = True
    ende := frm.ShowModal <> mrOK;
  finally
    frm.Free;
  end;
  if ende then
    Close;
end;

logisch, jetzt wo du es sagst

ich danke dir