Zitat von
turboPASCAL:
Klar geht das, AlphaBlend auf Ture und AlphaBlendValue auf 1 (oder sogar null).
Muss ja non-
VCL sein. Ich benutze AllocateHwnd.
Und scheinbar funktioniert MakeWindowTransparent nicht mit diesen Fenstern
Delphi-Quellcode:
// Nur eine Test-Methode!
procedure THandleSprite.Apply;
begin
SetParent(Fhandle,Form1.Handle);
SetWindowPos(FHandle,HWND_BOTTOM,0,0,Round(Width),Round(Height),0);
ShowWindow(FHandle,SW_SHOW);
MakeWindowTransparent(FHandle,1);
end;
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."