Install Shield安装程序制作图解 - windows编程基础

　　3、编写脚本代码

　　通过上述属性设置已经可以对程序进行安装，如果软件还需要使用序列号进行保护或是其他一些向导所没有提供的功能，也可以通过在Scripts页编写脚本代码来加以实现。例如，向导生成的脚本代码中虽然提供了用来处理用户在安装过程输入的序列号的DialogShowSdRegisterUserEx（）函数，但并未对输入的序列号进行认证，下面给出添加了序列号认证的相关代码：

function DialogShowSdRegisterUserEx()
　NUMBER nResult;
　STRING szTitle, szMsg;
　begin
　　svName = "";
　　svCompany = "";
　　szTitle = "";
　　szMsg = "";
　　Dlg_Register:
　　// 输入注册序列号

　　nResult = SdRegisterUserEx( szTitle, szMsg, svName, svCompany, svSerial );
　　if (nResult = NEXT) then
　　　// 对序列号进行认证
　　　if (StrCompare( svSerial , "ABCDEFG-HIJKLMN-OPQRST-UVWXYZ") != 0) then
　　　　MessageBox ( "输入的序列号 "+svSerial+" 不正确！" , WARNING );
　　　　// 如果序列号输入错误则重新输入序列号
　　　　goto Dlg_Register;
　　　endif;
　　endif;
　　return nResult;
end;

　　这时再运行安装程序，将真正把待安装的程序和数据进行复制，并在桌面和开始菜单创建快捷方式。如果添加了上述序列号认证代码，将只有输入正确序列号的用户才能够顺利安装程序。

Install Shield安装程序制作图解(八)