gelöst: Probleme mit UTF8ToAnsi - war ein Stringlistenprobl.

[nahpets]

Hallo,

habe ein konkretes Problem mit der Funktion UTF8ToAnsi unter Delphi 2007.

Wenn man einen Text mit doppelten Hochkommata mit dieser Funktion umwandelt, so wird das führende Hochkommata entfernt und das schließende in einen Zeilenumbruch verwandelt.

Delphi-Quellcode:

slRow.Delimiter       := #9;
slRow.StrictDelimiter := True;
for iRow := 0 To slFile.Count - 1 Do begin
  slRow.DelimitedText := UTF8ToAnsi(slFile[iRow]);
  ...
  diverses Anderes u. a. speichern in Datenbank.
end;

slRow und slFile sind vom Typ TStringList.

Hierbei wird aus

Code:

"Delphipraxis" Das Forum für Delphifans

Code:

Delphipraxis
  Das Forum für Delphifans

Kann das jemand nachvollziehen und mir einen Vorschlag für die Lösung des Problemes geben?

Bei den einzulesenden Textdateien (mit Millionen von Zeilen) handelt es sich um tabulatorseparierte Texte im UTF8-Format, die in eine Datenbank eingelesen werden müssen.

[RWarnecke]

Gehe doch vorher den Text durch und ersetze die Zeichen entsprechend durch CHR(x).

[Bernhard Geyer]

Probier doch mal die UTF8Decode Funktion.

[nahpets]

Hallo,

Zitat von RWarnecke:

Gehe doch vorher den Text durch und ersetze die Zeichen entsprechend durch CHR(x).

prinzipiell okay, ich brauche die Werte aber, d. h. ich müsste das sonst anschließend zurückübersetzen.

[RWarnecke]

Aber wenn ich mich recht entsinne, wird doch der Inhalt einer UTF8 Formatierten Datei beim Laden in die Stringlist eins zu eins angezeigt wird.

[nahpets]

Hallo,

Problem gelöst:

Delphi-Quellcode:

slRow.Delimiter       := #9; 
slRow.StrictDelimiter := True;

arbeiten nicht, wie in der Hilfe beschrieben, Zeilenumbrüche werden auch bei anderen Zeichen als in diese Fall #9 gemacht.