Delphi - 在设计器中显示多行标题

Question

我正在运行时替换多个组件的 Caption 以获得多行 Caption。

MySpeedButton.Caption := 'Line 1' + #13 + #10 + 'Line 2';

有没有办法说服 Delphi 在设计器中也显示自动换行？

Answer 1

您可以通过编辑 Text View 格式的标题来强制 TSpeedButton 的 caption 为多行：

  object SpeedButton1: TSpeedButton
    Left = 8
    Top = 63
    Width = 113
    Height = 50
    Caption = 'Line 1Line 2'       // original caption
    Caption = 'Line 1'#10'Line 2'  // modified caption
  end

注意！您必须在 #10 的两边添加两个单引号。您可以使用 #13 或两者 #13#10.

而不是 #10

对于普通的TButton除了上面修改表格的Text View之外还需要设置WordWrap属性

Answer 2

您可以使用 CnPack

安装后，确保启用 String Caption Editor 并将 TSpeedButton.Caption 添加到 Customize 部分。

在 Object Inspector 中，您将看到一个编辑按钮，它允许您设置多行标题。