Kryptische Zeichen beim Einlesen von .csv

[Schokohase]

Kann ich so nicht bestätigen.

Delphi-Quellcode:

program ConsoleApp;

{$APPTYPE CONSOLE}

{$R *.res}

uses
  System.Classes,
  System.SysUtils;

procedure Main;
var
sl:TStringList;
str:string;
begin
  sl := TStringList.Create;
  try
    sl.LoadFromFile('test.csv');
    str:=sl.Text;
    WriteLn(str);
  finally
    sl.Free;
  end;
end;

begin
  try
    Main;
  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
  ReadLn;
end.

Gibt mir exakt das aus, was auch in der Datei (UTF8-BOM) enthalten ist.

Somit brauchen wir ein Minimales Projekt (inkl. einer CSV-Datei) was diesen Fehler zeigt.

[StepByStep]

Zitat:

Somit brauchen wir ein Minimales Projekt (inkl. einer CSV-Datei) was diesen Fehler zeigt.

>> Habe ich drangehangen. Ist Delphi7!

[Delphi.Narium]

Delphi 7 kann von Haus aus kein UTF8.

ShowMessage(Utf8ToAnsi(slDaten.Strings[1])); sollte Dein Problem beheben.

[StepByStep]

@Delphi.Narium: Das habe ich gerade auch gefunden, damit geht es. ^^

Danke!

[Bernhard Geyer]

Zitat von StepByStep:

Zitat:

Somit brauchen wir ein Minimales Projekt (inkl. einer CSV-Datei) was diesen Fehler zeigt.

>> Habe ich drangehangen. Ist Delphi7!

Das hättest du uns gleich sagen können. Bei deinem Profil steht "Delphi 10.2 Tokyo Professional".
Solche Antike Version hatte mit Unicode und UTF8 von Haus aus noch nicht viel damit am Hut.
Ab D2009 funktionieren erst viele Dinge mit Unicode/UTF8 "out of the box" ohne das du was drum herum stricken must.