获取主板Bios信息 |
 |
CoDelphi.com
摘 要:用Delphi调用Bios的信息 关键字:BIOS 类 别:系统控制
|
|
添加一个Tbutton和一个Tmemo组件到窗体并写如下代码到按钮的OnClick事件:
|
with Memo1.Lines do begin Add('MainBoardBiosName:'+^I+string(Pchar(Ptr($FE061)))); Add('MainBoardBiosCopyRight:'+^I+string(Pchar(Ptr($FE091)))); Add('MainBoardBiosDate:'+^I+string(Pchar(Ptr($FFFF5)))); Add('MainBoardBiosSerialNo:'+^I+string(Pchar(Ptr($FEC71)))); end;
以上代码在Win9X上运行通过。
投稿人:grhunter 投稿日期:2001-3-28 16:50:00

|