MetaData Ermitteln

[Leo675]

Hallo alle zusammen!

Ich hab ein folgendes Problem!

Ich soll eine Funktion entwickeln die Metadaten (SpaltenName, SpaltenTyp) in eine StringListe speichert. Ich Benutze den TSQLQuery und mit dem SpaltenNamen klappt es wunderbar und mit dem SpaltenTyp komme ich einfach nicht weiter, den die Komponeneten Fields oder FieldDefs besitzen keine Property DataType. Weis vielecht jemand wie man das realisieren könnte?

Delphi-Quellcode:

var
  i             : Integer;
  QQuery        : TSQLQuery;
begin
  
    with QHelp do begin
      for i := 0 to Fields.Count - 1 do begin
        CheckList.Add(Fields[i].FieldName+' '+...);
      end;
    end;
    
  


end;

[Bummi]

SqlQuery1.Fields[i].DataType