Bios auslesen funktioniert nicht

**creature**

Code:

			 try

  Label1.Caption := String(Pchar(Ptr($FE061))); // BIOS Name

  Label2.Caption := String(Pchar(Ptr($FE091))); // CopyRight-Informationen

  Label3.Caption := String(Pchar(Ptr($FFFF5))); // BIOS Datum

  Label4.Caption := String(Pchar(Ptr($FEC71))); // Seriennummer

 except

  Label1.Caption := 'keine Info';

  Label2.Caption := 'keine Info';

  Label3.Caption := 'keine Info';

  Label4.Caption := 'keine Info';

 end;

ich hab den quellcode verwendet und auch schon über google gesucht. über google komm ich an die gleiche lösung, nur funktioniert das scheinbar nicht mit delphi 6.
könnte mir da jemand helfen oder kennt den fehler?

gruß, creature

Bios auslesen funktioniert nicht

Bios auslesen funktioniert nicht

Forumregeln