aredfish
一般會員
發表:47 回覆:41 積分:17 註冊:2002-12-04
發送簡訊給我
|
大家好,我想請問一下大家如何製作片頭畫面,就是在Form還沒被create出來之前所出現的畫面,而在form出來之後又會自動消失的那種.
我之前在書店有翻到這樣的一個範例,好像是要寫在有Application的那個程式裡面,我剛又回去書店找,可是已經找不到那本書了,所以想請大家幫忙,謝謝!!!
|
terrychen
尊榮會員
發表:90 回覆:794 積分:501 註冊:2003-05-01
發送簡訊給我
|
您好:
Application.Initialize;
fmsplash:= Tfmsplash.Create(Application);
fmsplash.Show;
fmsplash.Update;
Application.Title:= 'XXXX銷存系統';
........
Application.CreateForm(Tindex, index);
........
fmsplash.Hide;
fmsplash.Update;
fmsplash.Free;
Application.Run;
fmsplash是一ㄍFORM
這是DELPHI的做法
自行轉為C ,參考看看 ~~應無所住而生其心~~
|
aredfish
一般會員
發表:47 回覆:41 積分:17 註冊:2002-12-04
發送簡訊給我
|
謝謝terrychen大大的幫忙,不過我還有個問題要解決
我在Project1.cpp裡面加入下面的程式碼
Form2 = new TForm2(Application);
Form2->Show();
Form2->Update();
但是系統跟我說Undefined structure'TForm2', 所以想請問一下大家
我應該要在哪裡加入相關的宣告,以及應該如何加入呢,謝謝大家!! 新年快樂!!
|
terrychen
尊榮會員
發表:90 回覆:794 積分:501 註冊:2003-05-01
發送簡訊給我
|
您好:
在DELPHI裡是這樣寫的
program OmrReader; uses
Forms,
.......
Splash in 'Splash.pas' {fmSplash},
.......
~~應無所住而生其心~~ 發表人 - Terrychen 於 2004/01/19 09:56:07
|
CuteBabyBoy
初階會員
發表:18 回覆:97 積分:48 註冊:2003-07-11
發送簡訊給我
|
請參考看看,這會不會是您所需要的...^^
//--------------------------------------------------------------------------- #include
#pragma hdrstop
//---------------------------------------------------------------------------
#include "Unit2.h" 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(); Application->Run(); }
catch (Exception &exception)
{
Application->ShowException(&exception);
}
catch (...)
{
try
{
throw Exception("");
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
}
return 0;
}
//--------------------------------------------------------------------------- Baby
|
GaryKao99
中階會員
發表:46 回覆:102 積分:54 註冊:2002-08-23
發送簡訊給我
|
Logo製作(從書裡抄出來的 )
這應該是你要的 < class="code">
//--------------------------------------------------------------------------- #include
#pragma hdrstop
USERES("Logo.res");
USEFORM("frmMain.cpp", ciMain);
USEFORM("frmLogo.cpp", ciLogo);
//---------------------------------------------------------------------------
#include "frmLogo.h"
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize();
ciLogo = new TciLogo( Application );
ciLogo->Show();
ciLogo->Update();
Application->CreateForm(__classid(TciMain), &ciMain);
Sleep(1000);
delete ciLogo;
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
//---------------------------------------------------------------------------
~~~~~~~~~~~~~~~~~~~~~~
我什麼都會, 就兩樣不會
就是
這個也不會, 那個也不會
|
terrychen
尊榮會員
發表:90 回覆:794 積分:501 註冊:2003-05-01
發送簡訊給我
|
在補充一下
你可以從project==>options==>Forms將Form2移至auto-create forms這樣就可以了 ~~應無所住而生其心~~
|
aredfish
一般會員
發表:47 回覆:41 積分:17 註冊:2002-12-04
發送簡訊給我
|
謝謝大家的幫忙,Auto create form這招有用,
還有include也是要記得加上去的, 謝謝大家囉!!!
|