我正在使用Delphi 7.我不仅熟悉使用画布和绘制文本到画布,还使用TCanvas.TextHeight等.当我想实现Word Wrap时出现问题.我不仅需要以最佳方式将文本绘制到画布并使其自动换行到给定的宽度约束,而且还需要知道它被包装后的高度(或多少行).我需要在绘制文本之前准备另一个图像,这个图像需要足够大才能放置包装好的文本.这是尝试复制iPhone如何显示SMS消息,屏幕两侧的气球在可变高度滚动框中(TScrollingWinControl是我的基础).
delphi canvas delphi-7 word-wrap
canvas ×1
delphi ×1
delphi-7 ×1
word-wrap ×1