String, Char, Delphi 2009

[Alex_ITA01]

Hallo zusammen,
ich möchte folgenden Source nach Delphi 2009 portieren, weiß aber leider nicht genau wie.
Ich hoffe, mir kann jemand helfen.
Delphi 2009 sagt ungültige Typumwandlung AnsiChar - Char...

Delphi-Quellcode:

Function TEST : string;
Var
  mystring : String[2];
begin                                
  mystring[0] := Chr(2);                        
  mystring[1] := Chr(4);
  mystring[2] := Chr(6);

  Result  := mystring;
end;

Danke schonmal

[jbg]

Chr liefert einen Char zurück, der wiederum unter Delphi 2009 ein WideChar ist. Ein string[len] hingegen ist ein ShortString. Und dieser hat AnsiChar-Elemente. Da WideChar größer ist als AnsiChar, meckert der Compiler.

Delphi-Quellcode:

function TEST : string;
begin                               
  Result := #2#4#6;
end;

[Alex_ITA01]

Habs schon :-)

Lösung:

Delphi-Quellcode:

mystring[0] := AnsiChar(Chr(2));

Danke :-)

[himitsu]

Delphi-Quellcode:

SetLength(mystring, 2);
mystring[1] := #4;
mystring[2] := #6;
// oder
SetLength(mystring, 2);
mystring[1] := AnsiChar(4);
mystring[2] := AnsiChar(6);
// oder ala jbg (die erste 2 ist die Länge :zwinker: )
Result := #4#6;