引用SQL查询结果用什么语句？（在线等）谢谢

Question

请问： 
 with Query1 do
   begin
     Close;
     SQL.Text:='select 余额 from Table2 where 卡号='+DBEdit4.Text;
     ExecSQL;
     open;
     DBEdit5.Text:= SQL.Text;
   end;
我想在Table2中查找到"卡号=DBEdit4.Text"
并把引用查找到的记录，我该怎么做？

Answer 1

Tlble2.locate('卡号',DBEdit4.Text,差数)locate不知有没有打错

Answer 2

  Query1.FieldValues['余额']

Answer 3

SQL.Text:='select 余额 from Table2 where 卡号='+DBEdit4.Text;
楼主这一句错了吧，呵呵!

Answer 4

ziqing
请帮我指出错在哪里好吗？谢谢

Answer 5

jacket008(§忧国忧民§) ，
请问Tlble2.locate('卡号',DBEdit4.Text,差数)
中的差数是什么啊？谢谢

Answer 6

语法没错吧！差数：按Ctrl+点击locate函数就看到了

Answer 7

ExecSQL;
open;
会不会多了一个，open;就可以了吧？

Answer 8

with Query1 do
   begin
     Close;
     SQL.Text:='select 余额 from Table2 where 卡号='+DBEdit4.Text;
     open;
     DBEdit5.Text:= SQL.Text;
   end;
直接修改dbedit5.text后query1.post;
就可以啊！

Answer 9

SQL.Text:='select 余额 from Table2 where 卡号='+DBEdit4.Text;
首先应该注意你的语句写法！！！你在执行前show一下SQL再看看效果！！我怀疑的语句问题·

Answer 10

str:='select 余额 from Table2 where 卡号 = '+''''+DBEdit4.Text+'''';
if form1.ADOQuery1.Active=true then
    form1.ADOQuery1.Active:=false;
  form1.adoquery1.SQL.Clear;
  form1.ADOQuery1.SQL.Add(str);
   showmessage(str);
  form1.ADOQuery1.ExecSQL ;
  form1.adoquery1.Active :=true;ok了

Answer 11

with ADOQuery1 do 
Begin
  Close;
  SQL.Clear;
  SQL.Add('SELECT 余额 FROM Table2 WHERE 卡号 = ''' + DBEdit4.Text + '''');
  ExecSQL;
End;