• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

delphi中Case语法的使用方法

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

Case 语句
If...Then…Else 语句适合选项较少的情况,如果有很多选项的话利用If 语句就比较麻烦,在这种情况下,Case 语句就容易多了。Case 语句的语法如下:

case <表达式> of
<数值>:<语句>;
<数值>:<语句>;
else
<语句>;
end;

 

下面这个例子中的S 为Char 类型。当用户输入一个字符后按回车键确认后判断变量S,如果是小写或大写字母将显示“字符”,如果是数字,则显示“数字”,其余的字符就显示“其他”,判断语句如下:

注意:Case 构造中的任何一个语句都可以是单语句或复合语句。如果需要在某种情况下执行多行代码,必须将它们用Begin…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;


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
Delphi不用标题栏移动窗体发布时间:2022-07-18
下一篇:
Delphi之Copyrect的使用发布时间:2022-07-18
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap