LIST listData;//聲明listData
listData = ListCreate(STRINGLIST);//創建一個空的實際字符串或數字列表。
//參數都是在上個界面中賦值,然后在下個或者后續界面中使用,如svName和svCompany等參數。
/*
ListId = ListCreate(nListType)
參數:nListType:
??? NUMBERLIST:指定一個數字列表
??? STRINGLIST:指定一個字符串列表
返回值:
??? ListId:新創建的空的列表的ID
//-------------------------我是分格線--------------------------------------
ListAddString(listID,szString,nPlacementFlag)
參數:
listID:指定一個字符串列表的名稱。ListCreate函數初始化。
szString:指定添加到列表中的字符串
nPlacementFlag指定在哪兒放置和當前元素相關的szString。新字符串可以在當前元素之前或之后。在該參數位置傳遞下列預定義常量之一:
AFTER:將新字符串添加到列表中當前元素之后。
BEFORE:將新字符串添加到列表中當前元素之前。返回值:
0:ListAddString成功添加字符串到列表。
< 0:ListAddString未能添加字符串到列表。注解:
·ListAddString僅工作于字符串列表。*/
ListAddString(listData,"用戶安裝信息:",AFTER);
ListAddString(listData,"??? 用戶名:"+svName,AFTER);
ListAddString(listData,"??? 公司名:"+svCompany,AFTER);
ListAddString(listData,"",AFTER);switch (nResult)
??? case TYPICAL:
??????? svSetupType = "典型";
??? case COMPLETE:
??????? svSetupType = "全部";
??? //case COMPACT:
??????? //svSetupType = "COMPACT: Application will be installed " +
????????????????????? //"with the minimum required options.";
??? case CUSTOM:
??????? svSetupType = "定制";
??? default:
??????? MessageBox ("無效的安裝類型", SEVERE);
??????? abort;
endswitch;???
?
?
?
ListAddString(listData, "安裝類型:"+svSetupType, AFTER);
?? ListAddString(listData, "", AFTER);
?
Dlg_SdStartCopy:
??? szTitle = "";
??? szMsg?? = "";
??? nResult = SdStartCopy( szTitle, szMsg,listData );???????????
??? if (nResult = BACK) then
?????? goto Dlg_SQL;
??? endif;
更多文章、技術交流、商務合作、聯系博主
微信掃碼或搜索:z360901061

微信掃一掃加我為好友
QQ號聯系: 360901061
您的支持是博主寫作最大的動力,如果您喜歡我的文章,感覺我的文章對您有幫助,請用微信掃描下面二維碼支持博主2元、5元、10元、20元等您想捐的金額吧,狠狠點擊下面給點支持吧,站長非常感激您!手機微信長按不能支付解決辦法:請將微信支付二維碼保存到相冊,切換到微信,然后點擊微信右上角掃一掃功能,選擇支付二維碼完成支付。
【本文對您有幫助就好】元
