如何得到Query的SQL中的多表的各个字段?

Question

如
SQL: select a.编码,a.名称,b.数量,(b.数量*a.单价) as 金额 from 库存 a,销售 b where a.编码=b.编码
要得到: a.编码,a,名称,b.数量,a.单价

Answer 1

Query1.fields.fields("编码").asstring

Answer 2

select a.编码,a.名称,a.单价，b.数量,(b.数量*a.单价) as 金额 from 库存 a,销售 b where a.编码=b.编码你直接加一个a.单价不就可以了么？然后用fieldbyname('编码')....就可以访问了

Answer 3

我在搞查询条件设置窗体。原理是从查询窗体传过来一个TQuery,然后我要分析Query的SQL语句得到其中用的字段，再将字段显示在ListBox中供用户操作设置条件，最后根据用户的操作生成新的条件对Query进行查询。

Answer 4

我要得到的是SQL语句中的字段名，而不是结果集的字段名。

Answer 5

此处取得的是数据库中的字段名称！
procedure TForm1.FormCreate(Sender: TObject);var
  I:integer;
begin
  listbox1.Items.Clear;
  with adoquery1 do
  begin
    close;
    sql.Clear;
    sql.Add('select * from yemp');
    open;
  end;
    for i:=0 to adoquery1.FieldCount -1 do
    begin
      listbox1.Items.Add(adoquery1.FieldList.Fields[i].FieldName  );
    end;
end;