怎样实现StringGrid的某一列的宽度自动适应列中的字符串长度? 分以下两种情况:1.已经知道某单元格内容的宽度是最大的2.不知道该列中的哪个单元格内容的宽度是最大的 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 for i:=0 to StringGrid1.ColCount-1 dobegin MaxWidth:=0; for j := 0 to (RowCount - 1) do if StringGrid1.Canvas.TextWidth(Cells[i,j]))>MaxWidth then MaxWidth:=StringGrid1.Canvas.TextWidth(Cells[i,j])); ColWidths[i]:=Max_width;end; delphi自带的Paradox db库如何记住密码? 从Delphi7升级到Delphi2010后串口编程发码问题 怎样区别是一个加密的EXCEL是设置了打开权限加密还是工作簿加密? 傻傻的一问!数据库读取方面的! 如何在一个用户登陆程序里,只有当密码输入正确后才可以打开另一个EXE程序,而被开启的程序不能通过双击鼠标运行, 一个看似简单,其实很有深度的问题!!!!!!!! 求教:delphi 6中的adostoredproc控件的使用方法 DELPHI中怎样读和写XML文件?格式又怎样? 如何阻止《任务管理器》结束我的进程呀?? 谁是高手?请进 大家看看错在那呀 问题,急??
begin
MaxWidth:=0;
for j := 0 to (RowCount - 1) do
if StringGrid1.Canvas.TextWidth(Cells[i,j]))>MaxWidth then
MaxWidth:=StringGrid1.Canvas.TextWidth(Cells[i,j])); ColWidths[i]:=Max_width;
end;