我一直看不懂for语句,他的语句意思是从1到100,或100到1.但他下面的内容我看不懂,他这么从1到100有什么意思,希望大家举些例子,详解一下他到底在执行什么意思,帮助一下我这个菜鸟。
解决方案 »
- 怎么取得ActionList1.Actions[i]的caption ?
- mapx问题求救
- 求助:MDI主窗体无法打开子窗体!
- 三层式数据库,怎样在客户端实现数据备份到客户端磁盘
- 怎末做office2000风格菜单?
- 请教:调用同一个MIDChild窗体问题
- 把图形转变为点阵图怎样解决???
- webServices新手值得一看的帖子?Web Services 學習筆記(一)
- 高手请进:我写了一ActiveForm嵌入网页中,并在ActiveForm中调用com+组件,遇到要注册com+组件的问题
- 有谁介绍一下draw的原理和使用?
- 不怕你们笑,我是新手,帮我看下下哪里错了麻,
- 关于Delphi7 获取网页的问题
就一个递增和递减
具体的用法要在具体例子里面体现
for i:=1 too 100 do
j:=j+i;
就是执行j:=j+i 100次,而且每次加数都是当前循环的次数
var
i:integer;
sum:integer;
begin
sum:=0;
for i:=1 to 100 do
begin
sum:=sum+i;
end;
showmessage('整数1到100之和 sum='+inttostr(sum));
end;这是写在Button1的Click事件下的一个从1加到100的简单例子。
如果for的循环只有一句可以不用加begin..end
如果是2句以上就需要。
var
k,s:integer;
begin
with stringgrid1 do
for k:=1 to colcount-1 do
cells[k,0] :='第'+inttostr(k)+'列';
with stringgrid1 do
for s:=1 to rowcount-1 do
cells[0,s] :='第'+inttostr(s)+'列' ;
end;end.这是一个制作表格的。看不懂他的代码 K:=1到行-1。他这是什么意思
cells[k,0] :='第'+inttostr(k)+'列';
给stringgrid第1行中所有单元格写数据for s:=1 to rowcount-1 do//从第二行到最后一行
cells[0,s] :='第'+inttostr(s)+'列' ;
给stringgrid第1列中所有单元格写数据
colcount是一个变量名,用于存放可以变化的数字。如存放100
在下面代码中它colcount-1是循环终值
for k:=1 to colcount-1 do//从第二列到最后一列 当 colcount := 100时
就相当于
for k:=1 to 99 do====================================
这样的问题你还是多看看书!