如何使StringGrid组件Cells内容居中与换行?
3个回答
2014-01-09
展开全部
换行是无法实现的. 居中可以写一个过程。 end; produce Tform1.button1click(sender:objcect); var i,j:integer; spaces:string; //空格个数 begin for i:=0 to stringgrid1.colcount-1 for j:=0 to stringgrid1.rowcount-1 begin spaces:=colwidths[i]-canvas.textwidth(trim(cells[i,j])); if spaces>0 then begin begin spaces:=(spaces div 2) div canvas.font.size if space>=1 then cells[i,j]:=WordStrspace(space)+cells[i,j] //WordStrspace为产生n个空格字串的函数。 with stringgrid1 do end; end; end;
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2014-01-09
展开全部
存眷...
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2014-01-09
展开全部
请问,有没有可以实现换行功能的相类似组件?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询