50分，如何分出我装的XP是professional或是home版 (50分)

  • 主题发起人 主题发起人 lfpsoft
  • 开始时间 开始时间
累不累，有IIS的是Pro版，没有IIS的是HOME版
windows/inf/sysoc.inf

[Components]
iis=iis.dll,OcEntry,iis.inf,,7
这是PRO

[Components]
iis=iis.dll,OcEntry,iis.inf,hide,7
这是HOME

 
lfpsoft@163.com
谢谢！
我可以叫我使用VS.NET的朋友帮忙查找那几个常量
 
好，已发。补充，我编程时的平台是 Windows 2000 。
 
那些常量现在正在查，等会我会放上来。
还有一个小问题，这句转为DELPHI如何转？
if( osvi.wSuiteMask & VER_SUITE_DATACENTER )
 
if( osvi.wSuiteMask & VER_SUITE_DATACENTER ) ?
 
没有办法，只好自己装个VS.NET了。
在里面看到VER_NT_WORKSTATION的值为：0x00000001;
我想应该都是这样吧？
VER_NT_WORKSTATION=$00000001;
VER_NT_SERVER = $00000003;
VER_SUITE_PERSONAL = $00000200;
VER_SUITE_DATACENTER = $00000080;
VER_SUITE_ENTERPRISE = $00000002;
VER_SUITE_BLADE = $00000400;

我用if (osvi.wSuiteMask AND VER_SUITE_DATACENTER) then 会出错。
应该不是这样转吧？
 
是不是这样呢？
if (osvi.wSuiteMask AND VER_SUITE_DATACENTER)=VER_SUITE_DATACENTER then



 
TO：lfpsoft:
向你致敬。加入程序：
const
VER_NT_WORKSTATION=$00000001; // 工作站
VER_NT_SERVER = $00000003; // 服务器
VER_SUITE_PERSONAL = $00000200; // 个人
VER_SUITE_DATACENTER = $00000080;// 数据中心
VER_SUITE_ENTERPRISE = $00000002;// 企业
VER_SUITE_BLADE = $00000400; // 这是什么?
 
wProductType 的值不用告诉我了。呵呵，它是 2 个值，
记得搞好后，做成单元文件发上来啊。
 
您必须登录或注册才可回复。

Similar threads

不
奇淫怪巧之在Delphi中调用不申明函数 - 不得闲
回复
0
查看
876
不得闲
不
不
Delphi实现类似Android锁屏的密码锁控件 - 不得闲
回复
0
查看
971
不得闲
不
S
[教程]Delphi 下一种简单的水印图片制作方法
回复
0
查看
1K
swish
S
S
[原]Delphi2010中DataSnap高级技术(3)—DataSnap服务器如何得到客户端的IP和端口
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
[原]Delphi2010中DataSnap高级技术(3)—DataSnap服务器如何得到客户端的IP和端口
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
后退
顶部