Z
zmj99
Unregistered / Unconfirmed
GUEST, unregistred user!
Query中用%变量%可以实现模糊查询。
而在Table.Filter中只有‘变量*’可以实现右模糊查询，无左模糊。
不知Filter中可否实现模糊查询。
而在Table.Filter中只有‘变量*’可以实现右模糊查询，无左模糊。
不知Filter中可否实现模糊查询。
L
LiuYangCD
Unregistered / Unconfirmed
GUEST, unregistred user!
不能左模糊查询。
K
kucio
Unregistered / Unconfirmed
GUEST, unregistred user!
估计不行
H
hujunyi
Unregistered / Unconfirmed
GUEST, unregistred user!
LiuYangCD 说得对，不过你可以在OnFilterRecord事件来做
T
Tab
Unregistered / Unconfirmed
GUEST, unregistred user!
>>Query中用%变量%可以实现模糊查询。
>>而在Table.Filter中只有‘变量*’可以实现右模糊查询，无左模糊。
>>不知Filter中可否实现模糊查询。
Filter中也可以实现模糊查找的，应采用如下形式
name like "%tom%"
name 是字段名。
>>而在Table.Filter中只有‘变量*’可以实现右模糊查询，无左模糊。
>>不知Filter中可否实现模糊查询。
Filter中也可以实现模糊查找的，应采用如下形式
name like "%tom%"
name 是字段名。
F
fstao
Unregistered / Unconfirmed
GUEST, unregistred user!
不过我觉得还是用sql语句要好点。
W
wumeng
Unregistered / Unconfirmed
GUEST, unregistred user!
用sql语句灵活且不易造成死锁.
F
flycat
Unregistered / Unconfirmed
GUEST, unregistred user!
写SQL语句
S
shangjintong
Unregistered / Unconfirmed
GUEST, unregistred user!
没有，改用别的方式
G
glink
Unregistered / Unconfirmed
GUEST, unregistred user!
table1.filtered:=true;//设置使打开。
table1.close;
table1.open;
table1.onFilterRecord中加入以下代码：
begin
with table1 do
begin
if fieldByName('myField').asString= 'myCondition' then accept:=true
else accept:=false;
end;
end;
即可。然后当你浏览table的时候，都是与'myCondition‘有关的记录。
我觉得filter比sql好用。
table1.close;
table1.open;
table1.onFilterRecord中加入以下代码：
begin
with table1 do
begin
if fieldByName('myField').asString= 'myCondition' then accept:=true
else accept:=false;
end;
end;
即可。然后当你浏览table的时候，都是与'myCondition‘有关的记录。
我觉得filter比sql好用。
D
dedman
Unregistered / Unconfirmed
GUEST, unregistred user!
tab:
我试过了，怎么好像不行，我的D4
glink:
要求的是模糊查询，改一下你的程序如下
var p
char;
p:=strpos(pchar(fieldbyname('myfield').asstring),pchar('mycondition'));
if p=nil then accept:=false
else accept:=true
我试过了，怎么好像不行，我的D4
glink:
要求的是模糊查询，改一下你的程序如下
var p
char;p:=strpos(pchar(fieldbyname('myfield').asstring),pchar('mycondition'));
if p=nil then accept:=false
else accept:=true
王
王安鹏
Unregistered / Unconfirmed
GUEST, unregistred user!
同意dedman，可以简化：
procedure tform1.table1onfilter；
begin
accept;=false;
if pos（‘condition’，fieldbyname（‘myfield’）.asstring）<>0 then
accept;=true；
end;
procedure tform1.table1onfilter；
begin
accept;=false;
if pos（‘condition’，fieldbyname（‘myfield’）.asstring）<>0 then
accept;=true；
end;
W
wjiachun
Unregistered / Unconfirmed
GUEST, unregistred user!
多人接受答案了。
