stringGrid控件,我怎么动态的改变某一Cell宽度啊?我想让我的stringGrid能随着CELL中的值的宽度自动适应怎么做啊
解决方案 »
- 听说Case能优化,它具体是怎么优化滴?
- 这段javascript怎样写成 delphi 语言(别笑我哈,还没有入门)
- too many actual parameters?
- BDE设置问题,高手帮忙.这个问题困扰我很久了.
- 怎样在 DBGrideh 中的下拉列表框里添加固定内容
- 我要在Edit window 中打开*.dpr文件该怎么打开?
- 救命!!
- 请问:怎么才能让Label控件始终在最上面,而不被别的控件挡住?
- 如何在应用程序中屏蔽Alt+F4等功能键?
- 怎样知道数据表中增加了新记录?
- 你提供软件,我负责销售。寻优秀教育相关软件
- 将自己的程序加入IE右键菜单中后,怎么用Delphi编写dll,在点击菜单后,调用该程序?
Rect: TRect; State: TGridDrawState);
var
MaxWidth: integer;
begin
MaxWidth := StringGrid1.Canvas.TextWidth(StringGrid1.Cells[ACol, ARow]);
if MaxWidth > StringGrid1.ColWidths[ACol] then
StringGrid1.ColWidths[ACol] := MaxWidth + 5;
end;