GroupBox по размерам Label

[bookkc]

У меня есть Label1 который стоит на GroupBox1 и этот Label всегда меняет свой текст(Caption) когда текст большой, то он выходит за приделы GroupBox1, как сделать так что бы когда был текст в Label1 большой, то GroupBox1 сам изменялся под размеры Label1.
Думаю вы поняли о чем я ....

[Stilet]

А не лучше поставить вместо Лабела Memo, и дать возможность прокрутки текста?

[Риндера]

bookkc, после строки, в которой Lable меняет текст, допиши

GroupBox1.Width := Lable1.Width + X;

X - любое число, чтобы был небольшой отступ от границы бокса до текста, сам подберешь.

[Stilet]

Риндера

Это вширь менять а в высоту если нужно?

[Риндера]

GroupBox1.Height := Lable1.Height + X;

[bookkc]

спасибо, помогло