Delphi中TApplication类的用法-Delphi-优质IT资源分享社区

admin
管理员
管理员
  • UID1
  • 粉丝29
  • 关注4
  • 发帖数581
  • 社区居民
  • 忠实会员
  • 原创写手
阅读:178回复:0

  Delphi中TApplication类的用法

楼主#
更多 发布于:2016-06-05 22:25

在Delphi中TApplication是一个有着十分首要效果的类

。TApplication类是用于

描述Delphi编制的

运用程序的一个类 。经过对这个类的灵活

运用

能够编制很多有特征的程序 。 。

1) 检查现在Windows程序是不是被激活:

女神夜拍也漂亮 8组美人人像拍摄作品精选常用的网站漏洞扫描东西小结

查找引擎优化成功必先处理的三个大忌轻松把握5个小窍门 把美人拍的更显瘦

TApplication类有一个特点——Active,这个特点就

能够

描述现在运转的程序是不是被激活,变成Windows的焦点

。检 测的代码如下:

If Application.Active=False then

ShowMessage(’现在窗口没有被激活’);

豌豆荚怎样用win8界面鼠标控制窍门

行走中捕捉景色 教你将城市风景拍出特征win8怎样关机?教你4种win8关机办法

2)

取得现在程序的称号:

TApplication类的EXEName特点

能够回来这个可执行程序的

彻底文件名(包含途径) 。完成的代码如下所示:

ShowMessage(Application.ExeName);

3) 改变程序极小化时的

标题

Tapplication类的Title特点 。这个特点决议了程序最小化时的

标题,而窗口中

标题栏的

标题是由Form的Caption特点来决议的

。其代码如下:

Form1.Caption:=’ 窗口的

标题’;

Application.Title:=’程序的

标题’;

4) 指明程序的主窗口

Windows体系中的界面都是窗口,但一般来讲有一个主窗口

。Tapplication的MainForm特点就

能够回来程序的主窗口 。

5) 显现

信息框

Delphi

能够生成一个富含中文显现的按钮,Tapplication的MessageBox函数了

。这个函数的原形如下: function MessageBox(Text, Caption: Char; Flags: Longint):

Integer

例如:Application.MessageBox('需要存盘吗?','

提醒信息',MB_OKCANCEL);

这个函数回来的是一个整型的数值,而这个数值被体系指定了详细的

含义,

比如:按下“断定”按钮时回来的值是“1”,按钮的

意思及体系中对其界说的值:

IDOK 1

IDCANCEL 2

IDABORT 3

IDRETRY 4

IDIGNORE 5

IDYES 6

IDNO 7

6) 操作窗口的尺度

一般

能够用窗口手柄来调整窗口的尺度,但是也

能够用Application的事情来调整 。完成的

进程是用以下两个进程:

Application.Minimized;

Application.Restore;

前一个进程用来将程序的主窗口最小化,然后一个进程用来将最小化的窗口

恢复到本来的尺度 。

7) 连接联机帮忙文件

Application的CurrentHelpFile特点

能够指定现在程序所用的联机帮忙文件的文件名 。这个特点

经常与另一个

进程联合在一起

运用 。举例如下:

Application.HelpFile := '联机帮忙文件名';

Application.HelpJump('联机帮忙文件的主题’)

经过这一指令组合,咱们就能使体系弹出一个显现某主题的联机帮忙文件 。

8) 在程序运转时动态地

创造窗口

窗口是在设计时参加到工程

名目中的,但是有时也需要咱们在程序运转时动态地参加窗口,这就要用到Application

CreateForm进程,举例如下:

Form3:Tform3; //声明窗口类

Application.CreateForm(TForm3, Form3); //

创造窗口

9)

结束程序

当然咱们

能够用封闭主窗口的

进程来封闭一个程序,但是更好的

进程是用Application的Terminate进程 。它

能够起到更彻底地封闭程序的

动机 。

10) Destroy 特点.

当然Delphi供给了这一特点, 但是并不提倡

运用它,假如要完结程序就要调用Terminate进程,而Destroy进程一般是用来在程序

发生悬挂时来退出程序时才调用,有些

相似 Windows中的

结束

任务

性能 。它不不得不封闭程序实例

自身,而且还能

开释程序所占用的资本,

能够到达将程序彻底

清除出体系的

方针 。

在Delphi中TApplication是一个有着十分首要效果的类

。TApplication类是用于

描述Delphi编制的

运用程序的一个类 。经过对这个类的灵活

运用

能够编制很多有特征的程序 。 。

1) 检查现在Windows程序是不是被激活:

TApplication类有一个特点——Active,这个特点就

能够

描述现在运转的程序是不是被激活,变成Windows的焦点

。检 测的代码如下:

If Application.Active=False then

ShowMessage(’现在窗口没有被激活’);

2)

取得现在程序的称号:

TApplication类的EXEName特点

能够回来这个可执行程序的

彻底文件名(包含途径) 。完成的代码如下所示:

ShowMessage(Application.ExeName);

3) 改变程序极小化时的

标题

Tapplication类的Title特点 。这个特点决议了程序最小化时的

标题,而窗口中

标题栏的

标题是由Form的Caption特点来决议的

。其代码如下:

Form1.Caption:=’ 窗口的

标题’;

Application.Title:=’程序的

标题’;

4) 指明程序的主窗口

Windows体系中的界面都是窗口,但一般来讲有一个主窗口

。Tapplication的MainForm特点就

能够回来程序的主窗口 。

5) 显现

信息框

Delphi

能够生成一个富含中文显现的按钮,Tapplication的MessageBox函数了

。这个函数的原形如下: function MessageBox(Text, Caption: Char; Flags: Longint):

Integer

例如:Application.MessageBox('需要存盘吗?','

提醒信息',MB_OKCANCEL);

这个函数回来的是一个整型的数值,而这个数值被体系指定了详细的

含义,

比如:按下“断定”按钮时回来的值是“1”,按钮的

意思及体系中对其界说的值:

IDOK 1

IDCANCEL 2

IDABORT 3

IDRETRY 4

IDIGNORE 5

IDYES 6

IDNO 7

6) 操作窗口的尺度

一般

能够用窗口手柄来调整窗口的尺度,但是也

能够用Application的事情来调整 。完成的

进程是用以下两个进程:

Application.Minimized;

Application.Restore;

前一个进程用来将程序的主窗口最小化,然后一个进程用来将最小化的窗口

恢复到本来的尺度 。

7) 连接联机帮忙文件

Application的CurrentHelpFile特点

能够指定现在程序所用的联机帮忙文件的文件名 。这个特点

经常与另一个

进程联合在一起

运用 。举例如下:

Application.HelpFile := '联机帮忙文件名';

Application.HelpJump('联机帮忙文件的主题’)

经过这一指令组合,咱们就能使体系弹出一个显现某主题的联机帮忙文件 。

8) 在程序运转时动态地

创造窗口

窗口是在设计时参加到工程

名目中的,但是有时也需要咱们在程序运转时动态地参加窗口,这就要用到Application

CreateForm进程,举例如下:

Form3:Tform3; //声明窗口类

Application.CreateForm(TForm3, Form3); //

创造窗口

9)

结束程序

当然咱们

能够用封闭主窗口的

进程来封闭一个程序,但是更好的

进程是用Application的Terminate进程 。它

能够起到更彻底地封闭程序的

动机 。

10) Destroy 特点.

当然Delphi供给了这一特点, 但是并不提倡

运用它,假如要完结程序就要调用Terminate进程,而Destroy进程一般是用来在程序

发生悬挂时来退出程序时才调用,有些

相似 Windows中的

结束

任务

性能 。它不不得不封闭程序实例

自身,而且还能

开释程序所占用的资本,

能够到达将程序彻底

清除出体系的

方针 。

优质IT资源分享社区为你提供此文。

本站有大量优质Delphi教程视频,资料等资源,包含Delphi基础教程,高级进阶教程等等,教程视频资源涵盖传智播客,极客学院,达内,北大青鸟,猎豹网校等等IT职业培训机构的培训教学视频,价值巨大。欢迎点击下方链接查看。

Delphi教程视频

优质IT资源分享社区(www.itziyuan.top)
一个免费,自由,开放,共享,平等,互助的优质IT资源分享网站。
专注免费分享各大IT培训机构最新培训教学视频,为你的IT学习助力!

!!!回帖受限制请看点击这里!!!
!!!资源失效请在此版块发帖说明!!!

[PS:按 CTRL+D收藏本站网址~]

——“优质IT资源分享社区”管理员专用签名~

本版相似帖子

游客