我需要在具有固定宽度(以像素为单位)和固定数量的文本行的表格单元格中绘制一些文本。如果文本被单元格矩形剪切,它必须以省略号结尾。问题是我无法正确计算文本矩形(或者 TextRect/DrawText 过程无法正常工作,我不确定)。
我尝试使用这种计算文本矩形的方法:
var
TextRect: TRect;
tm: TEXTMETRIC;
...
GetTextMetrics(Canvas.Handle, tm);
TextLineHeight := tm.tmHeight + tm.tmExternalLeading;
TextRect.Bottom := TextRect.Top + TextLineHeight * NumberOfLines;
Canvas.TextRect(TextRect, 'some long long long text',
[tfTop, tfLeft, tfEndEllipsis, tfWordBreak]);
剪裁矩形已正确计算,但省略号未出现。
当我将裁剪矩形的高度减少 1 个像素时出现省略号:
TextRect.Bottom := TextRect.Top + TextLineHeight * NumberOfLines - 1;
但是我的文本底线的一些像素随后被剪裁了。
如何正确执行?