Browse Source

+ added the win16api window proc implementation and subclassing functions

git-svn-id: trunk@31736 -
nickysn 10 years ago
parent
commit
d62c342b9c
1 changed files with 7 additions and 0 deletions
  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';