在ActiveX控件中获取activex的安装路径
由 hubdog 于 星期六, 2015-01-10 18:57 发表
var
ModuleName: array[0..255] of Char;
Path:string;
begin
//
GetModuleFileName(HInstance,ModuleName, Length(ModuleName));
ShowMessage(ModuleName);