Delphi & ASM - Integer umdrehen

[quendolineDD]

Hallo Leute, ich habe mir ein bisschen ASM angeschaut hier im Forum und wollte unbedingt das mal testen. Dabei soll die eingegebene Zahl umgedreht (inverted) werden.

Hier mein Code:

Delphi-Quellcode:

function invert(pnt:pointer):string;
begin
  asm
    mov edx, pnt;
    bswap edx;
    mov pnt, edx;
 end;
result:= string(pnt); //als ich result:= ^pnt; versuchte, kam nur "Operator oder Simekolion fehlt"
end;

procedure TForm1.Button1Click(Sender: TObject);
var nmbr: integer;
    s: String;
begin
 nmbr:= StrToInt(Edit1.Text);
 s := invert(@nmbr);
 Label1.Caption := string(s);
end;

Dabei weiß ich einfach nicht, was die Funktion am Besten zurückgeben soll, damit ich das Ergebis (die umgedrehte Zahl) in das Label schreiben kann.

Die Funktion erhält einen Pointer, welcher auf den Speicherbereich (?) von d. var nmbr zeigt, damit das ASM damit arbeiten kann.

Zum Schluss caste ich s als String :-\
In Sachen ASM bin ich eine Niete, ich versteh davon eigentlich nichts, trotzdem fand ich es mal interessant, ob das umdrehen einer Zahl so einfach geht.

Doch wenn ich das Prog ausführe, bekomm ich einen EAccessViolation Error!

Ich hatte es vorher ohne Pointer schon ohne Error zum laufen bekommen, jedoch stimmten die Rückgabewerte auf keinen Fall.
Eventuell kann sich ja jemand bereiterklären, das ganze richtig zu stellen und zu kommentieren? )

Danke im Vorraus
Grüße

€: Topicname etwas besser formuliert - sagt zwar immer noch nichts aus ... aber naja.