如何使用c++builder来获取CPU及硬盘序列号？

zhangsc 2009-10-10 08:41:19
如何使用c++builder来获取CPU及硬盘序列号？最好能提供能在c++builder环境下运行的源代码，谢谢！
...全文
1680 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
dxgxk 2009-10-20
  • 打赏
  • 举报
 回复
// ReadPhysicalDriveOnW9X_Ring0()
//
// dwBaseAddress = IDE(0,1,2,3) : 1F0h, 170h, 1E8h, 168h
// btMasterSlave = Master(0xA0) Or Slave(0xB0)
//---------------------------------------------------------------------------
void __fastcall ReadPhysicalDriveOnW9X_Ring0(bool bIsFirst, WORD dwBaseAddress,
BYTE btMasterSlave, bool &bIsIDEExist, bool &bIsDiskExist, WORD *pOutData)
{
BYTE btIDTR1[6];
DWORD dwOldExceptionHook;
const int nHookExceptionNo = 5;

BYTE btIsIDEExist = 0;
BYTE btIsDiskExist = 0;
WORD wOutDataBuf[256];

BYTE btIsFirst = (BYTE)bIsFirst;

const BYTE btBit00 = 0x01;
// const BYTE btBit02 = 0x04;
const BYTE btBit06 = 0x40;
const BYTE btBit07 = 0x80;
// const BYTE btERR = btBit00;
const BYTE btBusy = btBit07;
const BYTE btAtaCmd = 0xEC;
const BYTE btAtapiCmd = 0xA1;

__asm
{
// 必须先执行这条语句
JMP EnterRing0

// 定义过程
// 等待IDE设备直到其不为忙为止
WaitWhileBusy proc

MOV EBX, 100000
MOV DX, dwBaseAddress
ADD DX, 7

LoopWhileBusy:

DEC EBX
CMP EBX, 0
JZ Timeout
in AL, DX
TEST AL, btBusy
JNZ LoopWhileBusy
JMP DriveReady

// 超时，直接退出
Timeout:
JMP LeaveRing0
DriveReady:
RET
ENDP // End of WaitWhileBusy Procedure

// 设置主盘和从盘标志
SelectDevice proc

MOV DX, dwBaseAddress
ADD DX, 6
MOV AL, btMasterSlave

out DX, AL
RET

ENDP // End of SelectDevice Procedure

// 向IDE设备发送存取指令
SendCmd proc

MOV DX, dwBaseAddress
ADD DX, 7
MOV AL, BL // BL是主从盘标识，在过程外设置
out DX, AL
RET
ENDP // End of SendCmd Procedure

// Ring0代码
Ring0Proc:
PUSHAD
// 查询IDE设备是否存在
MOV DX, dwBaseAddress
ADD DX, 7
in AL,DX

// 当AL的值是0xFF或者0x7F时，IDE设备不存在，这时候直接返回
CMP AL,0xFF
JZ LeaveRing0
CMP AL, 0x7F
JZ LeaveRing0

// 设置IDE设备存在标志
MOV btIsIDEExist, 1

// 查询IDE设备上的驱动器是否存在（有IDE插槽在主板上，但是却不一定有硬盘插在上面）
CALL WaitWhileBusy
CALL SelectDevice

// 如果是第一次调用，则直接返回，否则执行下行语句时会出现蓝屏
CMP btIsFirst, 1
JZ LeaveRing0

// 第一次调用时，如果执行这行语句会导致蓝屏，Why？？？
CALL WaitWhileBusy

// AL的值等于cBit06时，不存在驱动器，直接返回
TEST AL, btBit06
JZ LeaveRing0

// 设置驱动器存在标志
MOV btIsDiskExist, 1

// 发送存取端口命令
// 无法像NT/2000/XP那样可以通过查询VERSION的值得到驱动器的类型，
// 所以只能一步一步地测试，如果不是ATA设备，再尝试使用ATAPI设备命令
CALL WaitWhileBusy
CALL SelectDevice // 设置主从盘标识
MOV BL, btAtaCmd // 发送读取命令
CALL SendCmd
CALL WaitWhileBusy

// 检查是否出错
MOV DX, dwBaseAddress
ADD DX, 7

in AL, DX

TEST AL, btBit00
JZ RetrieveInfo // 没有错误时则读数据

// 如果出错，则进一步尝试使用ATAPI设备命令
CALL WaitWhileBusy
CALL SelectDevice
MOV BL, btAtapiCmd
CALL SendCmd
CALL WaitWhileBusy

// 检查是否还出错
MOV DX, dwBaseAddress
ADD DX, 7
in AL, DX
TEST AL, btBit00
JZ RetrieveInfo // 没有错误时则读数据
JMP LeaveRing0 // 如果还是出错，直接返回

// 读取数据
RetrieveInfo:

LEA EDI, wOutDataBuf
MOV ECX, 256
MOV DX, dwBaseAddress
CLD

REP INSW

// 退出Ring0代码
LeaveRing0:

POPAD
IRETD

// 激活Ring0代码
EnterRing0:

// 修改中断门
SIDT FWORD PTR btIDTR1
MOV EAX, DWORD PTR btIDTR1 + 02h
ADD EAX, nHookExceptionNo * 08h + 04h
CLI

// 保存原异常处理例程入口
MOV ECX, DWORD PTR [EAX]
MOV CX, WORD PTR [EAX-04h]
MOV dwOldExceptionHook, ECX

// 指定新入口
LEA EBX, Ring0Proc
MOV WORD PTR [EAX-04h],BX
SHR EBX, 10h
MOV WORD PTR[EAX+02h], BX

// 激活Ring0代码
INT nHookExceptionNo

// 复原入口
MOV ECX,dwOldExceptionHook
MOV WORD PTR[EAX-04h], CX
SHR ECX,10h
MOV WORD PTR[EAX+02h], CX
STI
}
if(!bIsFirst)
{
bIsIDEExist = (bool)btIsIDEExist;
bIsDiskExist = (bool)btIsDiskExist;
CopyMemory(pOutData, wOutDataBuf, sizeof(wOutDataBuf));
}
}

AnsiString TForm1::ReadHddSn()
{
AnsiString s;
TStringList *Sn_List=new TStringList;
TStringList *Mode_List=new TStringList;
ReadPhysicalDrive(Sn_List, Mode_List);
s=Sn_List->Strings[0].TrimLeft();
delete Sn_List;
delete Mode_List;
return s;
}



//------------------------------------------------
用法：AnsiString HddSn=ReadHddSn();
dxgxk 2009-10-20
  • 打赏
  • 举报
 回复
// DoIdentify
bool __fastcall DoIdentify(HANDLE hPhysicalDriveIOCTL, PSENDCMDINPARAMS pSCIP,
PSENDCMDOUTPARAMS pSCOP, BYTE btIDCmd, BYTE btDriveNum,
PDWORD pdwBytesReturned)
{
// Set up data structures for IDENTIFY command.
pSCIP->cBufferSize = IDENTIFY_BUFFER_SIZE;
pSCIP->irDriveRegs.bFeaturesReg = 0;
pSCIP->irDriveRegs.bSectorCountReg = 1;
pSCIP->irDriveRegs.bSectorNumberReg = 1;
pSCIP->irDriveRegs.bCylLowReg = 0;
pSCIP->irDriveRegs.bCylHighReg = 0;

// Compute the drive number.（主盘和从盘所对应的值是不一样的）
pSCIP->irDriveRegs.bDriveHeadReg = (btDriveNum & 1) ? 0xB0 : 0xA0;

// The command can either be IDE identify or ATAPI identify.
pSCIP->irDriveRegs.bCommandReg = btIDCmd;
pSCIP->bDriveNumber = btDriveNum;
pSCIP->cBufferSize = IDENTIFY_BUFFER_SIZE;

return DeviceIoControl(hPhysicalDriveIOCTL, DFP_RCV_DRIVE_DATA,
(LPVOID)pSCIP,
sizeof(SENDCMDINPARAMS) - 1,
(LPVOID)pSCOP,
sizeof(SENDCMDOUTPARAMS) + IDENTIFY_BUFFER_SIZE - 1,
pdwBytesReturned, NULL);
}
//---------------------------------------------------------------------------
// Windows 95/98/ME 代码
//---------------------------------------------------------------------------
// ReadPhysicalDriveOnW9X
void __fastcall ReadPhysicalDriveOnW9X(TStrings *pSerList, TStrings *pModeList)
{
WORD wOutData[256];
SetPriorityClass(GetCurrentProcess(), REALTIME_PRIORITY_CLASS);

// 经过测试，发现第一次调用而且Drive >= 2时会在Ring0代码中出现错误，导致蓝屏。
// 经过N（N > 15）次的蓝屏后仍找不到原因：（，不得不在这里增加一段无用代码以
// 避免蓝屏的出现。（期待高人能指出原因）
for(int nDrive = 0; nDrive < 8; nDrive++)
{
WORD dwBaseAddress;
BYTE btMasterSlave; // Master Or Slave
bool bIsIDEExist;
bool IsDiskExist;

switch(nDrive / 2)
{
case 0: dwBaseAddress = 0x01F0; break;
case 1: dwBaseAddress = 0x0170; break;
case 2: dwBaseAddress = 0x01E8; break;
case 3: dwBaseAddress = 0x0168; break;


}

btMasterSlave = (BYTE)(((nDrive % 2) == 0) ? 0xA0 : 0xB0);

// 进入Ring0
ReadPhysicalDriveOnW9X_Ring0(true, dwBaseAddress, btMasterSlave,
bIsIDEExist, IsDiskExist, wOutData);
}

// 开始读取
for(int nDrive = 0; nDrive < 8; nDrive++)
{
WORD dwBaseAddress;
BYTE btMasterSlave; // Master Or Slave
bool bIsIDEExist;
bool bIsDiskExist;
switch(nDrive / 2)
{
case 0: dwBaseAddress = 0x01F0; break;
case 1: dwBaseAddress = 0x0170; break;
case 2: dwBaseAddress = 0x01E8; break;
case 3: dwBaseAddress = 0x0168; break;
}

btMasterSlave = (BYTE)(((nDrive % 2) == 0) ? 0xA0 : 0xB0);

// 进入Ring0
bIsIDEExist = false;
bIsDiskExist = false;
ZeroMemory(wOutData, sizeof(wOutData));

ReadPhysicalDriveOnW9X_Ring0(false, dwBaseAddress, btMasterSlave,
bIsIDEExist, bIsDiskExist, wOutData);

if(bIsIDEExist && bIsDiskExist)
{
DWORD dwDiskData[256];
char szSerialNumber[21];
char szModelNumber[41];

for(int k=0; k < 256; k++)
dwDiskData[k] = wOutData[k];

// 取系列号
ZeroMemory(szSerialNumber, sizeof(szSerialNumber));
strcpy(szSerialNumber, ConvertToString(dwDiskData, 10, 19));

// 取模型号
ZeroMemory(szModelNumber, sizeof(szModelNumber));
strcpy(szModelNumber, ConvertToString(dwDiskData, 27, 46));

pSerList->Add(szSerialNumber);
pModeList->Add(szModelNumber);
}
}
SetPriorityClass(GetCurrentProcess(), NORMAL_PRIORITY_CLASS);
}
//---------------------------------------------------------------------------
dxgxk 2009-10-20
  • 打赏
  • 举报
 回复
//读硬盘序列号代码------------------------------------------------------------

#include <WinIOCtl.h>
#include <stdio.h>

#pragma inline
//---------------------------------------------------------------------------
// IDE NT/2000/XP专用变量
#define GETVERSIONOUTPARAMS GETVERSIONINPARAMS
#define DFP_GET_VERSION SMART_GET_VERSION
#define DFP_SEND_DRIVE_COMMAND SMART_SEND_DRIVE_COMMAND
#define DFP_RCV_DRIVE_DATA SMART_RCV_DRIVE_DATA


const WORD IDE_ATAPI_IDENTIFY = 0xA1; // 读取ATAPI设备的命令
const WORD IDE_ATA_IDENTIFY = 0xEC; // 读取ATA设备的命令

const int MAX_IDE_DRIVES = 4;

// SCSI专用变量
const DWORD FILE_DEVICE_SCSI = 0x0000001B;
const DWORD IOCTL_SCSI_MINIPORT_IDENTIFY = ((FILE_DEVICE_SCSI << 16) + 0x0501);
const DWORD IOCTL_SCSI_MINIPORT = 0x0004D008; // see NTDDSCSI.H for definition
const DWORD SENDIDLENGTH = sizeof(SENDCMDOUTPARAMS) + IDENTIFY_BUFFER_SIZE;

typedef struct _SRB_IO_CONTROL
{
ULONG HeaderLength;
UCHAR Signature[8];
ULONG Timeout;
ULONG ControlCode;
ULONG ReturnCode;
ULONG Length;
}SRB_IO_CONTROL, *PSRB_IO_CONTROL;

// 读取的主函数
void __fastcall ReadPhysicalDrive(TStrings *pSerList, TStrings *pModeList);

// 辅助函数
char *__fastcall ConvertToString(DWORD dwDiskData[256], int nFirstIndex, int nLastIndex);
// NT/2000/XP函数
void __fastcall ReadPhysicalDriveOnNT(TStrings *pSerList, TStrings *pModeList);
bool __fastcall DoIdentify(HANDLE hPhysicalDriveIOCTL, PSENDCMDINPARAMS pSCIP,
PSENDCMDOUTPARAMS pSCOP, BYTE btIDCmd,
BYTE btDriveNum, PDWORD lpcbBYTEsReturned);
// Windows 9X函数
void __fastcall ReadPhysicalDriveOnW9X(TStrings *pSerList, TStrings *pModeList);
void __fastcall ReadPhysicalDriveOnW9X_Ring0(bool IsFirst, WORD BaseAddress,
BYTE MoS, bool &IsIDEExist, bool &IsDiskExist, WORD *OutData);

// SCSI读取函数(for NT/2000/XP)
String __fastcall ReadIDEDriveAsScsiDriveOnNT();
//---------------------------------------------------------------------------
// ReadPhysicalDrive
void __fastcall ReadPhysicalDrive(TStrings *pSerList, TStrings *pModeList)
{
switch(Win32Platform)
{
case VER_PLATFORM_WIN32_WINDOWS:
ReadPhysicalDriveOnW9X(pSerList, pModeList);
break;
case VER_PLATFORM_WIN32_NT:
ReadPhysicalDriveOnNT(pSerList, pModeList);
break;
default:
break;
}
}
//---------------------------------------------------------------------------
// ConvertToString
char *__fastcall ConvertToString(DWORD dwDiskData[256], int nFirstIndex, int nLastIndex)
{
static char szResBuf[1024];
int nIndex = 0;
int nPosition = 0;

// Each integer has two characters stored in it backwards
for(nIndex = nFirstIndex; nIndex <= nLastIndex; nIndex++)
{
// Get high BYTE for 1st character
szResBuf[nPosition] = (char)(dwDiskData[nIndex] / 256);
nPosition++;

// Get low BYTE for 2nd character
szResBuf[nPosition] = (char)(dwDiskData[nIndex] % 256);
nPosition++;
}

// End the string
szResBuf[nPosition] = '\0';

// Cut off the trailing blanks
for(nIndex = nPosition - 1; nIndex > 0 && ' ' == szResBuf[nIndex]; nIndex--)
szResBuf[nIndex] = '\0';

return szResBuf;
}
//---------------------------------------------------------------------------
// Winndows NT4/2000/XP 代码
//---------------------------------------------------------------------------
// ReadPhysicalDriveOnNT
void __fastcall ReadPhysicalDriveOnNT(TStrings *pSerList, TStrings *pModeList)
{
// 输出参数
BYTE btIDOutCmd[sizeof(SENDCMDOUTPARAMS) + IDENTIFY_BUFFER_SIZE - 1];

for(int nDrive=0; nDrive < MAX_IDE_DRIVES; nDrive++)
{
HANDLE hPhysicalDriveIOCTL;
char szDriveName[32];

sprintf(szDriveName, "\\\\.\\PhysicalDrive%d", nDrive);
hPhysicalDriveIOCTL = CreateFile(szDriveName,
GENERIC_READ | GENERIC_WRITE,
FILE_SHARE_READ | FILE_SHARE_WRITE, NULL,
OPEN_EXISTING, 0, NULL);

if(hPhysicalDriveIOCTL != INVALID_HANDLE_VALUE)
{
DWORD dwBytesReturned = 0;
GETVERSIONOUTPARAMS gvopVersionParams;

// Get the version, etc of PhysicalDrive IOCTL
ZeroMemory(&gvopVersionParams, sizeof(GETVERSIONOUTPARAMS));

if(!DeviceIoControl(hPhysicalDriveIOCTL, DFP_GET_VERSION,
NULL, 0, &gvopVersionParams, sizeof(gvopVersionParams),
&dwBytesReturned, NULL))
{
continue;
}

if(gvopVersionParams.bIDEDeviceMap > 0)
{
// IDE or ATAPI IDENTIFY cmd
BYTE btIDCmd = 0;
SENDCMDINPARAMS InParams;
// Now, get the ID sector for all IDE devices in the system.
// If the device is ATAPI use the IDE_ATAPI_IDENTIFY command,
// otherwise use the IDE_ATA_IDENTIFY command
// 具体所得结果请参考头文件中的说明
btIDCmd = (gvopVersionParams.bIDEDeviceMap >> nDrive & 0x10) ?
IDE_ATAPI_IDENTIFY : IDE_ATA_IDENTIFY;
ZeroMemory(&InParams, sizeof(SENDCMDINPARAMS));
ZeroMemory(btIDOutCmd, sizeof(btIDOutCmd));

if(DoIdentify(hPhysicalDriveIOCTL,
&InParams, (PSENDCMDOUTPARAMS)btIDOutCmd,
(BYTE)btIDCmd, (BYTE)nDrive, &dwBytesReturned))
{
DWORD dwDiskData[256];
USHORT *pIDSector; // 对应结构IDSECTOR，见头文件
char szSerialNumber[21];
char szModelNumber[41];

pIDSector = (USHORT*)((SENDCMDOUTPARAMS*)btIDOutCmd)->bBuffer;
for(int i=0; i < 256; i++)
dwDiskData[i] = pIDSector[i];
// 取系列号
ZeroMemory(szSerialNumber, sizeof(szSerialNumber));
strcpy(szSerialNumber, ConvertToString(dwDiskData, 10, 19));

// 取模型号
ZeroMemory(szModelNumber, sizeof(szModelNumber));
strcpy(szModelNumber, ConvertToString(dwDiskData, 27, 46));

pSerList->Add(szSerialNumber);
pModeList->Add(szModelNumber);
}
}
CloseHandle (hPhysicalDriveIOCTL);
}
}
}
//---------------------------------------------------------------------------
flymoon99 2009-10-19
  • 打赏
  • 举报
 回复
这些代码不太管用，很多克隆版的XP，你取到的信息都一样的，甚至是空。另外，那个所谓取硬盘序列号的也只是取分卷序列号，不是物理序列号，一重装系统就变了。
cptang 2009-10-16
  • 打赏
  • 举报
 回复
mark
肆水東澤 2009-10-10
  • 打赏
  • 举报
 回复
以下是获取CPU的，不过只有分页尺寸、最大最小寻址空间，CPU数目和类型



//---------------------------------------------------------------------------



#ifndef MainFormH

#define MainFormH

//---------------------------------------------------------------------------

#include <Classes.hpp>

#include <Controls.hpp>

#include <StdCtrls.hpp>

#include <Forms.hpp>

#include <Buttons.hpp>

//---------------------------------------------------------------------------

class TForm1 : public TForm

{

__published:	// IDE-managed Components

        TGroupBox *GroupBox1;

        TLabel *Label1;

        TEdit *Edit1;

        TLabel *Label2;

        TLabel *Label3;

        TLabel *Label4;

        TLabel *Label5;

        TEdit *Edit2;

        TEdit *Edit3;

        TEdit *Edit4;

        TEdit *Edit5;

        TBitBtn *BitBtn1;

        TBitBtn *BitBtn2;

        void __fastcall BitBtn2Click(TObject *Sender);

        void __fastcall BitBtn1Click(TObject *Sender);

private:	// User declarations

public:		// User declarations

        __fastcall TForm1(TComponent* Owner);

};

//---------------------------------------------------------------------------

extern PACKAGE TForm1 *Form1;

//---------------------------------------------------------------------------

#endif








//---------------------------------------------------------------------------



#include <vcl.h>

#pragma hdrstop



#include "MainForm.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)

        : TForm(Owner)

{

   this->Edit1->Text="";

   this->Edit2->Text="";

   this->Edit3->Text="";

   this->Edit4->Text="";

   this->Edit5->Text="";

}

//---------------------------------------------------------------------------



void __fastcall TForm1::BitBtn2Click(TObject *Sender)

{

   this->Close();

}

//---------------------------------------------------------------------------



void __fastcall TForm1::BitBtn1Click(TObject *Sender)

{

  SYSTEM_INFO si;

  GetSystemInfo(&si);

  this->Edit1->Text=IntToStr(si.dwPageSize);

  this->Edit2->Text=IntToStr(Integer(si.lpMinimumApplicationAddress));

  this->Edit3->Text=IntToStr(Integer(si.lpMaximumApplicationAddress));

  this->Edit4->Text=IntToStr(si.dwNumberOfProcessors);

  switch(si.dwProcessorType)

  {

    case 386:

    case 486:

       this->Edit5->Text="Intel 80"+IntToStr(si.dwProcessorType);

       break;

    case 586:

       this->Edit5->Text="Intel Pentium"+IntToStr(si.dwProcessorType);

       break;

    default:

       this->Edit5->Text="非Intel处理器";

  }

}

//---------------------------------------------------------------------------
肆水東澤 2009-10-10
  • 打赏
  • 举报
 回复
还有个简单的，就是获取硬盘的序列号，标名和文件系统名
这个只针对硬盘的，没有CPU的



//---------------------------------------------------------------------------



#ifndef MainFormH

#define MainFormH

//---------------------------------------------------------------------------

#include <Classes.hpp>

#include <Controls.hpp>

#include <StdCtrls.hpp>

#include <Forms.hpp>

#include <Buttons.hpp>

#include <FileCtrl.hpp>

//---------------------------------------------------------------------------

class TForm1 : public TForm

{

__published:	// IDE-managed Components

        TGroupBox *GroupBox1;

        TLabel *Label1;

        TDriveComboBox *DriveComboBox1;

        TBitBtn *BitBtn1;

        TLabel *Label2;

        TLabel *Label3;

        TLabel *Label4;

        TEdit *Edit1;

        TEdit *Edit2;

        TEdit *Edit3;

        void __fastcall BitBtn1Click(TObject *Sender);

private:	// User declarations

public:		// User declarations

        __fastcall TForm1(TComponent* Owner);

};

//---------------------------------------------------------------------------

extern PACKAGE TForm1 *Form1;

//---------------------------------------------------------------------------

#endif









//---------------------------------------------------------------------------



#include <vcl.h>

#pragma hdrstop



#include "MainForm.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)

        : TForm(Owner)

{

   this->Edit1->Text="";

   this->Edit2->Text="";

   this->Edit3->Text="";

}

//---------------------------------------------------------------------------

void __fastcall TForm1::BitBtn1Click(TObject *Sender)

{

  char cDrive=this->DriveComboBox1->Drive;

  AnsiString StrDrive=cDrive;

  StrDrive+=":";

  char VolName[200],FSName[50];

  DWORD dwVolSer,lpMaxComLen,lpFSFlags;

 if( GetVolumeInformation(StrDrive.c_str(),VolName,200,&dwVolSer,&lpMaxComLen,&lpFSFlags,FSName,50))

 {

   if(dwVolSer==0)

      this->Edit1->Text="";

   else

     this->Edit1->Text=IntToStr(Integer(dwVolSer));;

  this->Edit2->Text=VolName;

  this->Edit3->Text=FSName;

 }

}

//---------------------------------------------------------------------------

肆水東澤 2009-10-10
  • 打赏
  • 举报
 回复 


//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)

{

        Memo1->Lines->Clear(); //清空内容

        //显示WMI所有所能显示的硬件信息

        for(int i = 0 ; AllWmiClasses[i] ; i++)

        {

                Memo1->Lines->Add("========================= [" + AnsiString(AllWmiClasses[i]) + "] ==============================");

                GetWmiInfo(Memo1->Lines,AllWmiClasses[i]);

                Memo1->Lines->Add("");

        }

}

//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)

{

        //初始化COM接口

        CoInitialize(NULL);

        //获取访问WMI权限

        if(CoInitializeSecurity(NULL,-1,NULL,NULL,RPC_C_AUTHN_LEVEL_PKT,RPC_C_IMP_LEVEL_IMPERSONATE,NULL,EOAC_NONE,0) != S_OK)

        { //如果获取失败

                ShowMessage("无法获取权限!");

                Application->Terminate();

        }



        //初始化Memo组件

        Memo1->Clear(); //清空内容

        //设置字体

        Font->Name = "宋体";

        Font->Charset = GB2312_CHARSET;

        Font->Size = 9;

}

//----------------------------------------------------------------------
肆水東澤 2009-10-10
  • 打赏
  • 举报
 回复 


//---------------------------------------------------------------------------



#include <vcl.h>

#include <comdef.h>

#include <wbemidl.h>

#pragma hdrstop

#include "Unit1.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

//---------------------------------------------------------------------------

//WMI可以访问的硬件信息类型

static char *AllWmiClasses[] =

{

  "Win32_1394Controller"                ,

  "Win32_BaseBoard"                     ,

  "Win32_Battery"                       ,

  "Win32_BIOS"                          ,

  "Win32_Bus"                           ,

  "Win32_CacheMemory"                   ,

  "Win32_CDROMDrive"                    ,

  "Win32_CurrentProbe"                  ,

  "Win32_DesktopMonitor"                ,

  "Win32_DeviceMemoryAddress"           ,

  "Win32_DiskDrive"                     ,

  "Win32_DisplayConfiguration"          ,

  "Win32_DisplayControllerConfiguration",

  "Win32_DMAChannel"                    ,

  "Win32_Fan"                           ,

  "Win32_FloppyController"              ,

  "Win32_FloppyDrive"                   ,

  "Win32_HeatPipe"                      ,

  "Win32_IDEController"                 ,

  "Win32_InfraredDevice"                ,

  "Win32_IRQResource"                   ,

  "Win32_Keyboard"                      ,

  "Win32_MemoryArray"                   ,

  "Win32_MemoryDevice"                  ,

  "Win32_MotherboardDevice"             ,

  "Win32_NetworkAdapter"                ,

  "Win32_NetworkAdapterConfiguration"   ,

  "Win32_OnBoardDevice"                 ,

  "Win32_ParallelPort"                  ,

  "Win32_PCMCIAController"              ,

  "Win32_PhysicalMemory"                ,

  "Win32_PhysicalMemoryArray"           ,

  "Win32_PnPEntity"                     ,

  "Win32_PointingDevice"                ,

  "Win32_PortableBattery"               ,

  "Win32_PortConnector"                 ,

  "Win32_PortResource"                  ,

  "Win32_POTSModem"                     ,

  "Win32_PowerManagementEvent"          ,

  "Win32_Printer"                       ,

  "Win32_PrinterConfiguration"          ,

  "Win32_PrintJob"                      ,

  "Win32_Processor"                     ,

  "Win32_Refrigeration"                 ,

  "Win32_SerialPort"                    ,

  "Win32_SerialPortConfiguration"       ,

  "Win32_SMBIOSMemory"                  ,

  "Win32_SoundDevice"                   ,

  "Win32_SystemEnclosure"               ,

  "Win32_SystemMemoryResource"          ,

  "Win32_SystemSlot"                    ,

  "Win32_TapeDrive"                     ,

  "Win32_TemperatureProbe"              ,

  "Win32_UninterruptiblePowerSupply"    ,

  "Win32_USBController"                 ,

  "Win32_VideoConfiguration"            ,

  "Win32_VideoController"               ,

  "Win32_VoltageProbe"                  ,

  NULL

};

//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)

    : TForm(Owner)

{

}

//---------------------------------------------------------------------------

__fastcall TForm1::~TForm1()

{

        CoUninitialize(); //释放资源

}

//---------------------------------------------------------------------------

void GetWmiInfo(TStrings *lpList, WideString wsClass)

{

        //通过IWbemLocator和IWbemServices这两个COM接口访问 WMI, 获取系统信息

        IWbemLocator *pWbemLocator = NULL;

        if(CoCreateInstance(CLSID_WbemAdministrativeLocator,NULL,CLSCTX_INPROC_SERVER | CLSCTX_LOCAL_SERVER,IID_IUnknown,(void**)&pWbemLocator) == S_OK)

        {

                IWbemServices *pWbemServices = NULL;

                WideString wsNamespace = (L"root\\cimv2");

                if(pWbemLocator->ConnectServer(wsNamespace,NULL,NULL,NULL,0,NULL,NULL,&pWbemServices) == S_OK)

                {

                        IEnumWbemClassObject *pEnumClassObject = NULL;

                        WideString wsWQL = L"WQL",wsQuery = WideString(L"Select * from ") + wsClass;

                        if(pWbemServices->ExecQuery(wsWQL,wsQuery,WBEM_FLAG_RETURN_IMMEDIATELY,NULL,&pEnumClassObject) == S_OK)

                        {

                                IWbemClassObject *pClassObject = NULL;

                                ULONG uCount = 1,uReturned;

                                if(pEnumClassObject->Reset() == S_OK)

                                {

                                        int iEnumIdx = 0;

                                        while(pEnumClassObject->Next(WBEM_INFINITE,uCount,&pClassObject,&uReturned) == S_OK)

                                        {

                                                lpList->Add("---------------- ["+IntToStr(iEnumIdx)+"] -----------------");

                                                SAFEARRAY *pvNames = NULL;

                                                if(pClassObject->GetNames(NULL,WBEM_FLAG_ALWAYS | WBEM_MASK_CONDITION_ORIGIN,NULL,&pvNames) == S_OK)

                                                {

                                                        long vbl,vbu;

                                                        SafeArrayGetLBound(pvNames,1,&vbl);

                                                        SafeArrayGetUBound(pvNames,1,&vbu);

                                                        for(long idx = vbl ; idx <= vbu ; idx++)

                                                        {

                                                                long aidx = idx;

                                                                wchar_t *wsName = 0;

                                                                VARIANT vValue;

                                                                VariantInit(&vValue);

                                                                SafeArrayGetElement(pvNames,&aidx,&wsName);

                                                                BSTR bs = SysAllocString(wsName);

                                                                HRESULT hRes = pClassObject->Get(bs,0,&vValue,NULL,0);

                                                                SysFreeString(bs);

                                                                if(hRes == S_OK)

                                                                {

                                                                        AnsiString s;

                                                                        Variant v = *(Variant*)&vValue;

                                                                        if(v.IsArray())

                                                                        {

                                                                                for(int i = v.ArrayLowBound() ; i <= v.ArrayHighBound() ; i++)

                                                                                {

                                                                                        Variant a = v.GetElement(i);

                                                                                        if(!s.IsEmpty())

                                                                                                s += ", ";

                                                                                        s += VarToStr(a);

                                                                                }

                                                                        }

                                                                        else

                                                                        {

                                                                                s = VarToStr(v);

                                                                        }

                                                                        lpList->Add(AnsiString(wsName) + "=" + s);

                                                                }

                                                                VariantClear(&vValue);

                                                                SysFreeString(wsName);

                                                        }

                                                }

                                                if(pvNames)

                                                        SafeArrayDestroy(pvNames);

                                                iEnumIdx++;

                                        }

                                }

                                if(pClassObject)

                                        pClassObject->Release();

                        }

                        if(pEnumClassObject)

                                pEnumClassObject->Release();

                }

                if(pWbemServices)

                        pWbemServices->Release();

        }

        if(pWbemLocator)

                pWbemLocator->Release();

}

//---------------------------------------------------------------------------
肆水東澤 2009-10-10
  • 打赏
  • 举报
 回复
我这有个获取系统信息，不只CPU和硬盘的，还有内存、BIOS和其他硬件的，你自己节选你自己需要的
主要用了WMI，还用到一个库wbemuuid.lib，具体代码如下:


//---------------------------------------------------------------------------



#include <vcl.h>

#pragma hdrstop

//---------------------------------------------------------------------------

USEFORM("Unit1.cpp", Form1);

//---------------------------------------------------------------------------

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)

{

    try

    {

         Application->Initialize();

         Application->CreateForm(__classid(TForm1), &Form1);

         Application->Run();

    }

    catch (Exception &exception)

    {

         Application->ShowException(&exception);

    }

    catch (...)

    {

         try

         {

             throw Exception("");

         }

         catch (Exception &exception)

         {

             Application->ShowException(&exception);

         }

    }

    return 0;

}

//---------------------------------------------------------------------------








//---------------------------------------------------------------------------



#ifndef Unit1H

#define Unit1H

//---------------------------------------------------------------------------

#include <Classes.hpp>

#include <Controls.hpp>

#include <StdCtrls.hpp>

#include <Forms.hpp>

//---------------------------------------------------------------------------

class TForm1 : public TForm

{

__published:	// IDE-managed Components

    TMemo *Memo1;       //多行文本编辑器

    TButton *Button1;   //显示所有硬件信息的按钮

    void __fastcall Button1Click(TObject *Sender);

    void __fastcall FormCreate(TObject *Sender);

private:	// User declarations

public:		// User declarations

    __fastcall TForm1(TComponent* Owner);

    __fastcall ~TForm1();

};

//---------------------------------------------------------------------------

extern PACKAGE TForm1 *Form1;

//---------------------------------------------------------------------------

#endif

获取硬盘物理序列号和CPU序列号
详细情况请看例子! 提供LIB文件! 本DLL可以在VC、C++Builder、VB、Delphi、PowerBuilder中使用!
C/C++ 获取硬件唯一标识 (CPU序列号/硬盘号)
调用控制台来获取CPU序列号/硬盘号 不同PC的硬盘数量可能不同 若有多个硬盘,此处的输出将多个硬盘号拼接到了一起 若需拆分可自行修改 #if !defined(AFX_14BEC153_17B9_47BE_845F_71A27BF26B59__INCLUDED_) #define AFX_14BEC153_17B9_47BE_845F_71A27BF26B59__INCLUDED_ #if _MSC_VER > 1000 #pragma once #endif // _MSC_
C++如何获取电脑配置信息
　1. 检测CPU的型号 　　先让我们从最简单的做起，看一看自己的CPU型号。首先，在C＋＋ Builder中画出图1所示的窗体，在下面的几个例子中我们将一直使用这个窗体作示范，它包括一个用来激活测试的Button和一个用来显示结果的Memo。我们可以用GetSystemInfo这个API获得CPU的型号。将下列代码添加到Button的Click事件里就可以了： 　　void __fas...
C/C++在程序中获取CPUID+网卡Mac的几种方法
直接上代码。 命令行获取到结果之后需要将16值字符串转换成整数： int tolower(int c) { if (c >= 'A' && c <= 'Z') { return c + 'a' - 'A'; } else { return c; } } unsigned long htoul(char s[]) { int i; unsigned long n = 0; if (s[0] == '0' && (s[1]=='x' ||
如何在C++Builder中检测硬件
在我们编写的程序中常常要和硬件打交道,那么如何在程序中确定系统中是否有该 设备,它的运行状态又是怎样的呢？对于初学者来说，这个问题常常不好解决，其实只需 简单地利用几个API函数，硬件的问题并不神秘。下面就让我们一起看看在C＋＋ Build er中是如何检测硬件的。　　1. 检测CPU的型号　　先让我们从最简单的做起，看一看自己的CPU型号。首先，在C＋＋ Builder中画 出图1所示的窗体，在
C++ Builder

13,825

社区成员

102,679

社区内容

发帖
与我相关
我的任务
社区描述
C++ Builder相关内容讨论区
社区管理员
  • 基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章