delphi 中如何批量为FROM上相同的控件赋值
例如:FROM1 上有 N 个相同的EDIT和COMBOBOX控件,想要一次性的将它们的TEXT属性赋值,如何操作?
如下:
var i:integer;
begin
for i:=0 to form1.ComponentCount - 1 do
begin
if(form1.Components[i] is TEdit) then
TEdit(Form1.Components[i]).Text:='';
if(form1.Components[i] is TCombobox) then
TCombobox(FORM1.Components[I]).Text:='123';
end;
end;
本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请
点击举报。