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

Question

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

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

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

Answer 1

您可以通过在表单的 TextView 中编辑标题来强制TSpeedButton的标题为多行:

  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属性。