Delphi 2009/2010 Stringhandling

[Peter666]

Hallo,

beim Portieren einige meiner alten Projekte nach Delphi 2010 ist mir eine Sache übel aufgestoßen. Früher funktionierte die Umwandlung eines Array of Char in einen String problemlos:

Delphi-Quellcode:

var 
 Arr: Array[0..12] of char;
 str: string;

...
 Arr := str;

Das geht leider nicht mehr und ich musste auf folgendes Hilfskonstrukt umschwenken:

Delphi-Quellcode:

procedure StringToArray(const S: AnsiString; out Arr: Array of AnsiChar);overload;
begin
  fillchar(Arr, sizeof(Arr), 0);
  move(S[1], Arr, min(length(S),sizeof(arr)));
end;

procedure StringToArray(const S: String; out Arr: Array of Char);overload;
begin
  fillchar(Arr, sizeof(Arr), 0);
  move(S[1], Arr, min(length(S),sizeof(arr)));
end;

Kennt ihr eventuell eine elegantere Lösung zum Umfahren dieses Problems?

Peter

[jaenicke]

Muss das denn ein Array sein? Eigentlich kann man auf einen String doch ohnehin wie auf ein Array zugreifen.

[jbg]

Zitat von Peter666:

Früher funktionierte die Umwandlung eines Array of Char in einen String problemlos:

Von wieviel früher redest du da? Also das kann nicht mal Delphi 7. Die andere Richtung kann Delphi, aber einen String in ein Array quetschen hat noch kein Delphi unterstützt.

Zitat:

und ich musste auf folgendes Hilfskonstrukt umschwenken:

StrLCopy/StrCopy ist dein Freund.

[Peter666]

Danke, stimmt das Problem war eigentlich ein anderes. Ich war zu faul die mehreren MB großen Projektdaten anzupassen und habe dann ein eigenes Skript zum Updaten geschrieben. Das hat aus
Datensatz: string[63] automatisch ein Datensatz: Array[0..62] of AnsiChar kreiiert, da AnsiString[63] nicht funktioniert.
Nun gibt es in etlichen Klassen Probleme, da just die festen Datensätze, die aus der verwendeten Pluginschnittstelle resultieren, nicht mehr passen. Ich kann da leider auch nicht Widestring verwenden, da ansonsten die Abwärtskompatibilität leidet.

Peter

[jaenicke]

Zitat von Peter666:

da AnsiString[63] nicht funktioniert.

String[63] ist nach wie vor ein ShortString, kein UnicodeString.