Как получить информацию о BIOS в Windows 9x.
Компилятор: Delphi
Добавьте на форму компоненты 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;
|