Как получить информацию о BIOS в Windows 9x

Советы » BIOS » Как получить информацию о BIOS в Windows 9x

procedure

TForm1.Button1Click(Sender: TObject); begin

with

Memo1.Lines do

begin

Add('MainBoardBiosName: '+string

(Pchar(Ptr($FE061)))); Add('MainBoardBiosCopyRight: '+string

(Pchar(Ptr($FE091)))); Add('MainBoardBiosDate: '+string

(Pchar(Ptr($FFFF5)))); Add('MainBoardBiosSerialNo: '+string

(Pchar(Ptr($FEC71)))); end

; end

;

Другое по теме:

Категории

Статьи

Советы

Copyright © 2023 - All Rights Reserved - www.delphirus.com