Delphi 流程

语句块及注释

语句块以 BEGIN 和 END 包围,语句之间以分号隔开。

当语句块只有一条语句时,可省去 BEGIN 和 END 及 分号。

begin
   语句1; {  注释格式 1  }
   语句2; (* 注释格式 2 *)
   语句3; // 单行注释
   ...
end;

GOTO 转移

1:  语句;     { 标号定义: LABEL 1; }

GOGO 1;

IF 分支

IF 条件 THEN
   语句块
[ELSE
   语句块
]

CASE 分支

CASE 表达式 OF
   常量1: 语句块
   常量2: 语句块
   ...
   [ELSE 语句块]
END

FOR 循环

FOR 循环变量:=初值 TO/DOWNTO 终值 DO
   语句块

   Break    // 退出循环
   Continue // 继续下次循环

WHILE 循环

WHILE 条件 DO
   语句块

REPEAT-UNTIL 循环

REPEAT
   语句块
UNTIL 条件(条件为真时退出循环)