String-Format?

[stahli]

Vielleicht hat jemand direkt eine Lösung parat...

Ich habe eine alte D7-Anwendung, die eine Textdatei importiert.
Jetzt wurde das externe Format verändert (kenne mich da nicht wirklich aus :oops:).

Ich habe mal einfach planlos AnsiToAscii und AsciiToAnsi versucht. Hat aber nichts gebracht.
Kann vielleicht jemand anhand des Screenshots direkt eine Lösung erkennen?

Oben ist das bisherige Format, unten das neue,
Das alte Format wird in S lesbar incl. Umlauten abgebildet.
Beim neuen Format bin ich erst mal überfragt, zumal die Delphi-Hilfe hier auch nicht funktioniert.

Wenn es nützlich wäre könnte ich statt Textdatei.Readln auch über StringList gehen.

Hat jemand eine Idee, was der sinnvollste/einfachste Ansatz wäre?
(Das Projekt hat aber keine Priorität.)

[Luckie]

Unicode?

[Dalai]

Um genau zu sein, ist das eindeutig UTF-8, sowohl der BOM als auch der Umlaut.

MfG Dalai

[stahli]

Ja, stimmt, habe gerade mal gesucht.
In einer älteren eMail steht "UTF-8" als Ankündigung.

Werde mal nach einer D7-(Not-)Lösung suchen.

Danke. Hilft mir schon mal etwas.

[DeddyH]

In Delphi 7 dürften UTF8Decode bzw UTF8Encode Deine Freunde sein.

[nahpets]

Oder aber auch Utf8ToAnsi und AnsiToUtf8 aus der Unit System.
Jedenfalls nehm' ich die immer, wenn ich UTF8-Dateien (zeilenweise) lesen bzw. schreiben muss.

[Der schöne Günther]

Als kleiner Tipp:

Notepad++ hat, falls es die Kodierung nicht auf Anhieb erkennt, die Möglichkeit das Encoding selbst zu bestimmen (oder zu konvertieren), man sieht dann direkt wie sich die Zeichen ändern. So kann man notfalls etwas herumspielen um zu schauen, welches Encoding denn jetzt das richtige ist.

[stahli]

Danke, ich gebe Ende nächster Woche Bescheid...

[stahli]

Dank nochmal. So werde ich weiter kommen.
Utf8ToAnsi kapselt einfach Utf8Decode.

Delphi-Quellcode:

function Utf8ToAnsi(const S: UTF8String): string;
begin
  Result := Utf8Decode(S);
end;

War halt schwierig, da ohne funktionierende Hilfe drauf zu kommen. :?


Die erste Zeile enthält im Original Sonderzeichen, die zu einem Fragezeichen umgewandelt werden, das ich einfach entferne. Dann passt offenbar alles.

[Sir Rufo]

Diese "Sonderzeichen" nennen sich BOM