照Delphi一本教程中的说的,按照通配符进行模糊查询,代码如下:
procedure TForm1.Button1Click(Sender: TObject);
var str:string;
begin
str:='select * from jcxs where 轿车名称 like'+""+edit1.text+'%'+"";
query1.close;
query1.sql.clear;
query1.sql.add(str);
query1.prepare;
query1.open;
end;
procedure TForm1.Button1Click(Sender: TObject);
var str:string;
begin
str:='select * from jcxs where 轿车名称 like'+""+edit1.text+'%'+"";
query1.close;
query1.sql.clear;
query1.sql.add(str);
query1.prepare;
query1.open;
end; 程序总是报错,都是str字符串有错,是不是我写法上有错,我是按照书上教的做的,一模一样的
顺便问问各位前辈,我很喜欢Delphi,可是身边无人可问也无人可以教我,只有买些Delphi的书来学,如果碰到问题解决不了,唯一的办法就是通过论坛求教高手了,大家给出出主意,我该怎么办才能尽快入门,谢谢
procedure TForm1.Button1Click(Sender: TObject);
var str:string;
begin
str:='select * from jcxs where 轿车名称 like'+""+edit1.text+'%'+"";
query1.close;
query1.sql.clear;
query1.sql.add(str);
query1.prepare;
query1.open;
end;
procedure TForm1.Button1Click(Sender: TObject);
var str:string;
begin
str:='select * from jcxs where 轿车名称 like'+""+edit1.text+'%'+"";
query1.close;
query1.sql.clear;
query1.sql.add(str);
query1.prepare;
query1.open;
end; 程序总是报错,都是str字符串有错,是不是我写法上有错,我是按照书上教的做的,一模一样的
顺便问问各位前辈,我很喜欢Delphi,可是身边无人可问也无人可以教我,只有买些Delphi的书来学,如果碰到问题解决不了,唯一的办法就是通过论坛求教高手了,大家给出出主意,我该怎么办才能尽快入门,谢谢
解决方案 »
- 世上有99%以上的人还没发现!(希望去试验过的都回帖,谢谢)不错。刚试过。
- 郁闷!如何用adoquery访问执行oracel的过程?
- 什么情况下需要应用指针?
- 菜鸟紧急提问:adoqry不会用,请帮忙。
- 哪位好心人,进来看一看啊~~
- 怎样对日期进行查询
- Table1有 ‘证人1ID’ 和 ‘证人2ID’字段。table2中有ID,姓名两个字段,如何显示表1并将Id号换为对应的姓名
- 如何在delphi中用DBCheckbox和SQL Server实现相关联?
- 有人直接在sql server库中修改数据,事后你在哪里怎样才能发现被改动的数据?
- 重分征求信息管理系统开发经验!
- 100分求助!!一个学期初始化的问题。。
- 如何在DLL实现录音功能?
字符串中是不能用双引号的,
你看看是不是用了双引号?
''<>"这个要注意...
''<>"这个要注意...
procedure TForm1.Button1Click(Sender: TObject);
var sqll:string;
begin
with query1 do
begin
close;
sqll:='select * from jcxs where 轿车名称 like :a%';
sql.Clear;
sql.Add(sqll);
Params[0].AsString:=trim(edit1.text);
execsql;
open
end;
end;