Einzelnen Beitrag anzeigen

cytrinox

Registriert seit: 4. Sep 2006
88 Beiträge
 
#3

Re: Inline Assembler in Methoden

  Alt 21. Jun 2007, 13:49
Delphi-Quellcode:
function
   TmpllCpuSerial.getSerial; register;
asm
  PUSH EBX
  PUSH EDI
  MOV EDI,EAX
  MOV EAX,1
  DW $A20F
  STOSD         
  MOV EAX,EBX
  STOSD
  MOV EAX,ECX
  STOSD
  MOV EAX,EDX
  STOSD
  POP EDI               
  POP EBX
end;
Die Funktion selbst ist nur als function getSerial: TCPUID; deklariert. Da kracht es dann.
Mach ich eine class function draus und diese static läuft alles wie es soll.

So ist TCPUID deklariert:
TCPUID = array[1..4] of Longint;

brauch ich da stdcall für? oder geht das auch ohne?
  Mit Zitat antworten Zitat