如何把FORM上的信息传给ACTIVEXFORM (50分)

  • 主题发起人 主题发起人 我是天边的一片云
  • 开始时间 开始时间

我是天边的一片云

Unregistered / Unconfirmed
GUEST, unregistred user!
有两个窗体ACTIVEXFORM和FORM,各有EDIT控件,怎样才能把如何把FORM.EDIT上的信息传给ACTIVEXFORM.EDIT
也就是FORM上如何调用ACTIVEXFORM上的控件
 
你先把activex 定义好了以后
然后通过控件的属性把他加进form中
比如o类的名是test
你可以这样传递
edit1.text:=test.edit.text
 
先找出ACTIVEXFORM的form句柄,再找出ACTIVEXFORM.EDIT 的句柄,然后
在form那PostMessage给ACTIVEXFORM.EDIT

具体做法请参考以前的帖子
 
在form 中访问ActiveXForm:
先在ActiveXForm中添加一BSTR类型的属性EditValue,然后在这个属性的Read过程中写
Result:=edit1.text;在Write过程中写Edit1.text:=value;
如果在Form中要访问它,var ocx:olevariant;
ocx:=createoleobjec('ActiveXProj.Form1');//ActiveXProj指你的ocx文件名,Form1是窗体类名。
ocx.EditValue:='kdjfa';//设置ActiveXForm中Edit的值
Showmessage(ocx.EditValue);/读取



 
多人接受答案了。
 
后退
顶部