5,388
社区成员
发帖
与我相关
我的任务
分享TTable的Filter问题
使用TTable时，filter需要实现对某个字段的模糊查询bh like '%abc%'或bh matches '*abc*'，filter该如何写？
...全文
请发表友善的回复…
发表回复
cdsgajxlp 2005-10-10
- 打赏
- 举报
ADOQuery
常遇道 2005-10-10
- 打赏
- 举报
見意樓主改用ADOQuery靈活多了。
AdoreTour 2005-10-10
- 打赏
- 举报
BDE的Query的Filter 操作运算符号中好象不能用Like的吧,真的不爽,我改ADO了
swayi21 2005-09-26
- 打赏
- 举报
oh shit,
with DataSet do
begin
First;
while not DataSet.Eof do
begin
FieldValue := FieldByName(YourFieldName).AsString;
Accept := Pos(FieldValue, YourString) > 0; // or other processing code.
Next;
end;
end;
我咋就老是有这毛病呢，:(
with DataSet do
begin
First;
while not DataSet.Eof do
begin
FieldValue := FieldByName(YourFieldName).AsString;
Accept := Pos(FieldValue, YourString) > 0; // or other processing code.
Next;
end;
end;
我咋就老是有这毛病呢，:(
swayi21 2005-09-26
- 打赏
- 举报
外面用Filtered := True;
在OnFilter事件里循环
with DataSet do
begin
while not DataSet.Eof do
begin
FieldValue := FieldByName(YourFieldName).AsString;
Accept := Pos(FieldValue, YourString) > 0; // or other processing code.
end;
end;
不过，好好的TQuery为什么不用呢？
在OnFilter事件里循环
with DataSet do
begin
while not DataSet.Eof do
begin
FieldValue := FieldByName(YourFieldName).AsString;
Accept := Pos(FieldValue, YourString) > 0; // or other processing code.
end;
end;
不过，好好的TQuery为什么不用呢？
usa112233 2005-09-22
- 打赏
- 举报
'bh like ''%abc%'''好象不行啊，大哥你试过没有？
littlebobo 2005-09-21
- 打赏
- 举报
不好意思，写错了
Table1.Filter := 'bh like ''%abc%''';
Table.Filtered := true;
Table.open;
Table1.Filter := 'bh like ''%abc%''';
Table.Filtered := true;
Table.open;
littlebobo 2005-09-21
- 打赏
- 举报
Table1.Filter := 'bh like %abc%';
Table.Filtered := true;
Table.open;
Table.Filtered := true;
Table.open;
smiler007 2005-09-20
- 打赏
- 举报
那就不要用TTable，用TQuery好了...
usa112233 2005-09-20
- 打赏
- 举报
要模糊查询 ，=好象只是精确匹配
real_name 2005-09-20
- 打赏
- 举报
dm.Table1.Filter:=你的条件;
dm.Table1.Filtered:=true;
dm.Table1.Filtered:=true;
ztenv 2005-09-19
- 打赏
- 举报
dm.Table1.Filter:='belong='+QuotedStr(mainf.TreeView1.Selected.Text); dm.Table1.Filtered:=true;
