只能用while循环。
i := 0;
while (i <= 10) do
begin
dosomething;
Inc(i, 2);
end;
i := 0;
while (i <= 10) do
begin
dosomething;
Inc(i, 2);
end;
解决方案 »
- DES加密算法的问题
- 程序重启里发生 appcrash 错误,怎么处理啊
- 如何识别图片上的文字
- 献给准备春节不回家的程序员
- 数据集ClientDataset1,ClientDataset2选取的数据结构一致,请问如何将数据集2的加入到数据集1呢?
- 请问,将一个数据表中的一条记录整条复制到另外一个数据表中,怎么写?
- 谁能告诉我ParamStr()是什么意思,以及它的用法
- 有谁知道使用tquery控件,如何读到当前记录的记录号;
- 讨论同步更新问题!高手请进!请勿灌水!!!谢谢合作!
- 大家如何度过郁闷期,我好郁闷啊!!!
- NMHttp控件中如何保持连接状态???
- 正确设置后QRDBText为什么不能自动折行?
var i : Integer;
begin
for i := 0 to 10 do
if i Mod 2 =0 then ShowMessage(IntTtoStr(i))end;
showmessage(inttostr(I*2));
我也是刚从VB转DELPHI,多多指教。
showmessage(inttostr(I*2));
我也是刚从VB转DELPHI,多多指教。
dosomething
next
>>>>>>>>>修改成
For i=0 to 5 do
dosomething
>>>>>不可以嗎?
dosomething這里有用到i嗎?
ShowMessage(IntToStr(I * 2)); //就这样吧//VB中的for循环相当于while
//而Delphi的for循环已经做了优化,要比while处理得快
//参考如下语句
I := 10;
for I := 0 to I do { TODO }; //说明for循环不是每次都判断条件//这些都是基础的语法问题,谁叫pascal、basic不是你我发明的 :)