installshield 注册dll

function OnFirstUIAfter()
    STRING szTitle, szMsg1, szMsg2, szOpt1, szOpt2;
    NUMBER bOpt1, bOpt2;
begin
	Disable(STATUSEX);

	bOpt1   = FALSE;
    bOpt2   = FALSE;    

    if ( BATCH_INSTALL ) then
    	SdFinishReboot ( szTitle , szMsg1 , SYS_BOOTMACHINE , szMsg2 , 0 );
    else
	    SdFinish ( szTitle , szMsg1 , szMsg2 , szOpt1 , szOpt2 , bOpt1 , bOpt2 );
	endif;  
	CopyFile(INSTALLDIR^"CloudClient.dll", WINDIR ^ "Microsoft.NET\Framework\v4.0.30319\CloudClient.dll");
	CopyFile(INSTALLDIR^"HtmlAgilityPack.dll", WINDIR ^ "Microsoft.NET\Framework\v4.0.30319\HtmlAgilityPack.dll");
	CopyFile(INSTALLDIR^"Newtonsoft.Json.dll", WINDIR ^ "Microsoft.NET\Framework\v4.0.30319\Newtonsoft.Json.dll");
	LaunchAppAndWait(WINDIR ^ "Microsoft.NET\Framework\v4.0.30319\RegAsm.exe", "CloudClient.dll", WAIT);
	MessageBox("注册成功", INFORMATION);     
end;

  

原文地址:https://www.cnblogs.com/yhdkzy/p/3716672.html