检测硬件信息

1. 检测CPU的型号

　　void __fastcall TForm1::Button1Click(TObject *Sender)
　　{
　　//获得CPU型号
　　SYSTEM_INFO systeminfo;
　　GetSystemInfo (&systeminfo);
　　Memo1->Lines->Add("您的CPU类型是:" String( systeminfo.dwProcessorTy pe ));
　　}
　　运行它，点击Test试试，CPU型号出来了吧！
　　2.检测内存状态
　　获得内存状态的方法和CPU型号差不多，只是他用到的是另外一个API：GlobalMe moryStatus。其中，成员dwTotalPhys用来获得物理内存总量，而dwAvailPhys顾名思义 是有效物理内存的意思。我们只要把下面几行代码加到上面程序的后面就可以了（不用重做，下同）：
　　//获得内存状态
　　MEMORYSTATUS memory;
　　memory.dwLength =sizeof(memory); //初始化
　　memory.dwLength =sizeof(memory); //初始化
　　GlobalMemoryStatus(&memory);
　　Memo1->Lines->Add("您的物理内存是(Mb):" String(int(memory.dwTotalPh ys /1024/1024)));
　　Memo1->Lines->Add("其中可用内存是(Kb):" String(int( memory. /1024)) );
　　怎么样，看出点门道了么？两段程序的格式几乎一模一样，其实，GetSystemInf o和GlobalMemoryStatus还可以获得许多其他有关CPU和内存的信息，就按照上面的格式 去套就行了，更详细的资料可以去看C Builder4的Help。
　　3. 检测可用硬盘空间
　　好了，经过前面两个简单问题的热身，我们来处理一个稍微复杂的问题：我们知 道安装程序大都有一个检测硬盘空间的过程，那么这是怎么实现的呢?他用到的是 API函 数GetDiskFreeSpace，这个函数输入一个参数：目标盘的路径；返回四个参数，依次是 每簇的扇区数、每扇区的字节数、空闲的簇数、总簇数。假如我们需要检测C盘的总容量 和可用容量，那么可以把以下代码加到上面的程序中：
　　//获得C盘可用空间
　　DWORD sector,byte,cluster,free;
　　long int freespace,totalspace;
　　GetDiskFreeSpace("C:",&sector,&byte,&free,&cluster); //获得返回参 数
　　totalspace=int(cluster)*int(byte)*int(sector)/1024/1024; //计算总容量 　　freespace=int(free)*int(byte)*int(sector)/1024/1024; //计算可用空间
　　Memo1->Lines->Add("C盘总空间(Mb):" String(totalspace));
　　Memo1->Lines->Add("C盘可用空间(Mb):" String(freespace));
　　怎么样?现在可以自己做安装程序了吧！
　　4. 检测CD－ROM
　　我们在编写程序时常常需要读取CD－ROM，可是究竟哪一个盘符是光驱呢？有人是 桓雠谭枪馇兀坑腥耸? 将最后一个盘符当作光驱的，但是当遇到双光驱或者MO的情况时常常会出错。其实这个 问题用一个API来解决并不困难，这就是：GetDriveType()，这个函数返回一个0～6之间 的值，依次代表：0—未知盘、1—不存在、2—可移动磁盘、3—固定磁盘、4—网络磁盘 、5—CD－ROM、6—内存虚拟盘。因此我们可以添加下面代码来寻找CD－ROM：
　　// 获得CD－ROM信息
　　UINT type;
　　char name;
　　for (name=‘C’;name<=‘Z’;name ) //循环检测A～Z
　　{ type = GetDriveType((String(name) String(‘:’)).c_str()); //获得磁 盘类型
　　if (type==5)
　　Memo1->Lines->Add("您的光驱盘符为:" String(name));
　　 }
　　得到光驱盘符之后我们可以进一步利用API函数GetVolumeInformation检测光驱中 是否有光盘，这个函数如果成功调用，会得到磁盘的卷标序列号等信息；如果调用失败 则可知光驱中无光盘，程序如下：//检测光盘(假设光驱为G:)
　　char volname[255],filename[100];//buffer[512];
　　DWORD sno,maxl,fileflag ;
　　if (!(GetVolumeInformation("G:", volname,255,&sno,&maxl,&fileflag ,filename,100)))
　　 //如果返回值为假
　　Memo1->Lines->Add ("G驱中没有发现光盘");
　　 else
　　 //如果返回值为真
　　{Memo1->Lines->Add ("G驱中光盘卷标为:" String(volname));
　　Memo1->Lines->Add ("G驱中光盘序号为:" String(sno));
　　 }
　　5. 检测声卡配置
　　在编制多媒体程序时，我们常常会用到声音文件，而当这些程序在没有配置声卡 的机器上运行时，我们应该给出必要的警告。对于声卡的检测，可以分别通过waveOutG etNumDevs()和midiOutGetNumDevs()检测波形设备和MIDI设备，再利用waveOutGetDevC aps()和midiOutGetDevCaps()获得声音设备的细节资料。将下面一段代码加入上面的程 序即可，但要注意将#include 添至程序首部：
　　//检测声卡
　　int wavedevice,mididevice;
　　WAVEOUTCAPS wavecap;
　　MIDIOUTCAPS midicap;
　　wavedevice=(int)waveOutGetNumDevs(); //波形设备信息 　　mididevice=(int)midiOutGetNumDevs(); // MIDI设备信息 　　mididevice=(int)midiOutGetNumDevs(); // MIDI设备信息
　　if (wavedevice==0)
　　Memo1->Lines->Add ("没有发现波形设备");
　　else
　　{waveOutGetDevCaps(0,&wavecap,sizeof(WAVEOUTCAPS));
　　Memo1->Lines->Add ("当前波形设备:" String(wavecap.szPname));
　　 }
　　if (mididevice==0)
　　Memo1->Lines->Add ("没有发现MIDI设备");
　　else
　　{midiOutGetDevCaps(0,&midicap,sizeof(MIDIOUTCAPS));
　　Memo19->Lines->Add ("当前MIDI设备:" String(midicap.szPname));
　　 }
　　6. 检测显示器信息
　　编写和图形图像有关的程序时常常需要检测显示器的分辨率和色深，最后我们来 看看这个问题的解决办法。分辨率的求法很简单，直接调用Screen对象的属性就行了。 而要求色深则要利用API函数GetDeviceCaps获得每像素的比特数和色彩的页面数，然后 计算2的"每像素的比特数"次幂即得色彩的梯度数，再计算"色彩的梯度数"的"色彩 的页面数"次幂即得色深。程序如下：
　　//检测显示器
　　int tcs;
　　long int bpp,cp,tc;
　　Memo1->Lines->Add ("当前分辨率为:" String(Screen->Width) "*" S tring(Screen->Height));
　　bpp=GetDeviceCaps(Form1->Canvas->Handle ,BITSPIXEL);
　　bpp=GetDeviceCaps(Form1->Canvas->Handle ,BITSPIXEL);
　　tcs=pow(2,bpp); //计算色彩的梯度数
　　cp= GetDeviceCaps(Form1->Canvas->Handle,PLANES);
　　tc= pow(tcs,cp); //计算色深
　　Memo1->Lines->Add("当前色深为:" String(tc));