数据库问题(5分)

cuicui · 2002-10-24

我用一个查询语句：用按钮选择查询种类，通过edit1输入查询值，可是查询不到
请问如何解决？
其中的语句如下：
if RadioButton1.Enabled then
begin
query1.Close;
query1.SQL.Clear;
query1.SQL.Add('select * from zjb where zh='''+edit1.text+'''');
query1.open;
end;
if RadioButton2.Enabled then
begin
query1.Close;
query1.SQL.Clear;
query1.SQL.Add('select * from zjb where jg='''+edit1.text+'''');
query1.open;
end;

闲云野鹤 · 2002-10-24

你的语句写错了，
应该是query1.SQL.Add('select * from zjb where jg=:a');
query1.sql.paramfieldbyname('g').asstring:=edit1.text;
query1.open;
中见的paramfieldbyname我记不情了，反正只要你敲”par“delphi会自动提示的

micro73 · 2002-10-24

query1.SQL.Add('select * from zjb where zh='+#39+edit1.text+#39);

雪中漫步 · 2002-10-24

不是语句的错
是if RadioButton1.Enabled 的错吧
我想应该 if RadioButton1.checked 吧

闲云野鹤 · 2002-10-24

query1.sql.parameters.parambyname('g').asstring:=edit1.text;
我想起来了，呵呵

ydjjld · 2002-10-24

雪中漫步说的很对，我已经试验过了。在VB中是enable,不知道顶楼的是不是把delphi和VB
搞混了。

szloner · 2002-10-28

查询语句写的没有问题，你再好查查吧，可能RadioButton或数据的问题，最好
query1.SQL.Add('select * from zjb where zh='''+trim*(edit1.text)+'''');

misxjq · 2002-10-28

雪中漫步说得对！
应该是：if RadioButton1.Checked then

九月飞鹰 · 2002-12-30

雪中漫步说得对！

zhoulide · 2002-12-30

查询语句是对的，Edit1需要加Trim函数
错误确实是你的RadioButton1的属性上了
最好用这个格式
IF Then
Begin
End
Else If Then
Begin
End;

f-h-s · 2002-12-30

两个 if 语句的条件都写错了，应为
if RadioButton1.Checked then 和
if RadioButton2.Checked then

数据库问题(5分)

cuicui

Unregistered / Unconfirmed

闲云野鹤

Unregistered / Unconfirmed

micro73

Unregistered / Unconfirmed

雪中漫步

Unregistered / Unconfirmed

闲云野鹤

Unregistered / Unconfirmed

ydjjld

Unregistered / Unconfirmed

szloner

Unregistered / Unconfirmed

misxjq

Unregistered / Unconfirmed

九月飞鹰

Unregistered / Unconfirmed

zhoulide

Unregistered / Unconfirmed

f-h-s

Unregistered / Unconfirmed

Similar threads