delphi - 我怎么知道一个 TLabel 单词是否包裹了文本？

Question

我创建了一个TLabel并动态添加文本，效果很好。但是我需要知道标签是否将文本换行，因为它对于标签的宽度来说太大了，或者是否不需要换行，因为文本比标签的宽度短。

我不是想知道标签的WordWrap属性是设置为真还是假，我想知道它是否包裹了文本。

将and属性设置TLabel为true，以防万一。AutoSizeWordWrap

Answer 1

您可以检查标签的高度以确定它是否是单衬纸。

if Label1.Height = Label1.Canvas.TextHeight('.') then
  // no word wrapped

那是因为：

当 WordWrap 为True时，标签的宽度是固定的。如果 AutoSize 也是True，则对文本的更改会导致标签的高度发生变化。