知识大全 使用Delphi获取系列信息

Posted 信息

篇首语:贵有恒,何必三更起、五更眠、最无益,只怕一日曝、十日寒。本文由小常识网(cha138.com)小编为大家整理,主要介绍了知识大全 使用Delphi获取系列信息相关的知识,希望对你有一定的参考价值。

使用Delphi获取系列信息  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!

Delphi以其优良的可视化编程 灵活的Windows API接口 丰富的底层操作越来越受到编程爱好者的青睐

  在Delphi中 通过调用Windows API 可以很方便地获取系统信息 这有助于我们编写出更好的Windows应用程序 以下程序在Delphi For Windows x下编译通过

  一 用GetDriveType函数获取磁盘信息

  Lbl_DriveType:Tlabel;

  DriveType:WORD; //定义驱动器类型变量

  DriveType:=GetDriveType(RootPathName); //获得RootPathName所对应的磁盘驱动器信息

  case DriveType of

  DRIVE_REMOVABLE:Lbl_DriveType Caption:= 软盘驱动器 ;

  DRIVE_FIXED : Lbl_DriveType Caption:= 硬盘驱动器 ;

  DRIVE_REMOTE: Lbl_DriveType Caption:= 网络驱动器 ;

  DRIVE_CDROM: Lbl_DriveType Caption:= 光盘驱动器 ;

  DRIVE_RAMDISK: Lbl_DriveType Caption:= 内存虚拟盘 ;

  end; //将该磁盘信息显示在Lbl_DriveType中

  二 用GlobalMemoryStatus函数获取内存使用信息

  MemStatus: TMEMORYSTATUS; //定义内存结构变量

  Lbl_Memory:Tlabel;

  MemStatus dwLength := size of(TMEMORYSTATU

S);

  GlobalMemoryStatus(MemStatus); //返回内存使用信息

   Lbl_Memory Caption := format( 共有内存: %d KB 可用内存: %dKB [MemStatus dwAvailPhys div MemStatus dwTotalPhys div ]);

  //将内存信息显示在Lbl_Memory中

  三 用GetSystemInfo函数获取CPU信息

  SysInfo: TSYSTEMINFO;

  Lbl_CPUName:Tlabel;

  GetSystemInfo(SysInfo);//获得CPU信息

  case SysInfo dwProcessorType of

  PROCESSOR_INTEL_ :Lbl_CPUName Caption:=format( %d%s [SysInfo dwNumber Of Processors Intel ]);

  PROCESSOR_INTEL_ :Lbl_CPUName Caption:=format( %d%s [SysInfo dwNumber Of Processors Intel ]);

  PROCESSOR_INTEL_PENTIUM:Lbl_CPUName Caption:=format( %d%s [SysInfo dwNum

berOfProcessors Intel Pentium ]);

  PROCESSOR_MIPS_R :Lbl_CPUName Caption:=format( %d%s [SysInfo dwNumberOfProcessors MIPS R ]);

  PROCESSOR_ALPHA_ :Lbl_CPUName Caption:=format( %d%s [SysInfo dwNumberOfProcessors ALPHA ]);

cha138/Article/program/Delphi/201311/8514

相关参考

知识大全 用Delphi获取本地计算机名称和IP地址

用Delphi获取本地计算机名称和IP地址  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!本程序介绍

知识大全 Java获取网络主机信息

Java获取网络主机信息  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!  InetAddress类

纳税人可以通过哪些渠道获取涉税信息?

纳税人可以通过哪些渠道获取涉税信息  一是通过网站、电话等现代信息技术。目前,全国税务系统建立了以国家税务总局网站为龙头、省级税务机关网站为主体的税务网站群,均设置信息公开专栏。同时,通过12366纳

知识大全 获取用户的注册信息[3]

PHP网络编程:获取用户的注册信息[3]  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! 

知识大全 获取用户的注册信息[2]

PHP网络编程:获取用户的注册信息[2]  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! 

知识大全 获取用户的注册信息[1]

PHP网络编程:获取用户的注册信息[1]  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! 

知识大全 获取 SQL SERVER用户表信息游标

获取SQLSERVER用户表信息游标  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!  /*获取用户

知识大全 读写注册表与获取系统信息

VB.net2008实例:读写注册表与获取系统信息  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! 

知识大全 一个全面获取图象信息的函数getImageInfo()

一个全面获取图象信息的函数getImageInfo()  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧

知识大全 Java获取Http响应Header信息

Java获取Http响应Header信息  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!  本文中演