用Delphi开发简单ActiveX控件

Posted on 2008-07-16 09:27  白兴科技  阅读(1811)  评论(1编辑  收藏  举报
1.打开Delphi

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。

Copyright © 2024 白兴科技
Powered by .NET 9.0 on Kubernetes