一个简单问题，在线等吧

[wofan]

st:='select ccuscode as 编码,ccusname as 客户名称 ';
st:=st+'from Customer ';
Aq:=tadoquery.Create(self);
with Aq do
begin
connectionstring:=dm.Adocon.ConnectionString;
close;
sql.Text:=st;
open;
　end;

为什么Fields.Fields[i].FieldName;还是显示ccuscode,ccusname
而不是“编码与客房名称”呢？

怎样才能显示AS后的中文

[Tensionli]

Fields[0].DisplayLabel := '编码';

[wofan]

我想自动获取

[YAMABACK]

是不是手动添加了DBGrid的Columns?

[wofan]

没有，我直接取值to stringgrid.cells[]

[wofan]

没人知道吗?

[hsmserver]

没关系的你直接写别名就可以
你这样试一下
with Aq do
begin
connectionstring:=dm.Adocon.ConnectionString;
close;
sql.Text:='select ccuscode as 编码,ccusname as 客户名称 from Customer ';

open;
　end;

[wofan]

楼上你没弄懂偶的意思

我要把别名读出来

Fields[i].DisplayLabel后还是读的字段名