Delphi 2009 Strings

[Alex_ITA01]

Hallo zusammen,
ich habe eine Frage zu folgenden Beispielcode.
Ich bekomme unter Delphi 2006 ein anderes Result als unter RAD 2009.
Wie kann ich die Funktion so umbauen, dass sie sich genauso verhält wie unter Delphi 2006?

Delphi-Quellcode:

function  ConvertStr (Input: String): String;
var
  i              : Integer;
  HlpStr         : String;
begin
  HlpStr     := Input;
  for i:=1 to Length(HlpStr) do
  begin
    HlpStr[i] := Chr (Ord(HlpStr[i]) xor $FF);
  end;
  Result  := HlpStr;
end;

Ich hoffe ihr versteht mein Problem.
Viele Grüße
Alex