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?