我的form上有30个edit控件,如何一次性清空? rt 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var I : Integer;begin for I := 0 to Form1.ComponentCount - 1 do if (Form1.Components[I] is TEdit) then TEdit(Form1.Components[I]).Text := '';end; for i := 0 to Form1.componentCount - 1 dobegin if Form1.Componets[i] is TEdit then (component[i] as TEdit).Text :='';end; 防止屏幕抖动,解决即给分 关于DELPHI 写内存 请求大家帮忙 在线等哦 mdi应用程序问题? MDA for Delphi implementation 上面的var 中定義的變量是什麼意思? 怎么查询 某段时间内插入的数据? 安装ADOExpress时(Delphi5)的注册码问题 救命啊! 使用IDHTTP GET 方法怎么会陷进去的问题? 急!!!请教一个登录的设计问题?(40) 为什么我在程序运行中改变ADOQuery的SQL,open后不能正常执行,而我在程序设计中写入同样的SQL语句执行正常? 请各位指点
I : Integer;
begin
for I := 0 to Form1.ComponentCount - 1 do
if (Form1.Components[I] is TEdit) then
TEdit(Form1.Components[I]).Text := '';
end;
begin
if Form1.Componets[i] is TEdit then
(component[i] as TEdit).Text :='';
end;