学习-使用教程12自定义对话框

InstallShield12——自定义有时需要对安装程序自定义框，以增加一些功能，下面举例讲述如何自定义一个框1、新增框进入“UserInterface”下的“Dialog”，右击“AllDialogs”，选择“NewDialog...”，在向导的第这个有一个地方一定不能漏掉：窗体等控件的“ResourceIdentifier”的值，这个值在后面的中对窗体或控件进行控制时要用到，假设将这个窗体的“ResourceIdentifier”值设为“10333”。2、写首先要新增一个文件，过程如下：在“BehaviorandLogic”中选择“InstallScript”，右击“File”选择“NewScriptFile”，新增一个RUL文件，将这个文件的文件名改成新增的框相同的#defineRES_DIALOG_ID 10333//框的ID#defineRES_PBUT_NEXT //Next的ID#defineRES_PBUT_CANCEL //OK的ID#defineRES_PBUT_BACK //BACK的ID#defineRES_PLIST_RESULT 1302//LIST控件的ID#includeprototypeCheckIE();functionSTRINGszDialogName,szDLLName,szDialog;NUMBERnDialog,nResult,nCmdValue; NUMBERnCtrlId,nType; //szDialogName="自定义框";hInstance=0;//默认值szDLLName=""; hwndParent=0;//参数保留，必须为0nResult=DefineDialog(szDialogName,hInstance,szDLLName,RES_DIALOG_ID,szDialog,hwndParent,HWND_INSTALL,if(nResult<0)bDone=TRUE;bDone=//显示框，nComValue返回在框中的事件，如果正常，返回ControlIDnCmdValue=WaitOnDialog(szDialogName);switch(nCmdValue)//关闭窗DocaseMessageBox("无法显示自定义框",SEVERE);casehwndDlg=CmdGetHwndDlg(szDialogName);listCheckResultListCreate(STRINGLIST);定义一个LIST字置成不可

//IE，此处是这个自定义框要实现的功nResult=CheckIE();ifnResult=1thenif(listCheckResult!=LIST_NULL)ListAddString(listCheckResult,"IE版本小于6",AFTER);//List中添hwndItemGetDlgItem(hwndDlg,RES_PBUT_NEXT把下一步按钮EnableWindow(hwndItem,FALSE);//把下一步按钮置成hwndItem=GetDlgItem(hwndDlg,RES_PBUT_NEXT);EnableWindow(hwndItem,TRUE);//List的内容添加到LISTBOX控件if(nResult!=0)thenbDone=FALSE;caseRES_PBUT_CANCEL:SdCloseDlg(hwndDlg,nType,bDone);caseRES_PBUT_NEXT:nType=NEXT;bDone=nType=BACK;bDone=TRUE;untilbDone;//关闭EndDialog//释放returnnType;//CheckIE函functionNUMBERnvType,numbernValue;szKey="SOFTWARE\\\\InternetExplorer";RegDBGetKeyValueEx(szKey,szName,nvType,s