filter 写法

直接写：  
  Tabel1->Filter="FieldName='aaa'";     //aaa为字符类字段  
  Tabel1->Filter="FieldName=aaa";         //aaa为数字类字段  
  使用变量  
  1.字符类型  
  AnsiString   S;  
  S="aaa"   ;//给变量赋值  
  Tabel1->Filter=Format("Filter='%s'",OPENARRAY(TVarRec,(S)));  
  2.数字类型  
  int   S;  
  S=1;     //给变量赋值  
  Tabel1->Filter=Format("Filter=%s",OPENARRAY(TVarRec,(S)));  
  最后要将Table1->Filtered设置为true过滤才好用。 
  或者：  
  adotable1.Filter:='work_code='''+trim(label1.caption）+'''';  
  adotable1.Filtered:=true;  
  试试这个：  
  adotable1.Filter:='work_code='''+label1.caption+'''';  
  adotable1.Filtered:=true;  
  /////
  adotable.filiter:=strname + '='+quotedstr(strif);
  ////
        TDataSetState   =   (dsInactive,   dsBrowse,   dsEdit,   dsInsert,   dsSetKey,  
          dsCalcFields,   dsFilter,   dsNewValue,   dsOldValue,   dsCurValue,   dsBlockRead,     dsInternalCalc,   dsOpening);