Fehlende Sonderzeichen beim einlesen einer Textdatei

boontec · Verfasst: Do 15.12.05 14:57

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 Gausi: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am Do 15.12.2005 um 14:00
Moderiert von Tino: Option "Großschreibung im Titel erlauben" aktiviert.

Stefan.Buchholtz · Verfasst: 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:

markieren

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

_________________
Ein Computer ohne Windows ist wie eine Schokoladentorte ohne Senf.

boontec · Verfasst: 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

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme