Wie entferne ich Steuerzeichen aus einem String?

[Der schöne Günther]

Wie da hineinkommen weiß ich auch nicht, der entsprechende Programmierer ist schon nach Hause gegangen. Kann ich bei dem Wetter auch verstehen.

Die eigentliche Frage Warum werden die Zeichen nicht entfernt? bleibt aber bestehen. Steppe ich durch den entsprechenden RTL-Code verlässt mich spätestens bei

Delphi-Quellcode:

if (Str1[I] <> #0) and (StrLComp(PWideChar(PByte(Str1) + I * SizeOf(WideChar)), Str2, Len2) = 0) then
    begin
      Result := PWideChar(PByte(Str1) + I * SizeOf(WideChar));

die Lust...