Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.13;
Скачать: CL | DM;

Вниз

Дата BIOS   Найти похожие ветки 

 
arous ©   (2003-08-31 00:20) [0]

А вот как узнать дату изготовления BIOS?


 
arous ©   (2003-08-31 19:46) [1]

А хоть что-нибудь можно узнать о BIOS"e?


 
Anatoly Podgoretsky ©   (2003-08-31 20:08) [2]

Ты даже ОС не указываешь, но есть готовые продукты.


 
Rouse_ ©   (2003-08-31 20:12) [3]

Для НТ

with TRegistry.Create do
try RootKey := HKEY_LOCAL_MACHINE;
if OpenKeyReadOnly ("HARDWARE\DESCRIPTION\System")
then Result := ReadString("SystemBiosDate")
finally Free;
end;


Для 9х

var p : pointer;
s : string[255];
begin
try
s[0] := #8;
p := Pointer($0FFFF5);
Move(p^,s[1],8);
Result := copy(s,1,2) + "/" + copy(s,4,2) + "/" +copy (s,7,2);
except Result := "XX.XX.XXXX";
end;


Желаю успехов



Страницы: 1 вся ветка

Текущий архив: 2003.11.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.023 c
4-42330
Omega27
2003-09-04 14:23
2003.11.13
Загрузит толко програми , которие я хочу


3-41078
Chaked
2003-10-23 16:30
2003.11.13
Доступ к записям


1-41216
killer
2003-11-01 18:40
2003.11.13
Окно программы посередине экрана монитора


7-42166
Layner
2003-09-01 15:59
2003.11.13
Помогите сделать всегда активную форму


1-41426
Эдик Дятлов
2003-10-29 13:25
2003.11.13
Изменение размеров и положения во время run-time