Delphi-PRAXiS - Delphi Assignfile mit Unicode füttern

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)

- - Delphi Assignfile mit Unicode füttern (https://www.delphipraxis.net/134770-assignfile-mit-unicode-fuettern.html)

Assignfile mit Unicode füttern

Moin,

ich habe eine Routine, die noch mit assignfile etc. arbeitet (wegen typisierter Binärfiles). Wenn ich dem jetzt einen normalen ANSI-Pfad übergebe, funzt das ja wie gehabt. Jetzt habe ich zum Spaß mal ein wenig kyrillisch in den Pfad eingeführt. Danach wird die Datei zwar geöffnet, beim Reset gibt es den E/A-Fehler 64. Wenn ich die Exceptions ausschalte, fängt das erste Auslesen an einer anderen Stelle an. Der Dateizeiger scheint um Einiges verschoben zu sein (wahrscheinlich um die Anzahl der kyrillischen Zeichen).

Gibt es eine andere (unicodefähige) Möglichkeit, mit typisierten Dateien zu arbeiten?

Grüße, Messie

Re: Assignfile mit Unicode füttern

Dazu benötigst du entweder Delphi 2009 oder die TNTWare-Controls welche schon ein Unicodefähiges AssignFile bereistellen.

Ansonsten alls es selbst mit der entsprechenden WinAPI-Funktionen in Wide-Ausführung arbeiten um Dateien zu öffnen.

Re: Assignfile mit Unicode füttern

Danke für die schnelle Anwort. Kannst Du mir noch einen Tipp geben, in welcher Tnt-Komponentensammlung das drin ist? In den TMS Unicode Controls habe ich nichts gefunden.

Grüße, Messie