请问怎样将form转化成activex控件?(100分)

  • 主题发起人 主题发起人 sinchoo
  • 开始时间 开始时间
S

sinchoo

Unregistered / Unconfirmed
GUEST, unregistred user!
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1777522
 
首先生成一个ActiveForm工程保存在一目录下。建立一个和应用程序主窗体一样大小的
activeForm,将你需要包装的程序的文件全部拷贝到此目录下,将其添加到ActiveForm程序
中的uses部分,并声明如(var testForm:TForm1;)并在ActiveForm的onCreate事件中添加:
begin
testForm:=TForm1.Create(self);
testForm.parent:=self;
testForm.Align:=clClient;
testForm.Borderstyle:=bsNone;
testForm.visible:=true;
end;
在ActiveForm的销毁事件中加入;
begin
testForm.Free;
end;
编译后设置Project/Web Deploy Oprtions设置Web 服务器的根目录
然后Project/Web Deploy 发布
注:几乎任何应用程序都可用此方法包装成ActiveForm发布!该ActiveFormde
ocx文件将自动产生
 
那怎么进行接口的定义呢?
 
在Project菜单下面会有Type Libary 选项,进去就可以编辑COM接口
Delphi会帮你自动生成property和procedure
 
多谢lipeng2002![:)]
 

Similar threads

S
回复
0
查看
908
SUNSTONE的Delphi笔记
S
S
回复
0
查看
885
SUNSTONE的Delphi笔记
S
后退
顶部