Wie kann ich eine transparente Animation über ein TControl legen?

[Der schöne Günther]

Zitat von venice2:

erstelle doch ein Layered Window Ontop auf deine form und sorge dafür das es immer mitwandert
wenn du diese bewegst.

Danke, das war schon einmal eine gute Idee.
Ein Top-Level-Window braucht es nicht, WS_EX_LAYERED geht auch mit Frames und Panels und so.

Das sieht dann so aus:

https://imgur.com/4RcX1yN

State of the art ist das immer noch nicht, aber vielleicht schon halbwegs brauchbar - Das Ding ist praktisch nur an einer festgelegten Farbe transparent, der PNG-Transparenzlayer ist irgendwo den Bach runter gegangen. Mir ist nichts besseres eingefallen als eine Feste Farbe als Transparenz festzulegen, deshalb sieht es wohl auch so bescheiden aus

Delphi-Quellcode:

      SetLayeredWindowAttributes(
         Handle,
         COLORREF(color),
         Byte.MaxValue,
         LWA_COLORKEY
      )