Ich habe versucht, mit Delphi 7 und den mitgelieferten Interbase-Komponenten eine Verbindung mit einer Firebird-Datenbank herzustellen.
Das hat auch problemlos geklappt: mit IBDatabase Verbindung aufbauen, IBTransaction zwischenschalten und mit IBQuery und
SQL-Befehlen die gewünschten Daten abrufen.
Aber ich habe statt Umlauten nur Hieroglyphen bekommen, immer mit zwei Zeichen, die nicht zum normalen Schriftsatz gehören. In Decimal-Code umgewandelt haben diese Zeichen immer mit #195 begonnen. Ich könnte die Umlaute natürlich bei Weiterbenutzung der Daten umwandeln, z.B. StringReplace(s, #195#132, 'Ä', [rfReplaceAll]), das wäre aber nur eine Notlösung
Dann habe ich die ZeosLib-Komponenten installiert. In ZeosLib konnte ich den Zeichensatz einfach mit
ZConnection1.ClientCodepage := WIN1252 einstellen, dann werden die Umlaute korrekt angezeigt. So eine Funktion gibt es aber bei IBDatabase nicht.
Da ich jetzt den richtigen Zeichensatz herausgefunden habe, habe ich nochmal recherchiert und mit den Schlüsselwörtern "Delphi Firebird TIBDatabase WIN1252" die einfache Lösung gefunden:
Der Zeichensatz lässt sich in den
IBDatabase.Params einstellen !
Ich hatte das auch vorher schon versucht und in Params alle möglichen Zeichensätze mit
DEFAULT CHARACTER SET xxx oder
SET NAMES xxx eingeben. Das hatte aber nicht den gewünschten Erfolg.
Der korrekte Einstellung lautet nämlich
LC_CTYPE=WIN1252
Hier jetzt meine Einstellung in IBDatabase.Params mit der alles korrekt angezeigt wird:
user_name=sysdba
Password=masterkey
lc_ctype=WIN1252
Vielleicht hat noch jemand Lust und kann den Unterschied zwischen LC_CTYPE, DEFAULT CHARACTER SET und SET NAMES erklären
bzw. mögliche Parameter, die unter
IBDatabase.Params eingestellt werden können.