DELPHI + SYbase 语句求教

开元

如下图

edit1 为编号 gdsid  字符型

edit2   期望是点击Button1后  表stkindtl中pkgtaxprc字段的最小值  pkgtaxprc 为double precision型


   写了下面的程序 结果运行出错  我是在不知道 错在那里，大侠多多指教 谢谢
procedure TForm1.Button1Click(Sender: TObject);
begin
    ADOQuery1.Close;
    ADOQuery1.SQL.Clear;
    ADOQuery1.sql.Add('select min(pkgtaxprc)  from stkindtl where gdsid='''+edit1.text+'''');
    ADOQuery1.open;
    edit2.text := ADOQuery1.sql.Add('select min(pkgtaxprc)  from stkindtl where gdsid='''+edit1.text+'''').AsString;

end;

[ 本帖最后由 开元 于 2009-3-10 19:20 编辑 ]

judite

delphi不懂

1、先要确保sql语句没问题，所以可以在
      ADOQuery1.sql.Add('select min(pkgtaxprc)  from stkindtl where gdsid='''+edit1.text+'''');
       之后加一句，先把sql语句打印出来看看，再用isql连接sybase看看sql语句是不是能通过
2、还有应该就是数据库驱动的问题了罢

-------------------------------
把软件版的回答del了

lsj

ADOQuery1.sql.Add('select min(pkgtaxprc)  as abcde from stkindtl where gdsid='''+edit1.text+'''');

最后一行
edit2.text := ADOQuery1.FieldByName('abcde').AsString;

尚枫

把错误提示贴出来，还有，你确定你的数据库连接是ADO驱动？

开元

谢谢楼上各位，问题已经解决