Browse Source

+ added the win16api non-client window area management constants and types

git-svn-id: trunk@31780 -
nickysn 10 years ago
parent
commit
cf110e6e77
2 changed files with 65 additions and 0 deletions
  1. 21 0
      rtl/win16/win31.pp
  2. 44 0
      rtl/win16/wintypes.inc

+ 21 - 0
rtl/win16/win31.pp

@@ -573,6 +573,27 @@ const
   SW_INVALIDATE     = $0002;
   SW_ERASE          = $0004;
 
+{ Non-client window area management }
+{ WM_NCCALCSIZE return flags }
+  WVR_ALIGNTOP    = $0010;
+  WVR_ALIGNLEFT   = $0020;
+  WVR_ALIGNBOTTOM = $0040;
+  WVR_ALIGNRIGHT  = $0080;
+  WVR_HREDRAW     = $0100;
+  WVR_VREDRAW     = $0200;
+  WVR_REDRAW      = WVR_HREDRAW or WVR_VREDRAW;
+  WVR_VALIDRECTS  = $0400;
+
+type
+{ WM_NCCALCSIZE parameter structure }
+  PNCCALCSIZE_PARAMS = ^NCCALCSIZE_PARAMS;
+  LPNCCALCSIZE_PARAMS = ^NCCALCSIZE_PARAMS; far;
+  NCCALCSIZE_PARAMS = record
+    rgrc: array [0..2] of RECT;
+    lppos: LPWINDOWPOS;
+  end;
+  TNCCalcSize_Params = NCCALCSIZE_PARAMS;
+
 function GetFreeSystemResources(SysResource: UINT): UINT; external 'USER';
 
 procedure LogError(err: UINT; lpInfo: FarPointer); external 'KERNEL';

+ 44 - 0
rtl/win16/wintypes.inc

@@ -1673,3 +1673,47 @@ const
 
   RDW_FRAME           = $0400;
   RDW_NOFRAME         = $0800;
+
+{ Non-client window area management }
+
+  WM_NCPAINT    = $0085;
+
+  WM_NCCALCSIZE = $0083;
+
+type
+{ WM_NCCALCSIZE parameter structure }
+  PNCCALCSIZE_PARAMS = ^NCCALCSIZE_PARAMS;
+  LPNCCALCSIZE_PARAMS = ^NCCALCSIZE_PARAMS; far;
+  NCCALCSIZE_PARAMS = record
+    rgrc: array [0..1] of RECT;
+  end;
+  TNCCalcSize_Params = NCCALCSIZE_PARAMS;
+
+const
+  WM_NCHITTEST  = $0084;
+
+{ WM_NCHITTEST return codes }
+  HTERROR       = (-2);
+  HTTRANSPARENT = (-1);
+  HTNOWHERE     = 0;
+  HTCLIENT      = 1;
+  HTCAPTION     = 2;
+  HTSYSMENU     = 3;
+  HTSIZE        = 4;
+  HTMENU        = 5;
+  HTHSCROLL     = 6;
+  HTVSCROLL     = 7;
+  HTMINBUTTON   = 8;
+  HTMAXBUTTON   = 9;
+  HTLEFT        = 10;
+  HTRIGHT       = 11;
+  HTTOP         = 12;
+  HTTOPLEFT     = 13;
+  HTTOPRIGHT    = 14;
+  HTBOTTOM      = 15;
+  HTBOTTOMLEFT  = 16;
+  HTBOTTOMRIGHT = 17;
+  HTBORDER      = 18;
+  HTGROWBOX     = HTSIZE;
+  HTREDUCE      = HTMINBUTTON;
+  HTZOOM        = HTMAXBUTTON;