用数据库实现查找功能出错，谁帮我看看（用的是adoquery控件）
procedure TForm1.ComboBox1Click(Sender: TObject);
var
num:integer;
begin
num:=strToInt(combobox1.Text)
adoquery1.Close;//1
adoquery1.SQL.Clear;
adoquery1.sql.add('select * from try where num1=num');
adoquery1.active:=true ;
end;
错误提示是对“adoquery1.Close”有错误提示是"Missing operator or semicolon”
谢谢
问题点数：20、回复次数：8Top
1 楼soaringsouth（栈桥捉鳖）回复于 2002-05-08 17:02:06 得分 2
begin
adoquery1.Close;//1
adoquery1.SQL.Clear;
adoquery1.sql.add('select * from try where num1='+combobox1.Text);
adoquery1.active:=true ;
end;
Top
2 楼bestluo（要学）回复于 2002-05-08 22:25:33 得分 0
不行啊Top
3 楼My_first（小@_@小）回复于 2002-05-08 22:30:04 得分 2
num:=strToInt(combobox1.Text)
adoquery1.Close;//1
adoquery1.SQL.Clear;
adoquery1.sql.add('select * from try where convert(int,num)'+num);
adoquery1.active:=true ;Top
4 楼firetoucher（风焱）回复于 2002-05-08 22:32:16 得分 3
应该是
procedure TForm1.ComboBox1Click(Sender: TObject);
var
num:integer;
begin
num:=strToInt(combobox1.Text)
adoquery1.Close;//1
adoquery1.SQL.Clear;
adoquery1.sql.add('select * from try where num1=' +num);
adoquery1.active:=true ;
end;
Top
5 楼Mudeen（诸神的黄昏）回复于 2002-05-08 22:33:48 得分 3
动态参数:
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('select * from try where num1=:num');
adoquery1.parameters.parambyname('nub').asstring:=combobox1.text;
adoquery1.openTop
6 楼firetoucher（风焱）回复于 2002-05-08 22:33:49 得分 0
给分吧；）
Top
7 楼tazhch（鸭）回复于 2002-05-08 22:43:51 得分 5
应该是
procedure TForm1.ComboBox1Click(Sender: TObject);
var
num:integer;
begin
num:=strToInt(combobox1.Text)
adoquery1.Close;//1
adoquery1.SQL.Clear;
adoquery1.sql.add('select * from try where num1='''+num+'''');
adoquery1.active:=true ;
end;Top
8 楼zhang21cnboy（事了抚衣去，不留身与名）回复于 2002-05-09 09:14:13 得分 5
procedure TForm1.ComboBox1Click(Sender: TObject);
var
num:integer;
begin
num:=strToInt(combobox1.Text)//这个地方是不是少了一个分号???????
adoquery1.Close;//1
adoquery1.SQL.Clear;
adoquery1.sql.add('select * from try where num1=num');//这个地方num不能这样使用,.应该如下或者使用动态参数!
adoquery1.sql.add('select * from try where num1='''+num+'''');
adoquery1.active:=true ;
end;
你们都有没有研究过delphi的错误提示阿!语法错误!哦呀!这样的问题,真可悲阿!
还有这么多的人没有找出来!
Top
相关问题
关键词
得分解答快速导航
相关链接
广告也精彩
反馈
