label WordWrap
![](http://images0.cnblogs.com/blog/300447/201407/291655356657720.png)
procedure TForm1.FormCreate(Sender: TObject);
begin
Label1.AutoSize := False;
Label1.WordWrap := True;
Label1.Text := 'This is my caption that I would like to be wrappedThis is my caption that I would like to be wrapped';
Label1.Width := 100;
Label1.AutoSize := True;
end;