Hallo und Willkommen in der
DP 
,
das geht ganz einfach mit einem Dreieckstausch, d.h. Du merkst Dir ein zu tauschendes Zeichen in einer temporären Variablen und überschreibst das dann mit dem Wert des anderen Zeichens, welches anschließend den gemerkten Wert bekommt.
Delphi-Quellcode:
var tmp: AnsiChar;
begin
tmp := StringVar[rand1];
StringVar[rand1] := StringVar[rand2];
StringVar[rand2] := tmp;
end;