Delphi-组件使用及其代码.docVIP

Delphi-组件使用及其代码

4.常量

在var后使用const关键字声明常量：如constPI=3.14；

5.枚举类型使用

声明：type枚举类型名=（枚举值1，枚举值2，……）；

定义：var变量名：枚举类型名；

6.指针类型

@运算符：放在变量的前面，获得变量的地址；

^运算符：放在指针变量的后面，取得该指针变量中所存放地址变量的数据；

（2）声明：type指针类型名=^数据类型；

var指针变量名：指针类型名；

或者var 指针变量名：^数据类型；

7.日期时间函数

functionNow：TDateTime； //返回系统当前日期和时间

functionDate：TDateTime； //返回系统当前日期

functionTime：TDateTime； //返回系统当前时间

functionDateTimeToStr（DateTime：TDateTime）：string；//将日期时间数据转换为字符串

functionStrToDateTime（consts：string）：TDateTime；//将字符串转换为日期时间数据

functionDateToStr（DateTime：TDateTime）：string；//将日期数据转换为字符串

functionTimeToStr（DateTime：TDateTime）：string；//将时间数据转换为字符串

functionFormatDateTime（constFormat：string；DateTime：TDateTime）：string；//按指定格式 输出日期时间

例如：formatDatetime（‘yyyy-mm-dd’,now）;formatDatetime（‘hh:mm:ss’,now）;

8.自定义过程

在type下声明：procedure过程名（参数列表）；

将光标移动定位在过程声明中，按Ctrl+Shift+C，实现自动生成部分过程框架。

procedure过程名（参数列表）

局部变量声明；

begin

过程体语句；

end；

自定义过程的调用：过程名（实参表）；

9.自定义函数

（1）函数不用声明；

（2）function函数名[（参数列表）]：返回类型；

局部变量声明；

begin

函数语句；

end；

（3）自定义函数的调用：函数名（实参表）；

10.对话框函数MessageDlg

（1）变量：=MessageDlg（‘信息内容’，类型，[按钮组]，HelpCex）；

（2）类型：mtWarning 含有感叹号符号的警告对话框

mtError 含有红色差号符号的错误对话框

mtInformation含有蓝色i符号的信息对话框

mtConfirmation含有蓝色？符号的确认对话框

mtCustom不含图标的一般对话框，对话框的标题是程序的名称

按钮组：mbYes Yes按钮，函数返回mrYes或6

mbNo No按钮，函数返回mrNo或7

mbOk Ok按钮，函数返回mrOk或1

mbCancel Cancel按钮，函数返回mrCancel或2

mbHelp Help按钮

mbAbort Abort按钮，函数返回mrAbort或3

mbRetry Retry按钮，函数返回mrRetry或4

mbIgnore Ignore按钮，函数返回mrIgnore或5

mbAll All按钮，函数返回mrAll或8

mbNoToAll NoToAll按钮，函数返回mrNoToAll或9

mbYesToAllYesToAll按钮，函数返回mrYesToAll或10

HelpCtx指定当用户单击“Help”按钮或F1键时，现实的帮助主题。

例如：ifMessageDlg(您确定要关闭窗口吗？,mtConfirmation,[mbYes,mbNo],0)=mryesthen

11..基本知识点

（1）if(keyin[0,1..9,#13,#8])then//判断按下的是否为数字键、回车键和退格键

#0表示没有任何内容

#32表示空格

（2）Delphi中Randomize方法用来随机初始化数据。

（3）Label的Transparent属性用来设置Label的显示方式是否透明显示。

（4）StringGrid属性Cells【A,B】，其中A控制列，B控制行。

（5）MessageBox显示消息：Message