How to create a Chat callout in delphi

  

I would like to create a chat ballon just like messengers does via FireMonkey TCalloutPanel , so how could I do that by giving it a text as a parameter then get the callout resized according to the text given ^^

Thanks in advance

Comments are closed.