Danke für eure Mühe aber auf der Basis kann ich das nicht verwenden.
TMagnetic ist keine eigenständige
DLL sondern ein Modul von meiner SkinEngine.dll
Und dort habe ich sie auf dies weise eingebunden.
Delphi-Quellcode:
ISkinMagnetic =
interface
['
{A00CB8B3-8433-4C58-9115-1845B29B3FF0}']
function GetSnapWidth: Integer;
procedure SetSnapWidth(
const Value: Integer);
property SnapWidth: Integer
read GetSnapWidth
write SetSnapWidth;
function AddMagneticWindow(
Handle: HWND; hWndParent: HWND): Boolean;
function RemoveMagneticWindow(
Handle: HWND): Boolean;
function SetFullWindowDrag(HWND: DWORD; ShowFullWindow: Boolean): Boolean;
end;
Sollte ausreichend sein.
gruss