Neee..
Es gibt bei mir kein Begin Drag.
Zudem erstelle ich ein Window das ich zwischen verschiedenen Containern hin und herschiebe da
kann man deine verlinkten
API's nicht für verwenden (Die mir bekannt waren )
Ich habe es schon gelöst.. Danke.
HTCLIENT.. in Verbindung mit FullDrag
In SetDropImage
Delphi-Quellcode:
UpdateLayeredWindow(WinHandle, DesktopDC, @lP, @ls, hMemDC, @ptSrc, 0, @bf, ULW_ALPHA);
Magnetic.SetFullWindowDrag(WinHandle, true); // <<<<<
end;
DeleteObject(hBmp);
DeleteDC(hMemDC);
ReleaseDC(0, DesktopDC);
und in der Proc
Delphi-Quellcode:
WM_DESTROY:
begin
Magnetic.SetFullWindowDrag(WinHandle, false); // <<<<<<
PostQuitMessage(0);
Result := 0;
exit;
end;
Und das Ergebnis!
gruss