使用Delphi访问硬盘序列号及SMART信息

"这篇文章主要介绍了如何在Delphi中利用系统API读取硬盘、CPU和BIOS等硬件设备的序列号，特别关注了通过S.M.A.R.T.接口获取硬盘序列号的方法。S.M.A.R.T.（Self-Monitoring, Analysis, and Reporting Technology）是一种硬盘自我监控、分析和报告的技术，用于预测硬盘的故障。在Delphi中，可以使用低级I/O控制（Ioctl）调用来访问这些信息。" 在Delphi编程中，获取硬盘序列号涉及对硬件寄存器的直接操作。通过使用`TIDERegs`记录结构，我们可以设置和传递与IDE（Integrated Drive Electronics，集成驱动电子）控制器交互所需的寄存器值。例如，`bCommandReg`字段用于设置实际的IDE命令，而`bDriveHeadReg`则指定了目标驱动器和磁头。 函数`GetIdeSerialNumber`是实现这一功能的关键，它可能包含以下步骤： 1. 首先，需要初始化一个`TIDERegs`结构体，设置必要的寄存器值以执行S.M.A.R.T.命令。这通常包括设置`bCommandReg`为特定的S.M.A.R.T.命令，如0x90（ATA passthrough command）。 2. 然后，确定要访问的物理驱动器号，通常范围在0到3之间，对应于主/从IDE接口上的设备。 3. 使用`DeviceIoControl`函数，这是一个Windows API调用，它可以执行I/O控制操作。这个函数接收设备句柄、I/O控制代码、输入缓冲区（这里可能是`TIDERegs`结构体）和输出缓冲区，以读取返回的数据。 4. 在I/O控制代码中，会使用特定的代码来请求硬盘的序列号，如`IOCTL_SMART_SEND_DRIVE_COMMAND`或`SMART_GET_VERSION`等，具体取决于要获取的信息。 5. `DeviceIoControl`函数成功执行后，可以通过解析返回的缓冲区数据来提取硬盘序列号。序列号通常存储在一个固定偏移量的位置，需要按照硬盘制造商的规格进行解码。 对于Win98系统，由于不支持原生的S.M.A.R.T. API，可能需要加载SMART VSD（Virtual System Driver）虚拟设备驱动，该驱动位于`SMARTVSD.VXD`文件，位于`\windows\system\iosubsys`目录下。 除了硬盘序列号，获取CPU序列号通常涉及使用`WMI`（Windows Management Instrumentation）服务，查询`Win32_Processor`类中的`ProcessorId`属性。BIOS序列号的获取可能涉及到读取CMOS（Complementary Metal-Oxide-Semiconductor）内存中的数据，或者通过系统BIOS接口调用。 通过理解硬件接口、Windows API和特定的硬件规范，开发者可以在Delphi中编写程序来读取各种硬件设备的序列号，这在系统识别、防盗追踪和软件授权等方面具有实际应用价值。然而，需要注意的是，这种操作通常需要管理员权限，并且在处理时需要谨慎，避免对硬件造成损坏或违反隐私法规。