삽질/Delphi

[Delphi] 문자열의 너비 구하기

푸딩s 2012. 1. 11. 07:49


uses Graphics;

Canvas.TextWidth(str);


ex)

if Canvas.TextWidth(Cells[5, J]) > 220 then
  RowHeights[J] := 16 * ((Canvas.TextWidth(Cells[5, J]) div 220) + 1);