Delphi 基本语句

首先要说一下begin ... end; 相当于c或者c++中的{ ... }。

(1)声明语句

常量:const 常量标识符[:类型]=常值;

变量:var 变量标识符:数据类型;

(2)表达式语句

由运算符组成的合法语句

运算符优先级: 运算符 优先级

@ not 1 (最高)

*,/,div,mod,and,shl,shr,as, 2

+,-,or,xor 3

>,<,>=,<=,<>,=,in,is, 4 (最低)

(3) with ... do ... end 语句

主要在操作记录类型或组件时使用。

示例:type people=Record //定义记录people

name:string;

addr:string;

age:integer;

sex:string;

end;

var Me:People; //定义people型的变量

with Me do

begin

name:='Paul';

addr:='Guangzhou';

age:=23;

sex:='male';

end;

(4)goto 语句

现在所有声音都是说要减少goto语句是使用,所以尽量少用为是。

示例:

Label MyLabel; //用Label保留字声明MyLabel

MyLabel: //标记

、、、 //其它语句

goto MyLabel; //跳转到MyLabel 处

(5)条件语句

a、if ... then ... 语句

if 布尔表达式 then ..;

或 if 布尔表达式 then

begin

...

end;

其它格式:

if ... then... else ...;

if ... then .. else if ... then ... else ...;

b、case ... of 语句

case 表达式 of

值1:...

值2:...

...

值n:...

end;

6)循环语句

a、for ... to ... do 语句

for 循环变量:=初值 to 终值 do ...;

或 for 循环变量:=初值 to 终值 do

begin

。。。

end;

b、while ... do 语句

while 布尔表达式 do ...;

或 while 布尔表达式 do

begin

...

end;

c、repeat ... until 语句

repeat ... until 布尔表达式;

(7)循环的中断

break:循环结束

continue:结束本次循环

goto:(略)

exit:退出当前函数或过程

halt():终止整个程序,参数为整数

RunError():(略)

三、过程与函数

(1) 过程(无返回值)

声明: procedure <过程名> (<参数列表>);

(2)函数(有返回值)

声明: function <函数名> (<参数列表>):返回值类型;

用Result 或 <函数名>返回函数值;

即在函数中用 Result:=函数值;或 <函数名>:=函数值;返回;