Entwickler-Ecke

Dateizugriff - Fehlende Sonderzeichen beim einlesen einer Textdatei


boontec - Do 15.12.05 14:57
Titel: Fehlende Sonderzeichen beim einlesen einer Textdatei
Servus
wie oben erwähnt werden beim einlesen von textdateien die sonderzeichen nicht richtig angezeigt.

die datei wurde von MS Dos erstellt und wird von einer Trichedit box eingelesen, mit einer TMemo box hab ich es auch probiert.. klappt aber auch nicht..

was kann ich tun das es mir die zeichen Ö, Ä, Ü, usw anzeigt ?

MfG und Thx


Moderiert von user profile iconGausi: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am Do 15.12.2005 um 14:00
Moderiert von user profile iconTino: Option "Großschreibung im Titel erlauben" aktiviert.


Stefan.Buchholtz - Do 15.12.05 15:07

DOS verwendet für Sonderzeichen eine andere Zeichenkodierung als Windows. Du kannst einen String mit der Windows-Systemfunktion OemToChar vom DOS- in den Windows-zeichensatz convertieren, mit CharToOem wieder zurück.

Wenn du den Text schon in einem Memo hast, funktioniert das so:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
var
  s: String;
{...}
s := Memo.Lines.Text;
OEMToChar(PChar(s), PChar(s));
Memo.Lines.Text := s;


Stefan


boontec - Do 15.12.05 15:18

hey danke für die schnelle antwort und für den codeschnipsel bin in delphi noch etwas unbeholfen (delphi seid einer woche:D )

werde es gleich mal ausprobieren

€dit: Ok danke hat geklappt Big Thx