WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
  try
  {
     Application->Initialize();         Form12=new TForm12(Application);
     Form12->Show();
     Form12->Update();         Application->CreateForm(__classid(TForm1), &Form1);         Form12->Hide();
     Form12->Free();
     Application->Run();
  }
  catch (Exception &exception)
  {
     Application->ShowException(&exception);
  }
  return 0;
}

引言: 我有把程式碼寫進去了 怎麼還是沒有畫面勒 怪怪的

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
  try
  {
     Form12=new TForm12(NULL);
     Form12->Show();
     Form12->Refresh();
     int i=10; // 顯示10秒
     while(i) {
       i--;
       Sleep(1000);
     }
     Application->ProcessMessages();
//     Form12->Update();
     Application->Initialize();
     Application->CreateForm(__classid(TForm1), &Form1);
     delete Form12;//在程式顯現執行前，刪除片頭視窗 
//     Form12->Hide();
//     Form12->Free();
     Application->Run();
  }
  catch (Exception &exception)
  {
     Application->ShowException(&exception);
  }
  return 0;
}

麻煩大大幫我檢查一下 發表人 - kenton 於 2005/07/19 16:23:00 發表人 - kenton 於 2005/07/19 16:26:50