Thema: Delphi Dialog ausblenden

Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#2

Re: Dialog ausblenden

  Alt 17. Jan 2006, 14:46
Hallo Chris,

nicht der Login-Dialog sollte deine MainForm sein, sondern die andere Form. Entferne dazu den Login-Dialog aus der Liste der automatisch erzeugten Forms und ändere deinen Projektquelltext etwas ab:

Delphi-Quellcode:
begin
  with TLoginDialog.Create(nil) do
  begin
    if (ShowModal <> mrOK) or (Password.Text <> 'marabu')
      then Halt
      else Free;
  end;

  Application.Initialize;
  Application.CreateForm(TMainForm, MainForm);
  Application.Run;
end.
Grüße vom marabu
  Mit Zitat antworten Zitat