怎么在adoquery查找一个fielname的值

如何在adoquery查找一个fielname的值?
我想在adoquery返回的试图中查找是否存在一个字段名(fielname)为"ccc"的字段.
我目前用的方法是:
 begin
 for i:=0 to adoquery.fieldcount-1 do
  if adoquery.fields[i].fielname='ccc' then 
  begin  
  showmessage('找到');
  break;
  end; 
  
 end;
请问有没有更简单的方法?谢谢!


[解决办法]

Delphi(Pascal) code

var  field:TField;begin  field:=ADOQuery1.FindField( 'fieldName' );  if Field = nil then    showmessage( '没找到' )  else    //.....end;