Speicheradressen von 2 Variablen Vertauschen?

[Phantom1]

Und noch eine möglichkeit:

Delphi-Quellcode:

procedure Swap(var X, Y: Pointer);
asm
    mov ecx, [edx]
    xchg [eax], ecx
    mov [edx], ecx
end;