BIOS Infos auslesen klappt nicht! Warum?

[max666]

Hallo!

Ich wollte ganz gerne Informationen aus meinem BIOS mit den folgenen Anweisungenm, die ich im Internet gefunden habe auslesen. Klappt leider nicht. Ich bekomme immer eine EAccessViolation.
Weiß einer, was hier falsch läuft?

Gruß aus dem Emsland
MAX666

Delphi-Quellcode:

 try
   Label1.Caption := String(Pchar(Ptr($FE061))); // Biosname
   Label2.Caption := String(Pchar(Ptr($FE091))); // Copyright
   Label3.Caption := String(Pchar(Ptr($FFFF5))); // Datum
   Label4.Caption := String(Pchar(Ptr($FEC71))); // Seriennummer
except
      Label1.Caption := 'Nicht verfügbar';
      Label2.Caption := 'Nicht verfügbar';
      Label3.Caption := 'Nicht verfügbar';
      Label4.Caption := 'Nicht verfügbar';
end;

[sakura]

Ich weiß ja nicht wo Du das her hast, aber dieser direkte Zugriff auf feste Speicheradressen ist unter den meisten Windows-System der Neuzeit generell einfach nicht möglich

Einfacher Grund: 4GB Virtueller Arbeitsspeicher.

......

[neolithos]

Schau mal hier:
http://www.swissdelphicenter.ch/torr...ode.php?id=748