Программы   Загрузка Партнерство   О компании Контакты  
 
                    
  Карта Сайта   
   





Как получить информацию о 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 © LSD Software 2006 - 2011