Delphi整理四(程序控制结构)


本文整理自网络,侵删。

 
程序控制结构

三种流程控制结构:顺序结构、分支结构、循环结构 
复杂问题分:有限个顺序、分支后循环结构

两种分支结构:if and Case

分支结构

if语法: 
if <条件> 
then<语句序列1> 
else<语句序列2>

if…then…else 是一个语句 
例,

if ...
  then ...
else ...
1
2
3
复杂点:

if ...
then 
  begin
    ...
  end
else begin
  ...
end; 
1
2
3
4
5
6
7
8
if语句的嵌套

if ...
then 
  begin if ...
    ...
  end
else ...
1
2
3
4
5
6
Case

语法: 
Case<表达式>of 
… 
例,

Case month of
1,3:days:=31;
...
1
2
3
1)表达式必须顺序类型,整型、字符型、枚举、子界、布尔型… 
2)个个常量表中的常量应该用逗号隔开,不能相同 
3)语句顺序有多个语句,用begin和end括起来形成复合语句

while

语法:

while<条件> do
循环体;
1
2
1)条件成立,执行循环体 
2)多个语句,begin和end括起来 
3)可以在循环体中加continue(用于结束本次循环) 
4)break用来结束整个循环

Repeat(循环次数不确定)

Repeat
循环体;
Until <条件>;
1
2
3
1)Repeat先循环后判断 
2)无需begin和end括起来,自身repeat和until将其括起来了 
3)条件为true,循环结束 
4)可加入continue可以提前结束本次循环 
5)break:一般使用if来控制,结束if整个循环去执行循环体之后的语句

for(循环次数确定)

for<循环变量>:=<初始值> to/downto <终值> do
[循环体];
1
2
1)to表示递增 downto表示递减 
2)多个语句需要begin和end进行隔离 
3)break:无论循环是否满足,都可以提前结束循环 
4)continue:结束本次,开始下次

相关阅读 >>

Delphi 递归搜索文件夹子目录

Delphi控制台程序怎么清屏

Delphi sqlite vacuum 压缩数据库体积

Delphi ansi字符串转unicode编码

Delphi 获取指定字符串后面的所有的字符串

Delphi xe 使用asqlite操作sqlite数据库乱码

Delphi 获取局域网内的机器名

Delphi dblookupcombobox组件的使用方法

Delphi 调用clipboard 收集剪切板信息

Delphi外挂编写

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...