Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#4

Re: Loginfenster schließen aber Anwendung offen lassen?

  Alt 15. Mai 2006, 08:05
Die zweite Möglichkiet ar schon richtig. Du musst nur schreiben frmLogin.Close, da die Login-Form jetzt deine Hauptform ist. Oder wenn du das nicht willst und die Login-Form nicht dein Hauptfenster sein soll, machst du es so:

Delphi-Quellcode:
type
  TForm1 = class(TForm)
    procedure FormShow(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
    bFirstTime: Boolean
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

uses Unit2;

{$R *.dfm}


procedure TForm1.FormShow(Sender: TObject);
begin
  if bFirstTime then
  begin
    bFirstTime := False;
    Form2.ShowModal;
  end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  bFirstTime := True;
end;
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat