Delphi知识中心
www.delphi.ee
提供Delphi技术知识
与Delphi程序员共同进步


在线服务QQ:99923144 随时恭候您的光临
首页 基础知识 WIN系统 组件使用 组件开发 数据库 ACTIVEX 多媒体技术 网络技术 关于
文章类别:ACTIVEX    你尚未登陆,会员功能无法使用,请从 网站首页 登陆。
  程序中发布OCX  
 
程序中发布OCX

在DPR文件中
program XXX;

uses
Forms,Windows,
uMainFM in 'uMainFM.pas' {MainFM};

{$R *.RES}
Var
hLib:THandle;
PRegOcx: procedure ; stdcall;

begin
Application.Initialize;
hLib:=Loadlibrary('C:\TIDESTONE\FORMONE6\ttf16.ocx');
PRegOcx:=GetProcAddress(hLib,PChar('DllRegisterServer'));
if Assigned(PRegOcx) then
PRegOcx;

Application.CreateForm(TMainFM, MainFM);
Application.Run;
end.

 

在线服务QQ:99923144 Delphi程序员QQ群(139442)
Delphi知识中心 www.delphi.ee 最专业的Delphi技术资料网站