TSpeedButton adapt width to text

[domasz]

I have some TSpeedButtons with width = 90 px. I set captions, added glyphs, was great. But when translated to another language the text no longer fits.
I don't think the text can automatically wrap to more lines and center vertically so perhaps changing width to fit the text would be easy?
Any simple solution for that or do I have to measure text with Canvas.TextWidth and set Width accordingly?

[Fibonacci]

How about AutoSize?

[domasz]

Hahaha, I am stupid. Yes, thank you!

[Fibonacci]

[wp]

But you must be aware that when an auto-sized control can adjust its size to its caption it may overlap with the neighboring control, and this really looks uglyl. So, you either may choose a very loose layout, or you avoid the overlap by anchoring the controls to each other: https://wiki.freepascal.org/Anchor_Sides. Anchoring and autosizing are most effective to keep a layout intact, but you should know that then it is no longer possible to position or resize controls my means of the mouse.