Delphi开发简单ActiveX控件

2.File->New->Other->ActiveX->Active Form

3.弹出Active Form Wizard窗口，采用默认配置，单击“OK”

4.出现Form设计界面，这里添加一个Button和一个Edit控件

5.双击Button，添加事件处理代码

procedure TActiveFormX.Button1Click(Sender: TObject); begin

Edit1.Text := 'Hello World!'; end;

6.保存并编译程序

7.发布程序，Project->Web Deployment Options，弹出Web Deployment Options窗口，填写说明如下：

Target dir：C:\\Inetpub\\wwwroot（IIS目录，OCX发布的目录） Target URL：http://localhost/（OCX发布的URL）

HTML dir：C:\\Inetpub\\wwwroot（IIS目录，HTML发布的目录）

8.调试Active Form，Run->Parameters，弹出Run Parameters窗口，填写说明如下： Host Application：点击“Browser”找到IE Parameters

：

填

入

自

动

生

成

的

HTML

文

件

地

址

，

这

里

为

“C:\\Inetpub\\wwwroot\\ActiveFormProj1.htm”

9.注册ActiveX，Run->Register ActiveX Server

10.运行程序

注意：如果看不到控件，可能是IE了下载未签名的ActiveX控件，你需要修改IE的安全设置，我用的是IE6；另外FireFox需要安装插件才支持ActiveX