delphi 把窗体上的所有EDIT清空怎么做

本文整理自网络，侵删。

 procedure TForm1.Button1Click(Sender: TObject); 
var i:integer; 
begin 
for i:=0 to self.ComponentCount-1 do 
begin 
if (self.Components[i] is Tedit) then 
begin 
Tedit(Components[i]).Clear;; 
end; 
end; 
end;
 

相关阅读 >>

Delphi 得到 winrar 处理解压缩文件的返回值 ？

Delphi 如何读取内存中的数据?

Delphi中把执行文件内存中的dll的代码全部保存下来

Delphi用idhttp.get访问一个网址返回403错误，但用ie浏览器访问正常

Delphi�⒆执�传入到windows目前窗口cursor所在位置

Delphi xe5 android在桌面添加快捷方式

Delphi 动态数组的释放

Delphi app 横屏和竖屏

Delphi 获取星期的函数

Delphi捕捉屏幕

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 把窗体上的所有EDIT清空怎么做