使用
DBGrid1.Columns[x].Width := 100;来设置Column的宽度。将DefaultDrawing设为false;在DrawColumnCell事件中DBGridS1.Canvas.TextWidth(Column.Field.AsString)可获得当前字段文本的长度,只要取这个Column中所有记录的最长值来做为这个Column的宽度就行了。
在取TextWidth前要先设置好字体,它是根据字体来进行字符串宽度测量的
DBGrid1.Columns[x].Width := 100;来设置Column的宽度。将DefaultDrawing设为false;在DrawColumnCell事件中DBGridS1.Canvas.TextWidth(Column.Field.AsString)可获得当前字段文本的长度,只要取这个Column中所有记录的最长值来做为这个Column的宽度就行了。
在取TextWidth前要先设置好字体,它是根据字体来进行字符串宽度测量的
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货