procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
for i:=0 to 5 do begin
if i=4 then break
else if i=2 then CONTINUE
else showmessage(format('num:%d',[i]));
end;end;
var
i:integer;
begin
for i:=0 to 5 do begin
if i=4 then break
else if i=2 then CONTINUE
else showmessage(format('num:%d',[i]));
end;end;
解决方案 »
- 怎么用quickreport给每页都加上一个统计信息
- 我想实现类似插件的功能怎么做
- 如何判断一个字符串是字母还是数字或者是汉字?
- 在下写的一个绚丽多彩的3D花篮,现在公布源代码,希望和大家共同切磋交流:)
- (100分求建议)一个邮件客户端,单线程多账户,带地址簿功能,附全部源码及控件和编程思路,恳请各位(尤其是已经下载的)给予点评!!
- 春节后 - 深圳福田招delphi程序员2名
- 关于PZPAGECONTROL使用的一个问题
- 取字符串长度的函数是什么,我忘了。
- 文件名称的问题
- delphi能否访问dll导出的变量,如何访问?
- 请各位同道举一个继承的例子我看看.一定送分
- 我是Rabbit1125(兔子),今天我生日,散分!
跳出循环:break
继续循环:continueok?