如何在Table的Filter属性中写表达式(50分)

  • 主题发起人 主题发起人 joann
  • 开始时间 开始时间
J

joann

Unregistered / Unconfirmed
GUEST, unregistred user!
Table1.Filter :='Zt ='+''''+ComboBox1.Text+'''';
运行出错
希望高手赐教,特别声明,我不想用Query。
 
这样试试
table1.Filter:=format('zt=%s',[''''+combbox1.text+'''']);
 
object DataSource1: TDataSource
DataSet = Table1
Left = 96
Top = 24
end
object Table1: TTable
Active = True
DatabaseName = 'DBDEMOS'
TableName = 'country.db'
Left = 48
Top = 24
end
Table1.Active:=false;
Table1.Filtered:=false;
Table1.Filter:='Name='+''''+combobox1.Text+'''';
Table1.Filtered:=true;
Table1.Active:=true;

没有一点问题
 
Table.Filtered := false;
talbe.Filter := 'Zt ='+''''+ComboBox1.Text+'''';
table.Filtered := true;
 
Table.Filtered := false;
talbe.Filter := 'Zt ='+'"'+ComboBox1.Text+'"';
table.Filtered := true;
 
talbe.Filter := 'Zt ='+'"'+ComboBox1.Text+'"';
 
Table1.Filter :='Zt ='''+ComboBox1.Text+'''';
不需要实验了。一定准确。
 
接受答案了.
 
后退
顶部