String Umdrehen

[TheAn00bis]

Vielleicht so:

Delphi-Quellcode:

function StringDrehen(pString: String): String;
var i:integer;
begin
   for i:=length(pString) downto 0 do
      result:=result+pString[i]
end;