學(xué)習(xí)-使用教程12自定義對(duì)話框

InstallShield12——自定義有時(shí)需要對(duì)安裝程序自定義框，以增加一些功能，下面舉例講述如何自定義一個(gè)框1、新增框進(jìn)入“UserInterface”下的“Dialog”，右擊“AllDialogs”，選擇“NewDialog...”，在向?qū)У牡谶@個(gè)有一個(gè)地方一定不能漏掉：窗體等控件的“ResourceIdentifier”的值，這個(gè)值在后面的中對(duì)窗體或控件進(jìn)行控制時(shí)要用到，假設(shè)將這個(gè)窗體的“ResourceIdentifier”值設(shè)為“10333”。2、寫(xiě)首先要新增一個(gè)文件，過(guò)程如下：在“BehaviorandLogic”中選擇“InstallScript”，右擊“File”選擇“NewScriptFile”，新增一個(gè)RUL文件，將這個(gè)文件的文件名改成新增的框相同的#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;//默認(rèn)值szDLLName=""; hwndParent=0;//參數(shù)保留，必須為0nResult=DefineDialog(szDialogName,hInstance,szDLLName,RES_DIALOG_ID,szDialog,hwndParent,HWND_INSTALL,if(nResult<0)bDone=TRUE;bDone=//顯示框，nComValue返回在框中的事件，如果正常，返回ControlIDnCmdValue=WaitOnDialog(szDialogName);switch(nCmdValue)//關(guān)閉窗DocaseMessageBox("無(wú)法顯示自定義框",SEVERE);casehwndDlg=CmdGetHwndDlg(szDialogName);listCheckResultListCreate(STRINGLIST);定義一個(gè)LIST字置成不可

//IE，此處是這個(gè)自定義框要實(shí)現(xiàn)的功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的內(nèi)容添加到LISTBOX控件if(nResult!=0)thenbDone=FALSE;caseRES_PBUT_CANCEL:SdCloseDlg(hwndDlg,nType,bDone);caseRES_PBUT_NEXT:nType=NEXT;bDone=nType=BACK;bDone=TRUE;untilbDone;//關(guān)閉EndDialog//釋放returnnType;//CheckIE函functionNUMBERnvType,numbernValue;szKey="SOFTWARE\\\\InternetExplorer";RegDBGetKeyValueEx(szKey,szName,nvType,s