不好意思，一个比较简单的问题，如何跳出Case语句？

[wlw88]

好久没有提问了，问一个比较简单的问题，让大家见笑了，如何跳出Case语句，就像循环中的Break一样，继续执行case下面的语句? 在Vc中可以使用break跳出，而在delphi中它不支持，谢谢大家了！！

[wlw88]

好了，多谢大家，本人深有感触，好久没有在技术区混了，近来人气不错吧，结贴了！！

[cougar87]

exit呢?

[wuxuan]

break可以呀，还可以使用goto呀。

[cougar87]

break不行就用Exit

[票票飞扬]

会自动跳出。
你可以跟踪一下。

[Billy_Chen28]

break

[hmily1688]

除了break,exit,我还用过continue

[rainsea]

执行完成某一个case,它自动跳出的。

[GaoLun]

一般都用 break 或者是 continue

[laihecongxi]

case本身判断语句，我想条件是按整句来判断的，可以自动跳出
Case i of
0:;
1:
else
.....
end;
相当于：
if (i=0) or (i=1) or ...then
else
end;

[lws0472]

break,continue都没用成功过，我用goto,楼上的各位大侠用成功的给个例子好不好。

var
i ,j : integer;
label aaa;
begin
i := 1;
j := 2;
case i of
1 :begin
if j = 2 then
goto aaa;
showmessage('aa');
end;
end;
aaa: showmessage('bb');
end;

[jwboyR]

break;可以的
但是exit好象不可以,exit好象是退出整个事件过程的

[wlw88]

我说各位，在给别人回答时认真点好不好，break和continue根本就调不通！！如果真的能调通可以贴出例子来看看，如果真的实现了，我可以单独给你100分。Exit是跳出整个函数，并不是跳出Case语句！！！lws0472(hero)老兄说的goto还是可以实现的，不过本人总感觉不太好，让人看着比较乱！不知道哪位还有其他更好的方法？
不管怎样，谢谢大家的关心，我不会亏待大家的！^_^

[fox1123]

case I of

1..5: Caption := 'Low';
6..9: if i=6 then
begin
Caption := 'High'
else
caption:='Other'
end;
0, 10..99: Caption := 'Out of range';
else
Caption := '';
end;

加 if 判断嘛

[shanxing]

up以后大家用摆事实，讲道理的吧~~~
举例子

[feiyunxiaozi]

退出语句比较：

Abort 停止运行某事件，即Abort后的程序不运行。
Break 强制退出循环。
Continue 强制缩短循环。
Exit 强制退出程序块。
Halt 强制终止程序执行。

[feiyunxiaozi]

case 语句会自动退出的

[Charriol]

BREAK;

[findcsdn]

c中的break功能 delphi 的语法已经搞定了，在case的某个分支执行完之后，就自动退出case. 不要告诉我，你要在case分支内执行的时候跳出Case ,我想不出来为什么会有这种需求...。

[danger999]

对呀，这种应用需求是什么情况下产生的，，
可以考虑别的语法
我不爱钻牛角尖。