关于字符换行,该怎么处理

关于字符换行
s:= '随机结果：' + ListBox1.Items[ranNum] + #13#10 + '点击按钮可再次选择';
  Button1.Caption := s;
  showmessage( s);


对话框可以实现换行，表问如果想让按钮的caption显示也是换行字符可否实现？

[解决办法]

Delphi(Pascal) code

procedure TForm1.Button1Click(Sender: TObject);begin        Label1.WordWrap := True;        Label1.Caption := 'aa'#13#10'bb';end;
[解决办法]
Button1.WordWrap := True;
Button1.Caption := 'aa'#13#10'bb';

[解决办法]
VCL架构下的Button不可以。
FMX架构下的Button可以。
[解决办法]
WordWrap