From 7de38a08b97e0554e318b8c25806cef5d47259e6 Mon Sep 17 00:00:00 2001 From: Kirill Volinsky Date: Thu, 12 Jun 2014 17:49:53 +0000 Subject: headers of not adopted plugins moved to !Deprecated git-svn-id: http://svn.miranda-ng.org/main/trunk@9438 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c --- .../ExternalAPI/delphi/m_snapping_windows.inc | 35 ++++++++++++++++++++++ 1 file changed, 35 insertions(+) create mode 100644 plugins/!Deprecated/ExternalAPI/delphi/m_snapping_windows.inc (limited to 'plugins/!Deprecated/ExternalAPI/delphi/m_snapping_windows.inc') diff --git a/plugins/!Deprecated/ExternalAPI/delphi/m_snapping_windows.inc b/plugins/!Deprecated/ExternalAPI/delphi/m_snapping_windows.inc new file mode 100644 index 0000000000..e3c513482a --- /dev/null +++ b/plugins/!Deprecated/ExternalAPI/delphi/m_snapping_windows.inc @@ -0,0 +1,35 @@ +{$IFNDEF SNAPPING_WINDOWS} +{$DEFINE SNAPPING_WINDOWS} + +type + PSnapWindowProc = ^TSnapWindowProc; + TSnapWindowProc = record + hWnd : THWND; + m_szMoveOffset : TSIZE; + wParam : WPARAM; + lParam : LPARAM; + Reserved1 : int; + Reserved2 : int; + Reserved3 : int; + end; + +const + MS_SNAPWINDOWPROC = 'Utils/SnapWindowProc'; + +function CallSnappingWindowProc(hwnd:hwnd; nMessage:int; + wParam:WPARAM;lParam:LPARAM):int;// cdecl; +const + SnapInfo:TSnapWindowProc=(); +begin + result:=0; + if (nMessage=WM_MOVING) or (nMessage=WM_NCLBUTTONDOWN) or + (nMessage=WM_SYSCOMMAND) or (nMessage=WM_SIZING) then + begin + SnapInfo.hWnd := hwnd; + SnapInfo.wParam := wParam; + SnapInfo.lParam := lParam; + CallService(MS_SNAPWINDOWPROC,WPARAM(@SnapInfo),nMessage); + if nMessage=WM_SIZING then result:=1; + end; +end; +{$ENDIF} -- cgit v1.2.3