我所有的引用,设置都完成了,代码如下:
procedure Tchaxun.BitBtn1Click(Sender: TObject);
begin
form3.ADOConnection1.Connected:=true;
if (edit1.Text<>'') or (edit2.Text<>'') then
with form3.adoquery1 do
begin
close;
sql.clear;
if (edit1.text<>'') and (edit2.text='')then
begin
sql.add('select * from 信息表 where 姓名 like ''%'+trim(edit1.Text)+'%''');
execsql;
sql.clear;
form3.DataSource1.DataSet.Active:=true;
form3.visible:=true;
end;
end;
end;
运行的时候出现'missing sql property',到底哪出错了呢?
procedure Tchaxun.BitBtn1Click(Sender: TObject);
begin
form3.ADOConnection1.Connected:=true;
if (edit1.Text<>'') or (edit2.Text<>'') then
with form3.adoquery1 do
begin
close;
sql.clear;
if (edit1.text<>'') and (edit2.text='')then
begin
sql.add('select * from 信息表 where 姓名 like ''%'+trim(edit1.Text)+'%''');
execsql;
sql.clear;
form3.DataSource1.DataSet.Active:=true;
form3.visible:=true;
end;
end;
end;
运行的时候出现'missing sql property',到底哪出错了呢?
解决方案 »
- 有没有什么类似Image PictureBox这样的控件,但不是显示图像,而是可以显示的是视频或视频的某一桢?
- 请问 imageEn 怎样 获得 Tif 文件 的页数 ???????????????? 急!!!!!!!!!!!!!!
- 请问有没有好用的而且是免费的打包程序?
- 在线等待急忙啊整个奇怪的问题
- 怎样快速查找出控件在哪里?比如我不知道Edit在哪里,不能把它拖到窗体上,只知道名字edit,怎么办?
- 关于fastreport参数传递问题,急!急!急!在线等待...
- 查错给分
- <<<<<<没有笑话了,求解skinengine278在d6的安装问题。
- 复制TreeView节点
- 李维是什么人,可否向小弟介绍一下,他有什么好书?
- 如何区分TreeView不同的父支下相同的子支呢???
- 怎样模拟 ALT+TAB 和 ALT+F4
begin
form3.ADOConnection1.Connected:=true;
if (edit1.Text<>'') or (edit2.Text<>'') then
with form3.adoquery1 do
begin
close;
sql.clear;
if (edit1.text<>'') and (edit2.text='')then
begin
sql.add('select * from 信息表 where 姓名 like ''%'+trim(edit1.Text)+'%''');
execsql; //1。------------Open;
sql.clear; //2。 -----------删除
form3.DataSource1.DataSet.Active:=true;
form3.visible:=true;
end;
end;
end;
------- 1。execsql 不返回數據集 应改为 Open;
------ 2。form3.adoquery1在此处sql 属性被清除 应删除此句
sql.clear;
form3.DataSource1.DataSet.Active:=true;改成
execsql;
form3.DataSource1.DataSet.Active:=true;
sql.Clear;
sql.clear;form3.DataSource1.DataSet.Active:=true;//清除了sql怎么active啊
form3.visible:=true;
Sql语句被清掉了