InstallShield制作JSP+TOMCAT+JDK+MYSQL(第三篇)

最新推荐文章于 2025-12-26 16:05:50 发布

原创最新推荐文章于 2025-12-26 16:05:50 发布 · 3.5k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#tomcat #jsp #mysql #jdk

本文介绍了一种在软件安装过程中展示用户配置信息并显示文件复制进度的方法。具体包括使用对话框显示用户信息如用户名、单位及安装路径等内容，同时提供文件复制进度提示。

1.复制文件，并且显示用户的配置信息,显示文件复制进度条

Dlg_ObjDialogs:
    nResult = ShowObjWizardPages(nResult);
    if (nResult = BACK) goto Dlg_SdComponentTree;

Dlg_SdStartCopy:
    szTitle = "xx系统";
    szMsg   = "安装信息准备完毕，并且获得安装权限，下一步将进行文件拷贝。";
    listStartCopy = ListCreate( STRINGLIST );

    ListAddString(listStartCopy,"客户信息：",AFTER);
ListAddString(listStartCopy,"用户名：" + szName,AFTER);
ListAddString(listStartCopy,"用户单位：" + szCompany,AFTER);
ListAddString(listStartCopy,"",AFTER);
ListAddString(listStartCopy,"程序安装路径：" + szDir,AFTER);
ListAddString(listStartCopy,"",AFTER);
//ListAddString(listStartCopy,"程序文件夹：" + szfolder,AFTER);
ListAddString(listStartCopy,"",AFTER);

switch (nSetupType)
case TYPICAL : ListAddString(listStartCopy,"安装类型：典型安装",AFTER);
case COMPACT: ListAddString(listStartCopy,"安装类型：压缩安装",AFTER);
case CUSTOM: ListAddString(listStartCopy,"安装类型：自定义安装",AFTER);
endswitch;

    nResult = SdStartCopy( szTitle, szMsg, listStartCopy );
    ListDestroy(listStartCopy);
    if (nResult = BACK) goto Dlg_ObjDialogs;

    SetStatusWindow(0, "");
    Enable(STATUSEX);
    StatusUpdate(ON, 100);

    return 0;
end;