当前位置:编程学习 > Delphi >>

delphi_Case...Of语句使用?

delphi_Case...Of语句使用??

怎么使用啊,给个例程,最好详细说明!40分!
追问:我写了个程序,想加入反调试功能,才想起来 case。。of语句。
如果我想用 case..of 判断 是否为真,如果不真的话,就else ShowMessage('Error')
应该怎么实现?麻烦了,谢谢!
答案:
var

i : integer;

begin

i := StrToInt(Edit1.Text);

case i of

1: Memo1.Lines.Add ('你输入了1');

2: Memo1.Lines.Add('你输入了2')

3: Memo1.Lines.Add('你输入了3');

end;

如果只是判断是否为真的话 那就应该用 if(True) ..else..
而case..of 是个分支判断 对不同的情况做分别的处理
他是用来简化 if..else if.. else if ..这种情况的

上一个:delphi中到数据库里验证字段
下一个:關于delphi代碼文本鏈接的問題

CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,