Filme auf dem Desktop sehen!

[ste_ett]

Mit GetDC(0) bekommst du den Device Contest des Desktops.
Das brauchst du, um auf dem Desktop zu zeichnen (BitBlt(), StrechBlt, TransparentBlt(), etc.)

Desktop-Fenster-Handle bekommst du mit GetDesktopWindow().
Per GetWindowRect() weisst du auch wie groß der Desktop ist, wenn du ein Video skalieren möchtest.

Ein Video auf den Desktop zu malen ist gar nicht so schwer.
Mit der TMediaPlayer-Komponente kann man ein Viedo wiedergeben.
Unter TMediaPlayer.Display kann man einstellen, wohin das Video ausgegeben werden soll, z.B. ein Formular, oder eine Komponenten auf einem Formular (z.B. ein Panel).

Per BitBlt() zeichnet man dann das Bild der Komponente auf den Desktop.
Per GetWindowDC(Panel1.Handle) holt man sich das DC für das Panel.

Bsp.:

Delphi-Quellcode:

if (BitBlt(DesktopDC, 0, 0, Panel1.Width, Panel1.Height, PanelDC, 0, 0, SRCCOPY)) then
begin
...
end;