首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

continue有用吗?该怎么解决

2012-02-26 
continue有用吗?procedureTDemo33Form.btnStringClick(Sender:TObject)varS:StringCh:CharbeginS:for

continue有用吗?
procedure   TDemo33Form.btnStringClick(Sender:   TObject);
var
    S:String;
    Ch:Char;
begin
    S:= ' ';
    for   Ch:= 'a '   to   'z '   do
    begin
        if   odd(ord(ch))   then   continue;
        S:=S+Ch;         //连接一个字符到S
    end;
    lblOutput.Caption:= 'ASCII码

end;

end.

  这里的continue我去掉不也行吗?
`



[解决办法]
continue就不执行循环下面的代码了的,直接开始下次循环的
if odd(ord(ch)) then continue;
S:=S+Ch; //连接一个字符到S
和if not odd(ord(ch)) then S:=S+Ch;
这两个等效的

热点排行