G
gzlitao
Unregistered / Unconfirmed
GUEST, unregistred user!
富翁们,新年好,在这里
祝:大家“心想事成”
谢谢。
为什么case不行出现以下错误。
[Error] gdtv36p.pas(336): Constant expression expected
sql语句是行的,但我不敢说
query1.sql.add('where 用户姓名 like"%edit2.text%"'); 行不。
希望那位高人指点以下,修改一下以下的代码,小弟会感激
的送上~~~~~~~~~~。
请多说//解释我是一个初学的超级大菜鸟。
procedure Tform1.SpeedButton6Click(Sender: TObject);
begin
case combobox1.itemindex of
0: pagecontrol2.activepage:=tabsheet5;//打开资料查找返回窗
query1.close;
query1.sql.clear;
query1.sql.add('select * from "C:/gdtv36/gdtv36.dbf"');
query1.sql.add('where 用户姓名 like"%edit2.text%"');
query1.open;
1: pagecontrol2.activepage:=tabsheet5;//打开资料查找返回窗
query1.close;
query1.sql.clear;
query1.sql.add('select * from "C:/gdtv36/gdtv36.dbf"');
query1.sql.add('where 用户地址 like"%edit2.text%"');
query1.open;
end;
end;
我还想请教一下,修改了sql查找的数据,如何用updatesql将他保存回原来
的库去。
谢谢。
祝:大家,真的成为“大富翁”
祝:大家“心想事成”
谢谢。
为什么case不行出现以下错误。
[Error] gdtv36p.pas(336): Constant expression expected
sql语句是行的,但我不敢说
query1.sql.add('where 用户姓名 like"%edit2.text%"'); 行不。
希望那位高人指点以下,修改一下以下的代码,小弟会感激
的送上~~~~~~~~~~。
请多说//解释我是一个初学的超级大菜鸟。
procedure Tform1.SpeedButton6Click(Sender: TObject);
begin
case combobox1.itemindex of
0: pagecontrol2.activepage:=tabsheet5;//打开资料查找返回窗
query1.close;
query1.sql.clear;
query1.sql.add('select * from "C:/gdtv36/gdtv36.dbf"');
query1.sql.add('where 用户姓名 like"%edit2.text%"');
query1.open;
1: pagecontrol2.activepage:=tabsheet5;//打开资料查找返回窗
query1.close;
query1.sql.clear;
query1.sql.add('select * from "C:/gdtv36/gdtv36.dbf"');
query1.sql.add('where 用户地址 like"%edit2.text%"');
query1.open;
end;
end;
我还想请教一下,修改了sql查找的数据,如何用updatesql将他保存回原来
的库去。
谢谢。
祝:大家,真的成为“大富翁”