puedes recorrerte los campos del dataset y mirar si existe
Código:
var
i : integer;
begin
i := 0;
while (i <= Table1.Fields.Count - 1) and (Table1.Fields[i].FieldName = 'fax') do
inc(i);
if i > Table1.Fields.Count - 1 then
ShowMessage('no existe')
else
ShowMessage('existe');
end;