[Assembler]: 2 Variabeln austauschen

[St.Pauli]

Hallo,

mein Vorhaben scheint einfach - ist es für mich zumindestens nicht.
Ich wollte ein bisschen mit Inline-Assembler in Delphi rumspielen und eine Procedure schreiben,
welche mir meine 2 Variablen vertauscht.

Innerhalb meines Programmes klappt es wunderbar:

Delphi-Quellcode:

 
var
  a, b : longword;
begin
  a := 10;
  b := 20;
  asm
    MOV   EAX, a
    XCHG  EAX, b
    MOV   a, EAX
  end;

Nur wie kann ich den ganzen Assembler-Teil jetzt in eine Procedure auslagern? Ich bekomme es einfach nicht gebacken...
Ich hoffe ihr könnt mir weiterhelfen...