如何控制DBGrid的列宽，我可不是说手动调节！我的意思是在程序中的DBGRID属性！

[l_ran]

我是用QUERY连接DATASOURCE然后接在DBGRID上
在程序中执行查询，所以显示的列也不确定，
我的意思是在程序中可以引用的DBGRID属性

[cle14]

type array of integer.
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;


DataCol: Integer; Column: TColumn; State: TGridDrawState);


begin


///////Begin 保留


if XXX[Column.Field.Index] < Canvas.TextWidth(Column.Field.DisplayText) then


XXX[Column.Field.Index] := Canvas.TextWidth(Column.Field.DisplayText);


///////End 保留


end;
伴水早回答过这个问题了。

[cle14]

type xxx array of integer;

[l_ran]

那么，是不是说，每显示一个，这个宽度就会自动重置一下呢？
会不会速度有问题？

[macro_love]

for i:=0 to DBGrid1.Columns.Count-1 do
begin
DBGrid1.Columns[i].Width:=60;
end;
将每行宽设为60，具体的你自己去定义吧