HOWTO：如何在InstallScript脚本中完成DLL, OCX的注册

 

虽然这是一个非常简单的问题，但经常有人会问这样的问题，只能一次次解释说明，所以直接写个简单示例得了。

 

在事件响应函数OnEnd中添加如下代码段：

function
      
     OnEnd
     () 

     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
     ;