delphi中Case语法的使用方法|技巧
2013-09-10 11:56
323 查看
Case 语句
If...Then…Else 语句适合选项较少的情况,如果有很多选项的话利用If 语句就比较麻烦,在这种情况下,Case 语句就容易多了。Case 语句的语法如下:
下面这个例子中的S 为Char 类型。当用户输入一个字符后按回车键确认后判断变量S,如果是小写或大写字母将显示“字符”,如果是数字,则显示“数字”,其余的字符就显示“其他”,判断语句如下:
注意:Case 构造中的任何一个语句都可以是单语句或复合语句。如果需要在某种情况下执行多行代码,必须将它们用Begin…End 括起来。
也可以用 case + begin..end,语法如下:
case 表达式 of
0:begin
end;
1:begin
end;
else
begin
end;
end;
If...Then…Else 语句适合选项较少的情况,如果有很多选项的话利用If 语句就比较麻烦,在这种情况下,Case 语句就容易多了。Case 语句的语法如下:
case <表达式> of <数值>:<语句>; <数值>:<语句>; else <语句>; end; |
var S:Char; begin Readln(S); case S of ’a’..’z’, ’A’..’Z’:Writeln(’字符’); ’0’..’9’:Writeln(’数字’); else Writeln(’其他’); end; |
也可以用 case + begin..end,语法如下:
case 表达式 of
0:begin
end;
1:begin
end;
else
begin
end;
end;
相关文章推荐
- delphi中Case语法的使用方法
- delphi中Case语句的使用方法|技巧
- BAT文件语法和技巧(bat文件的编写及使用)
- delphi 中locate函数的使用方法
- sql语法:inner join on, left join on, right join on详细使用方法
- Delphi中Hash表的使用方法
- sublime 使用中一些遇到问题解决方法和技巧汇总(持续更新)
- SQL中Case的使用方法
- php使用strpos判断字符串中数字类型子字符串出错的解决方法[原创]_php技巧_脚本之家
- sql语法:inner join on, left join on, right join on详细使用方法
- block块的使用方法与技巧
- delphi中Message消息的使用方法
- SQL CHECK 约束&Case when 的使用方法
- android library工程中使用switch_case语句,调用资源文件的id出现错误的原因分析及解决方法
- sql语法:inner join on, left join on, right join on详细使用方法
- 数据集的使用方法和技巧
- Spread控件的使用经验,技巧,方法
- (转)SQL中Case的使用方法(上篇)
- u盘使用记录、痕迹删除技巧方法
- DELPHI INSERT INTO 语句的语法错误 解决方法