VAR-Parameter beim Inline-Assembler nutzen

[skyobserver]

Hallo,


wie kann ich in einer Assembler-Prozedur auf den Wert eines VAR-Parameters zugreifen?
Ich habe folgendes probiert:

Delphi-Quellcode:

procedure Test(var x: DWord);
asm
  MOV EAX, DWORD PTR [x]
  ADD EAX, 4711
  MOV DWORD PTR [x], EAX
end;

Das scheint aber falsch zu sein...

Delphi-Quellcode:

procedure Test(var x: DWord);
var
  z: DWord;
begin
  z := x;
  asm
    MOV EAX, z
    ADD EAX, 4711
    MOV z, EAX
  end;
  x := z;
end;

Datt klappett...iss aber nich doll...


Wo mache ich da Blödsinn?

Die Antwort muß entweder furchtbar einfach oder furchtbar schwer sein,
denn ich habe bei der Suche nichts in dieser Art gefunden...