使用方法函数
function TComponent.FindComponent(const AName: string): TComponent;
一般查询一个form中的控件 使用 form中自带的
FindComponent函数
查询一个form 一般使用Application变量中的
FindComponent函数
例子:
var
aform :TComponent;
begin
aform:=Application.FindComponent('form1') ;
if assigned(aform) then begin
try
with aform as TCustomForm do
show;
finally
end;
end;
end;