table1.filter:='birth='+maskedit1.text;
table1.filtered:=true;

解决方案 »

  1.   

    procedure TForm1.Button1Click(Sender: TObject);
       begin
          Table1.Filtered := True;
          Table1.Active := not Table1.Active;
       end;   procedure TForm1.Table1FilterRecord(DataSet: TDataSet;
         var Accept: Boolean);
       begin
          Accept := table1.FieldValues['SaleDate']>self.DateTimePicker1.Date;//用DateTimePicker返回的日期(Tdatetime)
                   //accept为 Boolean 类型
       end;
                   //一定先要把Table1的Filtered属性改为True
       end.
      

  2.   

    table1.filter:='birth='+'''+maskedit1.text+''';
    table1.filtered:=true;
      

  3.   

    好象一行啦, hhzqf1980我是用的maskedit
      

  4.   

    table1.filter:='birth='+strtodate(maskedit1.text);
    table1.filtered:=true;
      

  5.   

    strtodate就是把字符型转换成日期型,
      

  6.   

    table1.filter:='birth='+'''+maskedit1.text+''';
    table1.filtered:=true;这样写就可以了,当你使用filter的时候,filter本身是一个字符串,而作为条件判断的值必须加上单引号,而在字符串引用中,单引号要改用‘’表示。
      

  7.   

    但是不是出错,显示:'+maskedit1.text+'is not a valid date
      

  8.   

    写错了,应是
    但是不行,还是出错,显示:'+maskedit1.text+'is not a valid date