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

[Luckie]

NJimm die BIOSHelp von Nico: http://www.michael-puff.de/dirindex..../Importe/Nico/

[s.h.a.r.k]

Schau mal hier. Da Demo oben funktioniert auf WinXP - habs grad getestet!

[edit]da war wohl wieder jemand schneller...[/edit]

[Mavarik]

Zitat von s.h.a.r.k:

Schau mal hier. Da Demo oben funktioniert auf WinXP - habs grad getestet!

[edit]da war wohl wieder jemand schneller...[/edit]

Hast Du verstanden, warum er den ASM in einem Record Hardcoded und nicht ASM oder Inline nimmt?


Frank

[s.h.a.r.k]

Von ASM habe ich persönlich keine Ahnung, a müsstest du wohl mit dem Author der Software bzw. des Codes Kontakt aufnehmen. Habe nur kurz im Internet nach einer Lösung für creature gesucht un das gefunden. Hab mir dann nur noch das Demo runtergeladen und getestet ob es funktioniert, was es auch tut - warum kann ich dir also net sagen

[creature]

das ging ja flott.
danke.

[Luckie]

Zitat von Mavarik:

Hast Du verstanden, warum er den ASM in einem Record Hardcoded und nicht ASM oder Inline nimmt?

Bei NicoDe mus sich das ein ums andere Mal den Kopf schüttel, da frage ich bei solchen Nichtigkeiten schon gar nicht mehr nach.

[NicoDE]

Zitat von Mavarik:

Hast Du verstanden, warum er den ASM in einem Record Hardcoded und nicht ASM oder Inline nimmt?

Versuch mal mit einem 32-Bit Compiler 16-Bit-Code zu generieren
(ok, in der ersten Version habe ich genau das gemacht - aber es gibt auch Pascal-Compiler die kein Intel-ASM verstehen...)

Die aktuelle Version liegt auf meiner Homepage (2.2). Im Netz ist ab und zu eine 3.0 zu finden (x64/w2k3sp1-Support) die für TuneUp erweitert wurde.

[Luckie]

Die von deiner HP ist von 2003-07-23. Dann dürfte ich auch die aktuelle auf meiner Homepage haben.

[NicoDE]

Zitat von Luckie:

Die von deiner HP ist von 2003-07-23. Dann dürfte ich auch die aktuelle auf meiner Homepage haben.

Nunja, bei dir liegt die 1.03 (nur noch aus historischen Gründen von Bedeutung), bei mir die 2.2 (die letzte aktuelle öffentliche Version) und bei manchen die 3.0 (TuneUp)