请高手赐教!!! (100分)

  • 主题发起人 主题发起人 coolbaby
  • 开始时间 开始时间
C

coolbaby

Unregistered / Unconfirmed
GUEST, unregistred user!
在delphi的active form的thread中如何调用active form上的vcl控件,
比如在应用程序中,直接用form1.nmftp1....就行了,请高手赐教!!!
 
怎么一个知道的都没有?
难道真没人会么?
 
to coolbaby:
如果你解决了此问题,请将答案告诉我,行不?
E_mail: csgcsw@163.net
 
既然没人会,能不能给我提个建议?
 
你可以添加一个方法
tform1.callnmftp(string param1)
begin
nmftp1.
....
end;

 
你可以添加一个方法
tform1.callnmftp(string param1)
begin
nmftp1.
....
end;



不太明白,能不能具体点
activeform里哪有tform1?
 
procedure TAFormX01.SetHostName(const AHostName: WideString);
begin
NMFTP1.Host := String(AHostName);
end;
//TAFormX01是ActiveForm的类名
 
关注!!!
我只是在脚本中调用过active form的方法来控制上面的VCL控件。在线程中就不知了。
 
这个问题算了!
谁说说active form在应用程序中与在网页中用有什么区别?
我就给分!
 
通过USES不可以吗?或者加上同步就可以了。其实Active Form的实质就是一个ActiveX
组件,你可以通过代码观察知道。
 
多人接受答案了。
 
定义一个变量;
var AcitveFormX:TActiveFormX
然后在initialization的最后
加上
ActiveFormX := TActiveFormX.Create(Application);

然后可以用ActiveFormx.来调用此窗体上的控件
还有线程调用还应用Synchronize来同步
 
后退
顶部