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:=函数值;或 <函数名>:=函数值;返回;