Stringkonvertierung

[Sir Rufo]

Zitat von himitsu:

Zitat von Sir Rufo:

Nein, ich bin faul:

Result := TFile.ReadAllText(ADataNormFilename, TEncoding.GetEncoding(CP_OEMCP)); // Wobei man doch die TEncoding-Instanz eigentlich auch wieder greigeben müsste?
Du bist noch nicht faul genug.

Der TE hat XE2 und dem Kontext war es ausreichend faul

Huch, das kennt das ja doch schon ok

[HPB]

Guten Tag Delphianer,
vielen Dank an allen die bei der Lösung des Problems geholfen haben.
Letztendlich hab ich den Vorschlag von Uwe Raabe genommen:

Zitat:

Du kannst doch bei AssignFile als dritten Parameter die Codepage mitgeben.

AssignFile(fDatei, aDatei, 1);

Dies schien mir zum jetzigen Zeitpunkt die einfachste Lösung zu sein.
Jetzt kann ich auch weiter an die Erneuerung des Quellcodes gehen.
Das Thema kann nun geschlossen werden.
Mit besten Gruß
HPB