不可能!
你试试这个:
procedure TForm1.Button1Click(Sender: TObject);
var a:integer;
sa:array[0..9]of byte;
Begin
for a:=0 to 9 do
Begin
sa[a]:=a;
memo1.Lines.add(inttostr(a));
End;
End;
你试试这个:
procedure TForm1.Button1Click(Sender: TObject);
var a:integer;
sa:array[0..9]of byte;
Begin
for a:=0 to 9 do
Begin
sa[a]:=a;
memo1.Lines.add(inttostr(a));
End;
End;
解决方案 »
- 在同一个工程中的不同form.如何只关闭一个,而不会关闭其它的
- 这问题可不小,不回答可惜了!
- TStringGrid怎么保持第一行不动
- ■怎样截获并处理Win + L消息?请给出详细的解释!
- delphi加access的安装问题,再线等待
- 三层结构(DCOM)中,服务器执行UpdateSQL1.ExecSQL(UpdateKind)出问题?
- 高手請進.分不夠再加
- 如何让表中的true,false在dbedit中显示为先和后两个字?
- Delphi2010里面,如何把GB2312转换为utf编码呢,在线等!!!
- delphi怎么判断某路径是否存在,例如:C:\my\slj
- 怎麼用oracle函數to_date(),to_char()寫的sql語句????
- delphi里面二进制、十六进制的表示及指针问题
或者加入b:=a;也可以,
也就是说吧控制变量户值给其他变量后就可以;
是我的delphi6有问题? 还是delphi6的监视窗口有问题?
procedure TForm1.Button1Click(Sender: TObject);
var a:integer;
sa:array[0..9]of byte;
Begin
memo1.Lines.Clear;/////加这句
for a:=0 to 9 do
Begin
sa[a]:=a;
memo1.Lines.add(inttostr(a));
End; end;
你把编译选项中的Optimization关掉,就会从0-9这样变化了。
对,他不影响结果;
优化 的说法很有道理,谢谢各位!