江山美人番外秋夜雨寒:delphi中 关于循环命令的问题!各位帮帮

来源:百度文库 编辑:高考问答 时间:2024/04/26 15:59:17
edit1.visible:=false
edit2.visible:=false
edit3.visible:=false
edit4.visible:=false
edit5.visible:=false

以上命令用循环语句怎么做??
记得用VB时好像可以这么做
for i=1 to 5 do
edit(i).visible=false

但在DELPHI中怎么做??大家帮帮~~~

delphi没有控件数组概念
把edit1-5的tag设为123
然后
for i:=0 to ComponentCount -1 do
begin
if (Components[i].ClassName ='TEdit') and (Components[i].Tag=123) then
TEdit(Components[i]).Visible:=false;
end;

vb这样做,也是把text定义成数组的,将index改成数字就变成数字了.