在delphi程序中如何自动注册COM组件???

chen6191 2007-09-23 12:04:29
我用.NET写了一个组件DTD.DLL,然后在DELPHI中调用这个组件,不过在调用之前,必须手动使用命令regasm DTD.dLL注册这个组件后,在delphi中才可以调用。
请问大家,有没有什么方法不用手动注册而是让delphi程序在运行时检测到系统如果没有注册这个DLL组件的话,就自动注册?
...全文
287 4 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
crossrowman 2007-09-25
  • 打赏
  • 举报
回复
你可以用代码调用Com Dll 中的DllRegister函数进行注册
chen6191 2007-09-25
  • 打赏
  • 举报
回复
有没人知道怎么处理啊?
谢谢啊!
xiezhenghai 2007-09-25
  • 打赏
  • 举报
回复
procedure RegisterDllConifg();
var
ARegistry: TRegistry;
begin
ARegistry := TRegistry.Create;
with ARegistry do
begin
try
RootKey := HKEY_CLASSES_ROOT; //指定根键为HKEY-LOCAL-ROOT
if OpenKey('Licenses', False) then
begin
if (not OpenKey('4250E830-6AC2-11cf-8ADB-00AA00C00905', False)) then
begin
WinExec('regsvr <DTD.DLL>', SW_NORMAL);
if OpenKey('4250E830-6AC2-11cf-8ADB-00AA00C00905', True) then
WriteString('', 'kjljvjjjoquqmjjjvpqqkqmqykypoqjquoun');
end;
end;
finally
CloseKey;
Destroy;
end;
end;
end;
chen6191 2007-09-23
  • 打赏
  • 举报
回复
有没有牛人知道啊?
自己顶

5,927

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧