lanfanra您好: 如何產生應用程式啟動logo畫面,步驟如下:
1.開啟一新的Project
2.New form產生Form2
3.在Project.cpp中加入#include "Unit2.h" Project.cpp
//--------------------------------------------------------------------------- #include
#include "Unit2.h"
#pragma hdrstop
USERES("Project1.res");
USEFORM("Unit1.cpp", Form1);
USEFORM("Unit2.cpp", Form2);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize(); Application->CreateForm(__classid(TForm1), &Form1);
Application->CreateForm(__classid(TForm2), &Form2);
Form2->ShowModal();//加入這一行,不可使用Form2->Show,如使用Form2->Show會被Form1蓋過去
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
//--------------------------------------------------------------------------- 4.在Form2上加入Timer計時器,決定Form2顯示多久後關閉.
//--------------------------------------------------------------------------- #include
#pragma hdrstop #include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
: TForm(Owner)
{
}
//--------------------------------------------------------------------------- void __fastcall TForm2::FormCreate(TObject *Sender)
{
Timer1->Interval=2000;//Timer設定為2秒後將Form2關閉
}
//--------------------------------------------------------------------------- void __fastcall TForm2::Timer1Timer(TObject *Sender)
{
Form2->Close();
}
//---------------------------------------------------------------------------
HAVE A NICE DAY FOR YOU 發表人 - axsoft 於 2003/08/12 11:05:34