Ĺadny brzuch
Witajcie! Mam taki oto kod, do pobierania informacji na temat biosu:
try Label1.Caption := String(Pchar(Ptr($FE061))); // Nazwa Biosu Label2.Caption := String(Pchar(Ptr($FE091))); // Firma Label3.Caption := String(Pchar(Ptr($FFFF5))); // Data Label4.Caption := String(Pchar(Ptr($FEC71))); // Serial numer except Label1.Caption := 'Nie znany'; Label2.Caption := 'Nie znany'; Label3.Caption := 'Nie znany'; Label4.Caption := 'Nie znany'; end;
Ale niestety nie działa :( . Czy może mi ktoś powiedzieć dlaczego??
Ten kod nie będzie działał pod windowsem NT/2000/xp, bo w nich nie ma możliwości bezpośrdeniego dostępu do sprzętu. Ten sposób nie będzie działał :D
http://forum.4progra...opic.php?p=2635
Użytkownik lukexpert edytował ten post 14 maj 2006, 11:35
No to spoko. To więc w jaki sposób można odczytać informacje o biosie pod WinXP??
ZLPortio
Dobra mam ten komponent i nawet przykłady działają, ale dalej nie wiem jak odczytać informacje na tematu biosu (nazwa, producent itp.) ?? Czy mógłby mnie ktoś nakierować ??
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
try Label1.Caption := String(Pchar(Ptr($FE061))); // Nazwa Biosu Label2.Caption := String(Pchar(Ptr($FE091))); // Firma Label3.Caption := String(Pchar(Ptr($FFFF5))); // Data Label4.Caption := String(Pchar(Ptr($FEC71))); // Serial numer except Label1.Caption := 'Nie znany'; Label2.Caption := 'Nie znany'; Label3.Caption := 'Nie znany'; Label4.Caption := 'Nie znany'; end;
Ale niestety nie działa :( . Czy może mi ktoś powiedzieć dlaczego??
Ten kod nie będzie działał pod windowsem NT/2000/xp, bo w nich nie ma możliwości bezpośrdeniego dostępu do sprzętu. Ten sposób nie będzie działał :D
http://forum.4progra...opic.php?p=2635
Użytkownik lukexpert edytował ten post 14 maj 2006, 11:35
No to spoko. To więc w jaki sposób można odczytać informacje o biosie pod WinXP??
ZLPortio
Dobra mam ten komponent i nawet przykłady działają, ale dalej nie wiem jak odczytać informacje na tematu biosu (nazwa, producent itp.) ?? Czy mógłby mnie ktoś nakierować ??