UnicodeString Swap?

[himitsu]

Derartige Funktionen können erst seit Kurzem an solche Basitypen gehängt werden.

Nja, aber es wird eh nichts "umkopiert", denn die LongStrings verfügen über eine Referenzzählung.

S2 := S1; erhöht nur den Referenzzeiger (NativeInt) und erhöhrt den Referenzzähler von S1.

Was heißt eigentlich "schnell", oder meinst du "einfach"?

Etwas ala

Delphi-Quellcode:

procedure SwapString(var S1, S2: string); inline;
var
  Temp: string;
begin
  Temp := S1;
  S1 := S2;
  S2 := Temp;
end;

braucht nur ein paar Rechenzyklen.