s:=     '随机结果:' + ListBox1.Items[ranNum] + #13#10 + '点击按钮可再次选择';
          Button1.Caption := s;
          showmessage( s);
对话框可以实现换行,表问如果想让按钮的caption显示也是换行字符可否实现?