📄 lc_bcb_34.html
字号:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="Author" content="zyqsj">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<title>程序开始时先显示信息框</title>
</head>
<body>
<p align="center"><strong><font size="3">程序开始时先显示信息框</font>
</strong>
</p>
<p>一、软件进入主窗口前,先显示一个信息框,告诉用户一些有关该软件的信息,比如软件名称,版本号等。该信息框在显示1~2秒后自动消失。
<br>
1.建立New Application,这时系统自动生成一个Form1,这作为主Form.
</p>
<p> 2.File->New Form 建立一个新Form为Form2,这个作为信息框。
</p>
<p> 3.在Form2上添加组件TTimer(System控件条上),用于设定信息框的显示时间。
<br>
4.TTimer的事件OnTimer中加入:Form2->Close(); </p>
<p> 5.在WinMain()函数中加入: <br>
Application->CreateForm(__classid(TForm2),
&Form2); <br>
Form2->ShowModal( ); //这句要自己加入
<br>
Application->Run(); <br>
并且要把Form2的头文件Unit2.h包括到WinMain()所在的Project1.cpp中。
</p>
<p> 6.运行程序,将先显示Form2,显示时间由TTimer的Interval属性决定,1000是一秒。
</p>
<p>二、软 件 封 面 的 实 现 <br>
现 代 软 件 设 计 的 流 行 做 法 是, 在 程 序 运 行
完 成 初 始 化 之 前, 先 调 用 一 幅 画 面 做 为 封 面, 通 常 是1/4
屏 幕 大 小, 显 示 一 下 软 件 的 名 称、 作 者、 版 本 等 信
息。 要 用C++ Builder 实 现 这 样 的 功 能, 方 法 很 简 单: </p>
<p>① 自 定 义 一 窗 体 类 TSplashForm, 将 其 设 置 成" 透 明 窗
口", 即 BorderIcons 下 的 所 有 选 项 均 置 成false,
BorderStyle=bsNone,FormStyle=fsStayOnTop, Position=poScreenCenter; </p>
<p>② 在TSplashForm 窗 体 上 放 置 一TPanel( 相 当 于 图 形 的 镜
框); </p>
<p>③ 在TPanel 上 放 置 一TImage 控 件, 调 入 所 需 要 的 图 形; </p>
<p>④ 对WinMain 函 数 稍 加 修 改, 加 入 如 下 所 示 代 码 即 可。
需 要 指 出 的 是, 这 段 代 码 通 过 函 数 FindWindow, 搜 索 内 存
中 是 否 有 窗 口 标 题 为 "Demo" 应 用 程 序 存 在, 若 存
在, 则 退 出 程 序 的 运 行。 该 功 能 可 防 止 程 序 的 再
次 运 行。 在 某 些 场 合 这 样 设 计 是 必 须 的。 </p>
<p>
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) <br>
{ <br>
try <br>
{ <br>
if(FindWindow(NULL,"Demo")!=0) <br>
{ <br>
Application- >MessageBox (" 程 序 已 经 运 行!"," 警 <br>
告",MB_ICONSTOP); <br>
return 0; <br>
} </p>
<p>
TSplashForm *splash=new TSplashForm(Application); </p>
<p>
splash- >Show(); </p>
<p>
splash- >Update(); </p>
<p>
Application- >Initialize(); </p>
<p>
Application- >CreateForm(__classid(TForm1), &Form1); </p>
<p>
splash- >Close(); </p>
<p>
delete splash; </p>
<p>
Application- >Run(); </p>
<p>
} </p>
<p>
catch (Exception &exception) </p>
<p>
{ </p>
<p>
Application- >ShowException(&exception); </p>
<p>
} </p>
<p>
return 0; </p>
<p>
} <br>
</p>
<p align="center">
</p>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -