如何将做好的软件封面显示若干秒后自动关闭？(100分)

H

HarryCat

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-06

• #1

我做了一个软件封面，想让它显示几秒钟后自动关闭，进入软件工作。请问如何写程序？

 

C

CJ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-06

• #2

一个timer啊
formonshow
timer1.enabled:=true;

timer1ontimer
close;

 

F

Fpack

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-06

• #3

begin
Application.Initialize;
软件封面:= 徽标Form.Create(Application);
软件封面.Show;
软件封面.Update;
Application.CreateForm(TForm1, Form1); //创建主Form
软件封面.Hide;
软件封面.Free;
Application.Run;
end.

 

M

menxin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-07

• #4

也可以用循环啊

 

V

VGA

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-07

• #5

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
DWORD lTime;

SPLASHFORM = new TSPLASHFORM(SPLASHFORM);
SPLASHFORM->Show();
SPLASHFORM->Update();
lTime = GetTickCount();

Application->CreateForm(__classid(TMainForm), &MainForm);
Application->Initialize();

Application->CreateForm(__classid(TDM), &DM);
Application->CreateForm(__classid(TMDIChild), &MDIChild);
Application->CreateForm(__classid(TLogDlg), &LogDlg);

while( (GetTickCount()-lTime)/1000 < 2) //秒数 2
Application->ProcessMessages();

SPLASHFORM->Hide();
SPLASHFORM->Free();

Application->Run();

return 0;
}

上面的程序（ c++ builder ）供参考

 

吕

吕雪松

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-07

• #6

哈，HarryCat朋友也和我一样。
以前自己作的一个软件，同样也作了个封面，但是由于软件功能有限，造成进入速度奇快，
因此封面一闪就没了，很不“专业”，于是很急，也想搞个“暂停”什么的。后来功能很
复杂了，我不用什么“暂停”封面都会显示一段时间，很合适。
我当时用了两种方法：
1，用计时器，在program source里写，因此当主界面都出来以后，封面都有可能显示一会
儿再消失，很不错。
2，把封面作成随便点一下鼠标或按一下键盘才消失，象以前的“金山词霸”一样。

 

B

beyondeast

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-07

• #7

用timer最方便，
在ontimer事件里面加入您的代码

 

R

redsky.l

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-11

• #8

我是这样玩的:
Form1-->主窗口;
Form2-->封面窗口;
在Project1加上一行:
Application.ShowMainForm := False;//不显示主窗口
Form2的Visible属性为true ;再就如上面几位所说,加个Timer,用Timer来控制Form2,
想几秒就几秒关了它,只是关闭时不要忘了加上:Form1.Visible:=true

 

P

porsche

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-11

• #9

又来迟了，我的意见就是：上面的都对。

 

张

张剑波

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-11

• #10

那都是流行的说法,在下的方法你可以一试:
主窗体的formcreate事件里加:
sleep(xxxx)
(版权所有,以后任何形式的发表,须注明本人姓名)

 

H

HarryCat

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-11

• #11

多人接受答案了。