Sprawdzanie typu pola mssql w delphi

0

Witam
Czy można - a jeśli tak to jak - wyciągnąć typ pola w postaci stringu w delphi
np. ADOQuery.Fields[1].DisplayName.AsString można wyciągnąć nazwe kolumny a jak w podobny sposób można wyciągnąś typ danych danego pola?

0
procedure TForm1.GetFieldInfo;
var
  i   : integer;
  ft     : TFieldType;
  sft    : string;
  fname  : string;
begin
  ListBox1.Clear;
  for i := 0 to AdoQuery1.Fields.Count - 1 do
  begin
    ft := AdoQuery1.Fields[i].DataType;
    sft := GetEnumName(TypeInfo(TFieldType), Integer(ft));
    fname:= AdoQuery1.Fields[i].FieldName;

    ListBox1.Items.Add(Format('%d) NAME: %s TYPE: %s',[1+i, fname, sft]));
  end;
end;
0

dzięki za pomoc

1 użytkowników online, w tym zalogowanych: 0, gości: 1