table1.Close;
        table1.Filter:='bjdjg1="'+edit6.Text+'"';
        table1.Filtered:=true;
          table1.Open;
請指點一下小弟。不勝感激!!!!

解决方案 »

  1.   

    報的錯誤是:invalid filter expression character:"'
    對於"'我就不知道哪個對哪個了。
      

  2.   

    table1.Close;
            table1.Filter:='bjdjg1='''+edit6.Text+'''';
            table1.Filtered:=true;
              table1.Open;
      

  3.   


      ADOQuery1.Closet ;
      ADOQuery1.Filtered := True;
      ADOQuery1.Open;procedure TForm1.ADOQuery1FilterRecord(DataSet: TDataSet;
      var Accept: Boolean);begin
      Accept := ADOQuery1.FieldByName('bjdjg1').AsString = Edit6.Text ;
    end;
     //  //过滤: 将会检索所有满足条件的纪录,再选出有效的,效率差
      

  4.   

    up,genphone_ru(改行去学VC)说得对
      

  5.   

    -------------------------------------------------
    table1.Close;
            table1.Filter:='bjdjg1="'+edit6.Text+'"';
            table1.Filtered:=true;
              table1.Open;
    --------------------------------------------
    以上语句,可以查看delphi中得FILTER范例,再过滤前,不需要关闭表。关闭得表格无法实现过滤
      

  6.   

    table1.Close;
    table1.Filter:='bjdjg1='''+edit6.Text+'''';
    table1.Filtered:=true;
    table1.Open;
    就是这个"和''的关系
      

  7.   

    在delphi中一般只用单引号,并且三个单引号相当于一个引号