★★★请问怎样判断表内的一个字段是否存在？★★★ 用Delphi判断！ADO连接！

Question

请问怎样判断表内的一个字段是否存在？  用Delphi判断！ADO连接！SQL里怎么判断？Delphi里怎么判断？急，在线等！

Answer 1

try
  query1.fieldbyname('字段名').values;
  有这个字段;
except
  无这个字段;
end;

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
 var
   StringList: TStringList;
begin
   ADOConnection1.GetFieldNames('数据表名', StringList);
   if StringList.IndexOf('字段名')>0 then
      Showmessage('存在!')
    else
      Showmessage('不存在!')
end;

Answer 3

delphi :
if table1.fiels.findfield('asdfas')=nil then showMessage('not exists!')mssql:
if Exists(select A.* from syscolumns A inner join sysobjects B on A.id=B.id  where B.type = 'U' and
                    B.name='TableName' and A.name='FieldName')
存在

Answer 4

user TDataset.FindField method

Answer 5

也可以这样判断
if AdoQueryTemp.FieldDefs.IndexOf(myDataSet.Fields[i].FieldName)>=0 then