Umlaute

[Berni68]

Hallo zusammen,

wie kann ich folgendes Problem in Lazarus umgehen:

RenameFile(quelle,ziel) funktioniert NICHT mit Umlauten
(*
FileExists() funktioniert mit Umlauten
DirectoryExists() funktioniert mit Umlauten
DeleteFile() funktioniert mit Umlauten
ForceDirectory() funktioniert mit Umlauten
*)
sobald in quelle oder ziel entweder im Pfad oder im Dateiname ein Umlaut (äöü)
vorhanden ist (wo auch immer) wird nicht mehr umbenannt.

[Bernhard Geyer]

Sind Bugs in der Lazarus-VCL die (denke ich) größtenteils der Entscheidung geschultet sind den nativen Unicode-Stringtyp als UTF8 zu implementieren.

[himitsu]

Die Lazarus-VCL/RTL ist vorwiegend Unicode und teils UTF-8 und die FPC-RTL ist wohl mehr UTF-8 ... da wohl stimmen manchmal die Umwandlung nicht ganz

und du mußt auch noch aufpassen wann du welche Kodierung verwenden mußt.

[Berni68]

und wie pass ich da am besten auf?

[himitsu]

Zitat:

Zitat von Berni68

und wie pass ich da am besten auf?

Na schauen von welchem Typ die Parameter sind.

WideString, UTF8String, AnsiString/String, ...

[Berni68]

da kann ich nicht viel aufpassen.
ich verwende Lazarus zur Erstellung einer dll (64bit) die als UDF in Firebird verwendet wird.
da krieg ich die Zeichenfolgen (nur) als PChar.
Und mit PChar gehts rename mit Umlauten nicht. (string hab ich auch ausprobiert (ausserhalb der UDF)
geht aber auch nicht)

[himitsu]

Wenn nur PChar und String zu Auswahl stehen, dann kannst du es nur mal UTF-8-kodiert versuchen ... wenn dieses auch nicht geht, dann geht es einfach nicht. :stupid:

[Berni68]

Es gibt auch noch die Funtionen:
FileExistsUTF8
DirectoryExistsUTF8
DeleteFileUTF8
RenameFileUTF8
dann klappt's auch mit den Umlauten.

[JamesTKirk]

Zitat:

Zitat von Berni68

Es gibt auch noch die Funtionen:
FileExistsUTF8
DirectoryExistsUTF8
DeleteFileUTF8
RenameFileUTF8
dann klappt's auch mit den Umlauten.

Dann waren deine Strings wohl UTF-8 kodiert. Die FCL und die RTL von Free Pascal verwenden im Gegensatz zur LCL von Lazarus noch immer ANSI-Kodierung.

Theoretisch hätte folgender Aufruf zum Ziel führen können:

Delphi-Quellcode:

RenameFile(UTF8ToAnsi(quelle), UTF8ToAnsi(ziel));

Ein entsprechender Wikiartikel bei Free Pascal/Lazarus findet sich übrigens hier.

Gruß,
Sven