shuzhibuaa
驱动牛犊
驱动牛犊
  • 注册日期2004-02-16
  • 最后登录2004-05-26
  • 粉丝0
  • 关注0
  • 积分0分
  • 威望0点
  • 贡献值0点
  • 好评度0点
  • 原创分0分
  • 专家分0分
阅读:1528回复:0

怎样让installshield作的安装程序不在win98第一版上安装?

楼主#
更多 发布于:2004-03-31 15:10
怎样让installshield作的安装程序不在win98第一版上安装,推出安装?
我在onbegin下加了如下代码:(但是不起作用,我在win98第一版的机器上试了仍然可以安装。)。请问各位大侠如下判断windows版本号对吗?

function OnBegin()
STRING   svResult, szInfo;
    NUMBER   nvResult;
begin  

//shuzhi add begin:版本检查(驱动程序不能在98第二版之前的版本稳定运行)
if (GetSystemInfo (OS, nvResult, svResult) == 0) then
      if (nvResult==IS_WINDOWS9X) then
          GetSystemInfo (WINMINOR, nvResult, svResult);
         if (nvResult < 10 ) then  //win95
             MessageBox ("不能在windows95上安装!", SEVERE);
             exit;//abort;  
            endif;
            //if (nvResult >= 10 && !SYSINFO.WIN9X.bWin98)  then  //98第二版之前
            if (nvResult >= 10 && SYSINFO.WIN9X.bSubversion_A ) then  //98第一版,不能安装
             MessageBox ("不能在windows98第一版上安装!", SEVERE);
             exit;
         endif;
       endif;
    endif;

//shuzhi add end


    // TO DO: you may change default non-UI setting, for example
 end;

游客

返回顶部