Explorar o código

+ added the win16api window proc implementation and subclassing functions

git-svn-id: trunk@31736 -
nickysn %!s(int64=10) %!d(string=hai) anos
pai
achega
d62c342b9c
Modificáronse 1 ficheiros con 7 adicións e 0 borrados
  1. 7 0
      rtl/win16/winprocsh.inc

+ 7 - 0
rtl/win16/winprocsh.inc

@@ -866,3 +866,10 @@ function EndDeferWindowPos(hdwp: HDWP): BOOL; external 'USER';
 
 function MoveWindow(hwnd: HWND; nLeft, nTop, nWidth, nHeight: SmallInt; fRepaint: BOOL): BOOL; external 'USER';
 function BringWindowToTop(hwnd: HWND): BOOL; external 'USER';
+
+{ Window proc implementation & subclassing support }
+
+function DefWindowProc(hwnd: HWND; uMsg: UINT; wParam: WPARAM; lParam: LPARAM): LRESULT; external 'USER';
+
+function CallWindowProc(wndprcPrev: WNDPROC; hwnd: HWND; uMsg: UINT; wParam: WPARAM; lParam: LPARAM): LRESULT; external 'USER';
+function CallWindowProc(wndprcPrev: TFarProc; hwnd: HWND; uMsg: UINT; wParam: WPARAM; lParam: LPARAM): LRESULT; external 'USER';