Startfenster vor MainForm anzeigen



  • Hallo zusammen,

    ich würde gerne beim Starten der Anwendung einen Ladebalken für die Anwendung erstellen. Leider scheitere ich daran da immer die erste erstellte Form zur Mainform wird.

    int WINAPI _tWinMain(HINSTANCE, HINSTANCE, LPTSTR, int)
    {
    	try
    	{
    		Application->Initialize();
    		Application->MainFormOnTaskBar = true;
    		TStyleManager::TrySetStyle("Silver");
    
    		Application->CreateForm(__classid(TForm_StartScreen), &Form_StartScreen);
    		Form_StartScreen->Show();
    		Form_StartScreen->Update();
    
    		Application->CreateForm(__classid(TForm_Main), &Form_Main);
    [...]
    }
    

    laut der Hilfe von Embarcadero sollte das auch funktionieren.. 😕
    http://docwiki.embarcadero.com/Libraries/XE6/de/Vcl.Forms.TApplication.MainForm

    Vor dem Anzeigen von MainForm können Sie ein Startfenster hinzufügen. MainForm wird nach der Beendigung der Initialisierung der Anwendung angezeigt.

    im grunde so Ähnlich wie es hier beschrieben wird:
    http://docwiki.embarcadero.com/CodeExamples/XE6/en/TAppCreateForm_(C%2B%2B)

    Leider wird da auch FORM5 zur MainForm 😞

    In der Hilfe steht:

    Vor dem Aufruf von CreateForm können Sie beliebig viele Formulare erstellen, indem Sie deren eigenen Konstruktor aufrufen.

    aber wie mache ich das??



  • int WINAPI _tWinMain(HINSTANCE, HINSTANCE, LPTSTR, int)
    {
        try
        {
            Application->Initialize();
            Application->MainFormOnTaskBar = true;
            TStyleManager::TrySetStyle("Silver");
    
            // so ? 
            TFormStart Form = new TFormStart( Application );
            Form->ShowModal();
    
            Application->CreateForm(__classid(TForm_Main), &Form_Main);
    [...]
    }
    


  • Danke,

    manchmal sieht man den Wald vor lauter Bäumen nicht 🙄


Log in to reply