如何联结过滤条件
编号：QA003837
建立日期: 2001年2月5日 最后修改日期：2001年2月5日
所属类别：
王生:
初学delphi遇到的问题太多，有些问题自己确实解决不了，特来函求教，望赐教。
procedure TForm1.Button1Click(Sender: TObject);
begin
table1.filteroptions:=[focaselnsensitive];
table1.filter:='''过滤条件1''=''过滤条件2''';
table1.filtered:=tyue;
失败，但将过滤条件改为edit1.text输入则可以正常执行。
table1.filter:=edit1.text;
end;
end;
用另外一种方法结果相同:
procedure TForm1.Button1Click(Sender: TObject);
begin
with table1 do
try
disablecontrols;
filtered:=faise;
filter:=memo1.text;
filtered:=true;
finally
enablecontrols;
end;
end;
如果将filter:=memo1.text;改为:
filter:='''过滤条件1''=''过滤条件2''';失败。
回答:
所说的第一个问题我不明白为什么要用"="来联结条件,但我实际试了一下, 好像在TABLE的FILTER中属性中是不可以用"="来做为条件联结的. 你可用"AND"和"OR"等来联结过滤条件。如:
procedure TForm1.Button1Click(Sender: TObject);
begin
with table1 do
try
disablecontrols;
filtered:=false;
filter:='size>2 AND weight>8'; 即过虑条件为:filter:='条件1 AND 条件2'
filtered:=true;
finally
enablecontrols;
end;
end;
即可, 如有问题请来信告知..
此问题由VASON回答。
| |
|
|
| |
|
|
