[讨论]如何用pascal检测当前操作系统的版本？

您所在位置：社区首页 — PASCAL语言讨论区 — [讨论]如何用pascal检测当前操作系统的版本？

主题：[讨论]如何用pascal检测当前操作系统的版本？

eboy01 [专家分：160] 发布于 2006-03-05 16:55:00

[em18][em18][em18]
如何用pascal检测当前操作系统的版本？
谢了先。
有用的一律30分！

沙发

Benix [专家分：720] 发布于 2006-03-07 09:50:00

我记得DOS单元下有一个函数提供这个功能具体是什么忘了 #_#

板凳

阿Ben [专家分：2200] 发布于 2006-03-10 23:00:00

uses Dos;
var
Ver: Word;
begin
Ver := DosVersion;
Writeln('This is DOS version ', Lo(Ver), '.',Hi(Ver));
end.

3 楼

eboy01 [专家分：160] 发布于 2006-03-11 11:45:00

我要的是能检测windows 的版本的程序,不是检测dos 的

4 楼

阿Ben [专家分：2200] 发布于 2006-03-11 22:12:00

显示Windows版本，我也不知道怎么办啊~
不过，可以试试这个：（不一定成功）
{$M 8192,0,0}
uses dos;
begin
  SwapVectors;
  Exec(GetEnv('COMSPEC'), '/c ver');
  SwapVectors;
end.

5 楼

eboy01 [专家分：160] 发布于 2006-03-12 14:14:00

还是不行啊，高手快进来！

您尚未登录，请登录后再回复。点此登录或注册