[Alegun]

Запросом не знаю как, а так, вроде вот

Код:

...
var
 sl: TStrings;
begin
 sl:= Tstringlist.Create;
 Table.GetFieldNames(sl);

 if sl.IndexOf('FieldName') > 0 then .. // есть в таблице поле FieldName
  else .. // нету такого поля

 sl.Free;
end;