Einzelnen Beitrag anzeigen

yogie

Registriert seit: 11. Sep 2003
Ort: bei Goslar
213 Beiträge
 
Delphi 6 Professional
 
#2

AW: Info-Fenster nachträglich vor Programm anzeigen

  Alt 25. Okt 2017, 13:35
Hallo,
wenn ich Dich richtig verstehe, soll das Fenster vor der eigentlichen
Main-Form angezeigt werden. Dazu muß die Projektdatei *.dpr bearbeitet werden.
Nur als Anregung:
Code:
uses
  Forms,
  sysutils,
  xxxMain in 'xxxMain.pas' {frmMain},
  ... usw
{$R *.res}

begin
  frmIntro:=TfrmIntro.Create(Application);
  frmIntro.Show;
  frmIntro.Update;
  sleep(1000);

  Application.Initialize;

  Application.CreateForm(TfrmMain, frmMain);
  ... usw

  frmIntro.Close;
  frmIntro.Release;

  Application.Run;
end.
sleep ist da natürlich nicht wirklich gut, sorgt aber dafür, daß frmIntro wenigstens
eine Sekunde zu shen ist.
Kompatibilität ist ein Euphemismus für n i c h t einhunderprozentige Austauschbarkeit
http://b-und-l-service.de/
  Mit Zitat antworten Zitat