有关button.caption问题

Question

用TBitBtn:
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  BitBtn1.Caption := 'AA' + #13 + 'BB';
end;
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样，改为“=”或者去掉';
I.Desire := '加不加分随你';
—————————————————————————————————
    

Answer 1

用Bitbtn,
Bitbtn.caption := 'abc'#13#10'124';

Answer 2

感谢各位的回答,也许我没说清楚.
我是说实现自动换行.不是人为的加上回车(#13)或换行(#10)
button.autosize:=false;
当font改变时,button的一行不能完全显示caption,所以要用到自动换行.
我是给button加了hint,显示button.caption,还有别的办法吗?

Answer 3

您糊涂了吧  button哪里有autosize 属性呀  
我只知道
在label1->caption = “fdajkfjdsaf\nfdsafdsafdsa”的时候可以
不过只是在c++builder里面好用