Animated Message Boxes

[Cuttlas]

Hi Friends,

I'm looking for a way to open and close message boxes with animation.

Here is a link here in Delphi: https://delphidabbler.github.io/delphi-tips/tips/46.html

I'm new to inno setup and do not know how to convert it, so can be used inside the inno setup whithin message boxes (such as exit message box).