检测系统是不是windows xp

原创 2002年01月11日 09:39:00

下面的代码可以检查所用的系统是不是windows xp
uses Registry;
...

function IsWinXP: Boolean;
begin
  Result := False;
  if Win32Platform = VER_PLATFORM_WIN32_NT then
    with TRegistry.Create do
    try
      RootKey := HKEY_LOCAL_MACHINE;
      if OpenKeyReadOnly('/Software/Microsoft/Windows NT/CurrentVersion') then
        Result := (ReadString('ProductName') = 'Microsoft Windows XP');
    finally
      Free;
    end;
end;

//rock
//转载请保留此信息

WindowsXP下硬盘安装linux

寒假收拾东西,忘记把linux的光盘带回家了,现装的linux好像有点问题,决定重装,考虑一下决定不用U盘。尝试硬盘安装。当然这里不是使用wubi安装,这个就太没难度了,然后实际上wubi也不属于安装...
  • u010615418
  • u010615418
  • 2014年02月08日 16:17
  • 1051

Windows 2003和XP之间的异同

Windows 2003和XP之间的异同 收集整理了一下,给一些朋友解说server2003系统的设置。关于用server操作系统,由于不了解,对稳定性,兼容性,驱动或多或少有些疑虑...
  • sailor201211
  • sailor201211
  • 2014年05月04日 08:01
  • 1932

Windows XP 下如何播放蓝光ISO镜像?Windows XP UDF 2.5 补丁下载!

蓝光光盘的文件系统是UDF2.5,Windows XP及以下的操作系统默认不能支持这个文件系统。当我们在XP系统中使用蓝光光盘或蓝光ISO文件时,就会提示“Windows不能从此盘读取,此盘可能已损坏...
  • MaxWoods
  • MaxWoods
  • 2015年09月12日 09:42
  • 1787

使用XP自带的传真功能

Windows XP有一项免费的传真功能,用它可以轻松收发传真,不用再买传真机了。这里将发传真的具体操作步骤介绍如下,你只要照着做,一定就会收发传真。还可以用他来做打印机!  一、安装传真组件  ...
  • kepa520
  • kepa520
  • 2015年07月23日 13:01
  • 308

基于Qt 5.7.0的适合Window XP系统的应用开发

1. Qt库的编译         Qt官方对XP系统的支持止步于5.7.0版本,从5.7.1开始不再支持XP。但从官网上下载的5.7.0版本的安装包是不支持XP的,需要自己下载源码进行编译,编译的...
  • lixiaoxin1989
  • lixiaoxin1989
  • 2017年03月29日 10:42
  • 2096

打开windows xp的默认共享

XP打开默认共享$先在控制面板的“服务”,看SERVER服务是否启动,如果没有启动,则将设置为自动或者手动,然后再选择启动。 开启系统的默认共享的方法 1.检查AutoShareServer和Au...
  • s_jobs
  • s_jobs
  • 2013年12月09日 14:32
  • 1301

xp安装winPython的解决方案

WinPython是Python编程语言的免费开源的便携发行版。支持Windows Vista / 7 / 8 ,可作为科学和教育用途。最简单的方法来运行 Python、Spyder 和 SciPy ...
  • zzsfqiuyigui
  • zzsfqiuyigui
  • 2016年06月19日 23:46
  • 3011

svn 在xp系统上安装服务器端和客户端

一、下载所需文件   服务器:Subversion v1.7 http://sourceforge.net/projects/win32svn/   客户端:Tortoisesvn V1....
  • zhangli13629847100
  • zhangli13629847100
  • 2015年03月12日 10:09
  • 2566

利用虚拟机在windows XP下安装ubuntu操作系统

http://wenku.baidu.com/view/e1d7c66aa98271fe910ef9e5.html#   说明:本安装过程原计划一次写完,由于时间关系,分成两部分,建议想...
  • weiqubo
  • weiqubo
  • 2013年04月18日 16:12
  • 3868

xp下搭建SVN服务器

本节和大家谈谈Windows下SVN服务器搭建问题,在这里拿出来和大家分享一下,希望对大家有用。  1,软件下载  Windows下SVN服务器搭建,下载Subversion服务器...
  • tpfgfxz
  • tpfgfxz
  • 2013年11月07日 23:16
  • 3913
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:检测系统是不是windows xp
举报原因:
原因补充:

(最多只允许输入30个字)