版权声明: 可以任意转载,转载时请务必以超链接形式标明文章原始出处和作者信息。
虽然这是一个非常简单的问题,但经常有人会问这样的问题,只能一次次解释说明,所以直接写个简单示例得了。
在事件响应函数OnEnd中添加如下代码段:
function OnEnd()
string szDLL, szReg, szCmd;
begin
szReg = WINSYSDIR ^ "regsvr32.exe";
szDLL = TARGETDIR ^ "MYDLL.dll"; //如果是MSI工程,可以用INSTALLDIR代替TARGETDIR
szCmd = "/s \"" + szDLL + "\""; //增加静默参数s, 增加 \” 防止目录路径含空格的情况。
string szDLL, szReg, szCmd;
begin
szReg = WINSYSDIR ^ "regsvr32.exe";
szDLL = TARGETDIR ^ "MYDLL.dll"; //如果是MSI工程,可以用INSTALLDIR代替TARGETDIR
szCmd = "/s \"" + szDLL + "\""; //增加静默参数s, 增加 \” 防止目录路径含空格的情况。
if (!REMOVEONLY) then
LaunchAppAndWait(szReg, szCmd, WAIT);
endif;
end;