首页 相关文章 使用Delphi获取系列信息

使用Delphi获取系列信息

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

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

  一、 用GetDriveType函数获取磁盘信息

  Lbl_DriveType:Tlabel;

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

  //获得RootPathName所对应的磁盘驱动器信息

  DriveType:=GetDriveType(RootPathName);

  case DriveType of

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

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

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

  DRIVE_...[ 查看全文 ]

2016-02-19 标签:

使用Delphi获取系列信息的相关文章

手机页面
收藏网站 回到头部