LISTBOX und UNICODE/UTF8

**wschrabi**

Hallo,
ich habe einen Filenamen wo ein UTF8 Zeichen drin ist. Diese Datei sieht man schon im Browser richtig als accute c.
Doch wenn ich in eine Listbox diesen STRING mit Listbox2.Items.Add ( Filename[i] ) hinzufüge sieht man zur Laufzeit in der Box einen Blöden Strich statt accute c.
IM XE6 Delphi IDE sieht man aber schön unter UNTERSUCHEN, dass das accute c da ist.
Was mache ich falsch? Bitte um Rat. DANKE

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.MakeFileList(teil:array of string; Verzeichnis: string);

var

  Files: TStrings;

  i: integer;

begin

  Files := TStringList.Create;

  try

  //  procedure FindAllFiles(const FileList: tstrings;RootFolder: string; Maske: array of string; Recurse: Boolean = True);

    FindAllFiles(files, Verzeichnis, teil, false);

    for i := Files.Count -1 downto 0 do

    begin

        ListBOx2.Items.Add(Unicodestring(Files[i]));

        //DeleteFile(Files[i]);

    end;

  finally

    Files.Free;

  end;

end;

LISTBOX und UNICODE/UTF8

LISTBOX und UNICODE/UTF8

Forumregeln