table1.filter问题(50分)

1

121boy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-23

• #1

建了一个dbf数据表,使用其filter属性对custno字符字段实现过滤
语句如下:
filter:='custno='+edit1.Text;
调试时,发现只对数字有效,对字母无效
何故???????????????????????????????????????

 

A

amo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-24

• #2

当然，
如果是字符型，
得是这样：
filter:='custon='+''''+edit1.text+'''';
这样filter中才会是custon='abcd';

 

黄

黄耀彰

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-24

• #3

写成这样不好吗？

procedure TfrmIn.Table4FilterRecord(DataSet: TDataSet;
var Accept: Boolean);
begin
Accept:=(Table1.FieldByName('custon').AsString=Edit1.text);
end;

 

小

小杰

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-08

• #4

可以这样写；
var
Str:String;
begin
Str:='custon = '''+edit1.text+'''';
Table1.Filter := Str;
Table1.Filtered := True;
end;

 

S

shiner

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-15

• #5

我同意amo的说法，我试过，table1中name字段记录全部为汉字。
s:=table1.fieldbyname('name').asstring;
table1.filter:='Name='+s;
table1.filtered:=true;
出错，提示：table1:field '' not found, 但我改为
table1.filter:='name='+''''+s+'''';
table1.filtered:=true;
通过了。

 

V

vinger

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-16

• #6

用format函数,方法如下:
filter:=format('custno='+'''%s''',[edit1.Text]);
即可

 

1

121boy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-07-28

• #7

多人接受答案了。