Datentyp des Feldes auslesen

[RWarnecke]

Hallo,

ich habe da ein kleines Problem. Ich möchte ganz gerne über die Zeos - Komponenten 6.5.1 die Anzahl der Felder einer Tabelle und dessen Typen auslesen. Wenn ich die IB-Komponenten benutze funktioniert alles wunderbar, nur wenn ich den gleichen Code mit den Zeos-Komponenten anwende funktioniert es bei der Datenbank MySQL aber nicht bei Firebird. Was läuft da falsch ?

Um die Anzahl zu bekommen benutze ich folgende Zeile :
 anzahl := Query.FieldCount;
Um dem Typ des Feldes zu ermitteln, benutze ich die folgenden Code (habe ich hier in der Library gefunden) :

Delphi-Quellcode:

      Case ZQuery.Fields[IntZaehler].datatype Of
        ftUnknown:
          Begin
            sType := 'Unknown';
          End;
        ftString:
          Begin
            sType := 'String';
          End;
       .
       .
       .
      end;

Kann mir da jemand weiterhelfen ?