フォーム1:(frmStart)
void __fastcall TfrmStart::btnRunClick(TObject *Sender)
{
frmStart->Hide();
Application->CreateForm(__classid(TfrmRunning), &frmRunning);
}
フォーム2:(実行中)
void __fastcall TfrmRunning::FormCreate(TObject *Sender)
{
frmRunning->Show();
//Here i do a lot of stuff to run my main program
}
問題は、私の最初のフォームが適切にロードおよび非表示になることです。2番目のフォームがロードされると、コンポーネントは表示されず、クラッシュしたように見えるGUIのみが表示されます。プログラムが実際に終了すると、GUIは通常の状態に戻ります。
どこで私は間違えましたか?