请您进来帮个忙！谢谢！(50分)

with dm.ADOQuery do
begin
Close;
sql.clear;
sql.add('select a.id as 企业编号,a.enterprisename as 企业名称 ,a.enterpriseaddress as 企业地址,a.enterprisetwine as 邮编,a.contact as 联系人,') ;
sql.add('a.connectphone as 联系电话, a.mailbox as 邮箱,a.bank as 开户银行,a.numberedaccount as 账号 from enterprisebase a where (a.id in (select b.enterpriseid from contractmaster b where b.unpaid <> 0))') ;
Open;
end;
这是程序中的一段语句，可以在DBGrid中正确的显示出来，但我不知道怎么控制每个字段的长度，
求您帮忙指点一下！谢谢了！

dbgrid.Columns.Width:=200;

要于什么？可以 select max(length(trim(FieldName))),.....,....来做。
或直接查询相应的 Table.

dbg.Columns.Items.Width:=100;

解决！
谢谢！

多人接受答案了。