1.打开Delphi

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

Delphi开发ActiveX控件示例_休闲


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

Delphi开发ActiveX控件示例_Delphi开发ActiveX控件示例_02

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

Delphi开发ActiveX控件示例_Delphi开发ActiveX控件示例_03

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发布的目录）

Delphi开发ActiveX控件示例_Delphi开发ActiveX控件示例_08

8.调试Active Form，Run->Parameters，弹出Run Parameters窗口，填写说明如下：
Host Application：点击“Browser”找到IE
Parameters：填入自动生成的HTML文件地址，这里为“C:\Inetpub\wwwroot\ActiveFormProj1.htm”

Delphi开发ActiveX控件示例_职场_09

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

Delphi开发ActiveX控件示例_休闲_10


10.运行程序
 

Delphi开发ActiveX控件示例_休闲_11

Delphi开发ActiveX控件示例_Delphi开发ActiveX控件示例_12


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