0027197: Configuration - fix compilation issues when using mingw
[occt.git] / src / WNT / WNT_Window.cxx
1 // Copyright (c) 1998-1999 Matra Datavision
2 // Copyright (c) 1999-2014 OPEN CASCADE SAS
3 //
4 // This file is part of Open CASCADE Technology software library.
5 //
6 // This library is free software; you can redistribute it and/or modify it under
7 // the terms of the GNU Lesser General Public License version 2.1 as published
8 // by the Free Software Foundation, with special exception defined in the file
9 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
10 // distribution for complete text of the license and disclaimer of any warranty.
11 //
12 // Alternatively, this file may be used under the terms of Open CASCADE
13 // commercial license or contractual agreement.
14
15 // include windows.h first to have all definitions available
16 #include <windows.h>
17
18
19 #include <Aspect_Convert.hxx>
20 #include <Aspect_WindowDefinitionError.hxx>
21 #include <Aspect_WindowError.hxx>
22 #include <Image_AlienPixMap.hxx>
23 #include <Standard_Type.hxx>
24 #include <WNT_WClass.hxx>
25 #include <WNT_Window.hxx>
26
27 #include <stdio.h>
28
29 IMPLEMENT_STANDARD_RTTIEXT(WNT_Window,Aspect_Window)
30
31 // =======================================================================
32 // function : WNT_Window
33 // purpose  :
34 // =======================================================================
35 WNT_Window::WNT_Window (const Standard_CString           theTitle,
36                         const Handle(WNT_WClass)&        theClass,
37                         const WNT_Dword&                 theStyle,
38                         const Standard_Integer           thePxLeft,
39                         const Standard_Integer           thePxTop,
40                         const Standard_Integer           thePxWidth,
41                         const Standard_Integer           thePxHeight,
42                         const Quantity_NameOfColor       theBackColor,
43                         const Aspect_Handle              theParent,
44                         const Aspect_Handle              theMenu,
45                         const Standard_Address           theClientStruct)
46 : Aspect_Window(),
47   aXLeft (thePxLeft),
48   aYTop (thePxTop),
49   aXRight (thePxLeft + thePxWidth),
50   aYBottom (thePxTop + thePxHeight),
51   myWClass (theClass),
52   myIsForeign (Standard_False)
53 {
54   DWORD dwStyle = theStyle;
55
56   if (thePxWidth <= 0 || thePxHeight <= 0)
57   {
58     Aspect_WindowDefinitionError::Raise ("Coordinate(s) out of range");
59   }
60
61   if (theParent && !(theStyle & WS_CHILD))
62   {
63     dwStyle |= WS_CHILD | WS_CLIPSIBLINGS;
64   }
65   else if (!theParent && !(theStyle & WS_CLIPCHILDREN))
66   {
67     dwStyle |= WS_CLIPCHILDREN;
68   }
69
70   // include decorations in the window dimensions
71   // to reproduce same behaviour of Xw_Window.
72   RECT aRect;
73   aRect.top    = aYTop;
74   aRect.bottom = aYBottom;
75   aRect.left   = aXLeft;
76   aRect.right  = aXRight;
77   AdjustWindowRect (&aRect, dwStyle, theMenu != NULL ? TRUE : FALSE);
78   aXLeft   = aRect.left;
79   aYTop    = aRect.top;
80   aXRight  = aRect.right;
81   aYBottom = aRect.bottom;
82
83   myHWindow = CreateWindow (
84               myWClass->Name(),                 // window's class name
85               theTitle,                         // window's name
86               dwStyle,                          // window's style
87               aXLeft, aYTop,                    // window's coordinates
88               (aXRight - aXLeft), (aYBottom - aYTop),
89               (HWND )theParent,                 // window's parent
90               (HMENU )theMenu,                  // window's menu
91               (HINSTANCE )myWClass->Instance(), // application's instance
92               theClientStruct);                 // pointer to CLIENTCREATESTRUCT
93   if (!myHWindow)
94   {
95     Aspect_WindowDefinitionError::Raise ("Unable to create window");
96   }
97
98   myHParentWindow = theParent;
99   SetBackground (theBackColor);
100 }
101
102 // =======================================================================
103 // function : WNT_Window
104 // purpose  :
105 // =======================================================================
106 WNT_Window::WNT_Window (const Aspect_Handle        theHandle,
107                         const Quantity_NameOfColor theBackColor)
108 : myIsForeign (Standard_True)
109 {
110   myHWindow        = theHandle;
111   myHParentWindow  = GetParent ((HWND )theHandle);
112
113   SetBackground (theBackColor);
114
115   WINDOWPLACEMENT aPlace;
116   aPlace.length = sizeof (WINDOWPLACEMENT);
117   ::GetWindowPlacement ((HWND )myHWindow, &aPlace);
118
119   aXLeft   = aPlace.rcNormalPosition.left;
120   aYTop    = aPlace.rcNormalPosition.top;
121   aXRight  = aPlace.rcNormalPosition.right;
122   aYBottom = aPlace.rcNormalPosition.bottom;
123 }
124
125 // =======================================================================
126 // function : ~WNT_Window
127 // purpose  :
128 // =======================================================================
129 WNT_Window::~WNT_Window()
130 {
131   if (myHWindow == NULL
132    || myIsForeign)
133   {
134     return;
135   }
136
137   DestroyWindow ((HWND )myHWindow);
138   myIsForeign = Standard_False;
139 }
140
141 // =======================================================================
142 // function : SetCursor
143 // purpose  :
144 // =======================================================================
145 void WNT_Window::SetCursor (const Aspect_Handle theCursor) const
146 {
147   ::SetClassLongPtr ((HWND )myHWindow, GCLP_HCURSOR, (LONG_PTR )theCursor);
148 }
149
150 // =======================================================================
151 // function : IsMapped
152 // purpose  :
153 // =======================================================================
154 Standard_Boolean WNT_Window::IsMapped() const
155 {
156   if (IsVirtual())
157   {
158     return Standard_True;
159   }
160
161   WINDOWPLACEMENT aPlace;
162   aPlace.length = sizeof (WINDOWPLACEMENT);
163   ::GetWindowPlacement ((HWND )myHWindow, &aPlace);
164   return !(aPlace.showCmd == SW_HIDE
165         || aPlace.showCmd == SW_MINIMIZE);
166 }
167
168 // =======================================================================
169 // function : Map
170 // purpose  :
171 // =======================================================================
172 void WNT_Window::Map() const
173 {
174   if (!IsVirtual())
175   {
176     Map (SW_SHOW);
177   }
178 }
179
180 // =======================================================================
181 // function : Map
182 // purpose  :
183 // =======================================================================
184 void WNT_Window::Map (const Standard_Integer theMapMode) const
185 {
186   if (IsVirtual())
187   {
188     return;
189   }
190
191   ::ShowWindow   ((HWND )myHWindow, theMapMode);
192   ::UpdateWindow ((HWND )myHWindow);
193 }
194
195 // =======================================================================
196 // function : Unmap
197 // purpose  :
198 // =======================================================================
199 void WNT_Window::Unmap() const
200 {
201   Map (SW_HIDE);
202 }
203
204 // =======================================================================
205 // function : DoResize
206 // purpose  :
207 // =======================================================================
208 Aspect_TypeOfResize WNT_Window::DoResize() const
209 {
210   if (IsVirtual())
211   {
212     return Aspect_TOR_UNKNOWN;
213   }
214
215   int                 mask = 0;
216   Aspect_TypeOfResize mode = Aspect_TOR_UNKNOWN;
217   WINDOWPLACEMENT     wp;
218
219   wp.length = sizeof ( WINDOWPLACEMENT );
220   GetWindowPlacement (  ( HWND )myHWindow, &wp  );
221
222   if (wp.showCmd != SW_SHOWMINIMIZED)
223   {
224     if (Abs ((int )wp.rcNormalPosition.left   - aXLeft  ) > 2) mask |= 1;
225     if (Abs ((int )wp.rcNormalPosition.right  - aXRight ) > 2) mask |= 2;
226     if (Abs ((int )wp.rcNormalPosition.top    - aYTop   ) > 2) mask |= 4;
227     if (Abs ((int )wp.rcNormalPosition.bottom - aYBottom) > 2) mask |= 8;
228
229     switch (mask)
230     {
231       case 0:
232         mode = Aspect_TOR_NO_BORDER;
233         break;
234       case 1:
235         mode = Aspect_TOR_LEFT_BORDER;
236         break;
237       case 2:
238         mode = Aspect_TOR_RIGHT_BORDER;
239         break;
240       case 4:
241         mode = Aspect_TOR_TOP_BORDER;
242         break;
243       case 5:
244         mode = Aspect_TOR_LEFT_AND_TOP_BORDER;
245         break;
246       case 6:
247         mode = Aspect_TOR_TOP_AND_RIGHT_BORDER;
248         break;
249       case 8:
250         mode = Aspect_TOR_BOTTOM_BORDER;
251         break;
252       case 9:
253         mode = Aspect_TOR_BOTTOM_AND_LEFT_BORDER;
254         break;
255       case 10:
256         mode = Aspect_TOR_RIGHT_AND_BOTTOM_BORDER;
257         break;
258       default:
259         break;
260     }  // end switch
261
262     *((Standard_Integer* )&aXLeft  ) = wp.rcNormalPosition.left;
263     *((Standard_Integer* )&aXRight ) = wp.rcNormalPosition.right;
264     *((Standard_Integer* )&aYTop   ) = wp.rcNormalPosition.top;
265     *((Standard_Integer* )&aYBottom) = wp.rcNormalPosition.bottom;
266   }
267
268   return mode;
269 }
270
271 // =======================================================================
272 // function : Ratio
273 // purpose  :
274 // =======================================================================
275 Quantity_Ratio WNT_Window::Ratio() const
276 {
277   if (IsVirtual())
278   {
279     return Quantity_Ratio(aXRight - aXLeft)/ Quantity_Ratio(aYBottom - aYTop);
280   }
281
282   RECT aRect;
283   GetClientRect ((HWND )myHWindow, &aRect);
284   return Quantity_Ratio(aRect.right - aRect.left) / Quantity_Ratio(aRect.bottom - aRect.top);
285 }
286
287 // =======================================================================
288 // function : Position
289 // purpose  :
290 // =======================================================================
291 void WNT_Window::Position (Standard_Integer& theX1, Standard_Integer& theY1,
292                            Standard_Integer& theX2, Standard_Integer& theY2) const
293 {
294   if (IsVirtual())
295   {
296     theX1  = aXLeft;
297     theX2  = aXRight;
298     theY1  = aYTop;
299     theY2  = aYBottom;
300     return;
301   }
302
303   RECT  aRect;
304   ::GetClientRect ((HWND )myHWindow, &aRect);
305
306   POINT aPntLeft, aPntRight;
307   aPntLeft.x = aPntLeft.y = 0;
308   ::ClientToScreen ((HWND )myHWindow, &aPntLeft);
309   aPntRight.x = aRect.right;
310   aPntRight.y = aRect.bottom;
311   ::ClientToScreen ((HWND )myHWindow, &aPntRight);
312
313   if (myHParentWindow != NULL)
314   {
315     ::ScreenToClient ((HWND )myHParentWindow, &aPntLeft);
316     ::ScreenToClient ((HWND )myHParentWindow, &aPntRight);
317   }
318
319   theX1 = aPntLeft.x;
320   theX2 = aPntRight.x;
321   theY1 = aPntLeft.y;
322   theY2 = aPntRight.y;
323 }
324
325 // =======================================================================
326 // function : Size
327 // purpose  :
328 // =======================================================================
329 void WNT_Window::Size (Standard_Integer& theWidth,
330                        Standard_Integer& theHeight) const
331 {
332   if (IsVirtual())
333   {
334     theWidth  = aXRight - aXLeft;
335     theHeight = aYBottom - aYTop;
336     return;
337   }
338
339   RECT aRect;
340   ::GetClientRect ((HWND )myHWindow, &aRect);
341   theWidth  = aRect.right;
342   theHeight = aRect.bottom;
343 }
344
345 // =======================================================================
346 // function : SetPos
347 // purpose  :
348 // =======================================================================
349 void WNT_Window::SetPos (const Standard_Integer theX,  const Standard_Integer theY,
350                          const Standard_Integer theX1, const Standard_Integer theY1)
351 {
352   aXLeft   = theX;
353   aYTop    = theY;
354   aXRight  = theX1;
355   aYBottom = theY1;
356 }