新建了一个单元文件,在里面定义了一个这样的方法:
for i:=0 to ComponentCount-1 do
if Components[i] is TEdit then
TEdit(components[i]).Text:='';
为什么在ComponentCount和Components[i]出提示错误
是不是需要在uses后面引用什么单元文件,如果是的话,需要引用什么?
谢谢
for i:=0 to ComponentCount-1 do
if Components[i] is TEdit then
TEdit(components[i]).Text:='';
为什么在ComponentCount和Components[i]出提示错误
是不是需要在uses后面引用什么单元文件,如果是的话,需要引用什么?
谢谢
解决方案 »
- Delphi7 WebService SOAP客户端连接Tomcat SOAP服务器,有的电脑能够成功,有的电脑报错。
- delphi 10 lite能使用OLE功能吗?
- 如何设置 MaskEdit 的EditMask属性,使其为 yyyy/mm/dd 样式
- 关于计时器的问题,为何总时间大于设计的时间呢?菜鸟请教!在线等.........................
- zip问题(选择用VCLZIP,ZIPTV都不满意
- (急,求解决)合并数个Access数据库,Insert重复记录时,查询not found,Insert则报错,奇怪问题
- 大家帮帮忙delphi除了input 语句有提示输入功能,其它还有什么样的语句类似呀??
- 制作组件的时候遇到的问题。cannot create output file 'asp.dll'
- 急于寻找宽带网络方面的高手!
- 165分,参阅“如何导入成批数据?”。
- 如何取得申请进入局域网的机器的IP和机器名、密码
- 窗体的显示问题: ....各位大哥们都进来LOOK一下.
uses Classes,Forms,StdCtrls;
implementation
function test(Ttest:TForm):boolean;
var i:integer;
begin
for i:=0 to Ttest.ComponentCount-1 do
if Ttest.Components[i] is TEdit then
TEdit(Ttest.components[i]).Text:='';
end;
end.这样才可以!