Einzelnen Beitrag anzeigen

Benutzerbild von PhilmacFLy
PhilmacFLy

Registriert seit: 20. Jan 2008
Ort: Nürnberg
340 Beiträge
 
FreePascal / Lazarus
 
#1

TnTlabel + Zeos + Firebird Encoding Probleme

  Alt 24. Sep 2013, 09:38
Datenbank: Firebird • Version: 2.1 • Zugriff über: Zeos 7.0.5
Moin

Nachdem ich jetzt mein Projekt in Delphi 2007 mit Zeos 7.0.5 hab, dachte ich eigentlich das das mit den kyrillischen Zeichen aus der Datenbank kein Problem mehr sein sollte. Jetzt liefert mir aber meine kleine Testanwendung die ich mir geschrieben hab trotzdem nur Kauderwelsch.
Delphi-Quellcode:
Zconnection1.Connect;
ZQuery1.SQL.Text := 'Select * From Test Where ID = 2';
Zquery1.Open;
tntlabel1.Caption := Zquery1.FieldByName('text').AsWidestring;
tntedit1.Text := Zquery1.FieldByName('text').AsWidestring;
label1.Caption := Utf8toAnsi(Zquery1.FieldByName('text').Asstring);
edit1.Text := Utf8toAnsi(Zquery1.FieldByName('text').Asstring);
Zquery1.close;
Wenn ich jetzt z.B. "Türöffner" auslesen will kommt für die Tntcomponenten: türöffner für die normalen funktionierts logischer weise, wenn ich фывафыва aus der Datenbank lesen will krieg ich bei TnT фывафыва für die normalen aber nur ????????.
Edit: Auf dem russischen Windows wird dann wieder фывафыва draus.

In der ZConnection hab ich die Clientcodepage auf UTF8 und die Controlscodepage auf cCP_UTF8 eingestellt.
Das Feld das ich auslese ist: Charset UTF8 und Coallate UTF8.

Im IBExpert wird alles korrekt dargestellt.

Jetzt ist natürlich die Frage wo liegt das Problem?
Philipp N.
"Programmiern ist wie küssen:
Mann kan darüber reden, mann kann es beschreiben,
aber man weiss erst, was es bedeutet,
wenn man es getan hat"

Geändert von PhilmacFLy (24. Sep 2013 um 10:06 Uhr)
  Mit Zitat antworten Zitat