projects / wxWidgets.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Applied Patch #1390457 (Incorrect wxRadioBox widths & heights).
[wxWidgets.git] / src / os2 / radiobox.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/os2/radiobox.cpp
3 // Purpose: wxRadioBox
4 // Author: David Webster
5 // Modified by:
6 // Created: 10/12/99
7 // RCS-ID: $Id$
8 // Copyright: (c) David Webster
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 // For compilers that support precompilation, includes "wx.h".
13 #include "wx/wxprec.h"
14
15 #ifndef WX_PRECOMP
16 #include <stdio.h>
17 #include "wx/setup.h"
18 #include "wx/wxchar.h"
19 #include "wx/string.h"
20 #include "wx/bitmap.h"
21 #include "wx/brush.h"
22 #include "wx/radiobox.h"
23 #endif
24
25 #include "wx/os2/private.h"
26
27 IMPLEMENT_DYNAMIC_CLASS(wxRadioBox, wxControl)
28
29 // ---------------------------------------------------------------------------
30 // private functions
31 // ---------------------------------------------------------------------------
32
33 // wnd proc for radio buttons
34 MRESULT EXPENTRY wxRadioBtnWndProc( HWND hWnd
35 ,UINT uMessage
36 ,MPARAM wParam
37 ,MPARAM lParam
38 );
39 MRESULT EXPENTRY wxRadioBoxWndProc( HWND hWnd
40 ,UINT uMessage
41 ,MPARAM wParam
42 ,MPARAM lParam
43 );
44
45 // ---------------------------------------------------------------------------
46 // global vars
47 // ---------------------------------------------------------------------------
48
49 // the pointer to standard radio button wnd proc
50 extern void wxAssociateWinWithHandle( HWND hWnd
51 ,wxWindowOS2* pWin
52 );
53 static WXFARPROC fnWndProcRadioBtn = NULL;
54 static WXFARPROC fnWndProcRadioBox = NULL;
55
56 // ===========================================================================
57 // implementation
58 // ===========================================================================
59
60 // ---------------------------------------------------------------------------
61 // wxRadioBox
62 // ---------------------------------------------------------------------------
63
64 // Radio box item
65 wxRadioBox::wxRadioBox()
66 {
67 m_nSelectedButton = -1;
68 m_nNoItems = 0;
69 m_nNoRowsOrCols = 0;
70 m_ahRadioButtons = NULL;
71 m_pnRadioWidth = NULL;
72 m_pnRadioHeight = NULL;
73 } // end of wxRadioBox::wxRadioBox
74
75 wxRadioBox::~wxRadioBox()
76 {
77 m_isBeingDeleted = true;
78
79 if (m_ahRadioButtons)
80 {
81 int i;
82 for (i = 0; i < m_nNoItems; i++)
83 ::WinDestroyWindow((HWND)m_ahRadioButtons[i]);
84 delete[] m_ahRadioButtons;
85 }
86 if (m_pnRadioWidth)
87 delete[] m_pnRadioWidth;
88 if (m_pnRadioHeight)
89 delete[] m_pnRadioHeight;
90 } // end of wxRadioBox::~wxRadioBox
91
92 void wxRadioBox::AdjustButtons( int nX,
93 int nY,
94 int nWidth,
95 int nHeight,
96 int WXUNUSED(nSizeFlags) )
97 {
98 wxSize vMaxSize;
99 int nXOffset = nX;
100 int nYOffset = nY + nHeight;
101 int nCx1;
102 int nCy1;
103 int nStartX;
104 int nStartY;
105 int nMaxWidth;
106 int nMaxHeight;
107 wxFont vFont = GetFont();
108
109 wxGetCharSize( m_hWnd
110 ,&nCx1
111 ,&nCy1
112 ,&vFont
113 );
114 vMaxSize = GetMaxButtonSize();
115 nMaxWidth = vMaxSize.x;
116 nMaxHeight = vMaxSize.y;
117
118 nXOffset += nCx1;
119 nYOffset -= (nMaxHeight + ((3*nCy1)/2));
120
121 nStartX = nXOffset;
122 nStartY = nYOffset;
123
124 for (int i = 0; i < m_nNoItems; i++)
125 {
126 //
127 // The last button in the row may be wider than the other ones as the
128 // radiobox may be wider than the sum of the button widths (as it
129 // happens, for example, when the radiobox label is very long)
130 //
131 bool bIsLastInTheRow;
132
133 if (m_windowStyle & wxRA_SPECIFY_COLS)
134 {
135 //
136 // Item is the last in its row if it is a multiple of the number of
137 // columns or if it is just the last item
138 //
139 int n = i + 1;
140
141 bIsLastInTheRow = ((n % GetMajorDim()) == 0) || (n == m_nNoItems);
142 }
143 else // winRA_SPECIFY_ROWS
144 {
145 //
146 // Item is the last in the row if it is in the last columns
147 //
148 bIsLastInTheRow = i >= (m_nNoItems/GetMajorDim()) * GetMajorDim();
149 }
150
151 //
152 // Is this the start of new row/column?
153 //
154 if (i && (i % GetMajorDim() == 0))
155 {
156 if (m_windowStyle & wxRA_SPECIFY_ROWS)
157 {
158
159 //
160 // Start of new column
161 //
162 nYOffset = nStartY;
163 nXOffset += nMaxWidth + nCx1;
164 }
165 else // start of new row
166 {
167 nXOffset = nStartX;
168 nYOffset -= nMaxHeight;
169 if (m_pnRadioWidth[0] > 0L)
170 nYOffset -= nCy1/2;
171 }
172 }
173
174 int nWidthBtn;
175
176 if (bIsLastInTheRow)
177 {
178 //
179 // Make the button go to the end of radio box
180 //
181 nWidthBtn = nStartX + nWidth - nXOffset - (2 * nCx1);
182 if (nWidthBtn < nMaxWidth)
183 nWidthBtn = nMaxWidth;
184 }
185 else
186 {
187 //
188 // Normal button, always of the same size
189 //
190 nWidthBtn = nMaxWidth;
191 }
192
193 //
194 // Make all buttons of the same, maximal size - like this they
195 // cover the radiobox entirely and the radiobox tooltips are always
196 // shown (otherwise they are not when the mouse pointer is in the
197 // radiobox part not belonging to any radiobutton)
198 //
199 ::WinSetWindowPos( (HWND)m_ahRadioButtons[i]
200 ,HWND_TOP
201 ,(LONG)nXOffset
202 ,(LONG)nYOffset
203 ,(LONG)nWidthBtn
204 ,(LONG)nMaxHeight
205 ,SWP_ZORDER | SWP_SIZE | SWP_MOVE | SWP_SHOW
206 );
207 //
208 // Where do we put the next button?
209 //
210 if (m_windowStyle & wxRA_SPECIFY_ROWS)
211 {
212 //
213 // Below this one
214 //
215 nYOffset -= nMaxHeight;
216 if (m_pnRadioWidth[0] > 0)
217 nYOffset -= nCy1/2;
218 }
219 else
220 {
221 //
222 // To the right of this one
223 //
224 nXOffset += nWidthBtn + nCx1;
225 }
226 }
227 } // end of wxRadioBox::AdjustButtons
228
229 void wxRadioBox::Command (
230 wxCommandEvent& rEvent
231 )
232 {
233 SetSelection (rEvent.GetInt());
234 ProcessCommand(rEvent);
235 } // end of wxRadioBox::Command
236
237 bool wxRadioBox::ContainsHWND(
238 WXHWND hWnd
239 ) const
240 {
241 size_t nCount = GetCount();
242 size_t i;
243
244 for (i = 0; i < nCount; i++)
245 {
246 if (GetRadioButtons()[i] == hWnd)
247 return true;
248 }
249 return false;
250 } // end of wxRadioBox::ContainsHWND
251
252 bool wxRadioBox::Create(
253 wxWindow* pParent
254 , wxWindowID vId
255 , const wxString& rsTitle
256 , const wxPoint& rPos
257 , const wxSize& rSize
258 , const wxArrayString& asChoices
259 , int nMajorDim
260 , long lStyle
261 , const wxValidator& rVal
262 , const wxString& rsName
263 )
264 {
265 wxCArrayString chs(asChoices);
266
267 return Create(pParent, vId, rsTitle, rPos, rSize, chs.GetCount(),
268 chs.GetStrings(), nMajorDim, lStyle, rVal, rsName);
269 }
270
271 bool wxRadioBox::Create(
272 wxWindow* pParent
273 , wxWindowID vId
274 , const wxString& rsTitle
275 , const wxPoint& rPos
276 , const wxSize& rSize
277 , int nNum
278 , const wxString asChoices[]
279 , int nMajorDim
280 , long lStyle
281 , const wxValidator& rVal
282 , const wxString& rsName
283 )
284 {
285 wxColour vColour;
286 LONG lColor;
287
288 vColour.Set(wxString(wxT("BLACK")));
289 m_backgroundColour = pParent->GetBackgroundColour();
290 m_nSelectedButton = -1;
291 m_nNoItems = 0;
292
293 //
294 // Common initialization
295 //
296 if (!CreateControl( pParent
297 ,vId
298 ,rPos
299 ,rSize
300 ,lStyle
301 ,rVal
302 ,rsName
303 ))
304 return false;
305 if (!OS2CreateControl( wxT("STATIC")
306 ,SS_GROUPBOX
307 ,rPos
308 ,rSize
309 ,rsTitle
310 ))
311 return false;
312
313 wxAssociateWinWithHandle(m_hWnd, this);
314
315 //
316 // Now we can set m_nNoItems and let SetMajorDim set m_numCols/m_numRows
317 //
318 m_nNoItems = nNum;
319 SetMajorDim(nMajorDim == 0 ? nNum : nMajorDim, lStyle);
320 m_nNoRowsOrCols = nMajorDim;
321
322 //
323 // Some radio boxes test consecutive id.
324 //
325 (void)NewControlId();
326 m_ahRadioButtons = new WXHWND[nNum];
327 m_pnRadioWidth = new int[nNum];
328 m_pnRadioHeight = new int[nNum];
329
330 for (int i = 0; i < nNum; i++)
331 {
332 m_pnRadioWidth[i] = m_pnRadioHeight[i] = -1;
333
334 long lStyleBtn = BS_AUTORADIOBUTTON | WS_TABSTOP | WS_VISIBLE;
335 int nNewId = NewControlId();
336
337 if (i == 0 && lStyle == 0)
338 lStyleBtn |= WS_GROUP;
339
340 HWND hWndBtn = (WXHWND)::WinCreateWindow ( GetHwndOf(pParent)
341 ,WC_BUTTON
342 ,::wxPMTextToLabel(asChoices[i])
343 ,lStyleBtn
344 ,0, 0, 0, 0
345 ,GetWinHwnd(pParent)
346 ,HWND_TOP
347 ,(HMENU)nNewId
348 ,NULL
349 ,NULL
350 );
351 lColor = (LONG)vColour.GetPixel();
352 ::WinSetPresParam( hWndBtn
353 ,PP_FOREGROUNDCOLOR
354 ,sizeof(LONG)
355 ,(PVOID)&lColor
356 );
357 lColor = (LONG)m_backgroundColour.GetPixel();
358
359 ::WinSetPresParam( hWndBtn
360 ,PP_BACKGROUNDCOLOR
361 ,sizeof(LONG)
362 ,(PVOID)&lColor
363 );
364 if (!hWndBtn)
365 {
366 return false;
367 }
368 m_ahRadioButtons[i] = (WXHWND)hWndBtn;
369 SubclassRadioButton((WXHWND)hWndBtn);
370 wxAssociateWinWithHandle(hWndBtn, this);
371 wxOS2SetFont( hWndBtn
372 ,*wxSMALL_FONT
373 );
374 ::WinSetWindowULong(hWndBtn, QWL_USER, (ULONG)this);
375 m_aSubControls.Add(nNewId);
376 }
377
378 //
379 // Create a dummy radio control to end the group.
380 //
381 (void)::WinCreateWindow ( GetHwndOf(pParent),
382 WC_BUTTON,
383 "",
384 WS_GROUP | BS_AUTORADIOBUTTON,
385 0, 0, 0, 0,
386 GetWinHwnd(pParent),
387 HWND_TOP,
388 (HMENU)NewControlId(),
389 NULL,
390 NULL
391 );
392 SetFont(*wxSMALL_FONT);
393 fnWndProcRadioBox = (WXFARPROC)::WinSubclassWindow( GetHwnd()
394 ,(PFNWP)wxRadioBoxWndProc
395 );
396 ::WinSetWindowULong(GetHwnd(), QWL_USER, (ULONG)this);
397 lColor = (LONG)vColour.GetPixel();
398 ::WinSetPresParam( m_hWnd
399 ,PP_FOREGROUNDCOLOR
400 ,sizeof(LONG)
401 ,(PVOID)&lColor
402 );
403 ::WinSetPresParam( m_hWnd
404 ,PP_BORDERDARKCOLOR
405 ,sizeof(LONG)
406 ,(PVOID)&lColor
407 );
408 lColor = (LONG)m_backgroundColour.GetPixel();
409
410 ::WinSetPresParam( m_hWnd
411 ,PP_BACKGROUNDCOLOR
412 ,sizeof(LONG)
413 ,(PVOID)&lColor
414 );
415 ::WinSetPresParam( m_hWnd
416 ,PP_BORDERLIGHTCOLOR
417 ,sizeof(LONG)
418 ,(PVOID)&lColor
419 );
420 SetXComp(0);
421 SetYComp(0);
422 SetSelection(0);
423 SetSize( rPos.x
424 ,rPos.y
425 ,rSize.x
426 ,rSize.y
427 );
428 return true;
429 } // end of wxRadioBox::Create
430
431 wxSize wxRadioBox::DoGetBestSize() const
432 {
433 return (GetTotalButtonSize(GetMaxButtonSize()));
434 } // end of WinGuiBase_CRadioBox::DoGetBestSize
435
436 void wxRadioBox::DoSetSize(
437 int nX
438 , int nY
439 , int nWidth
440 , int nHeight
441 , int nSizeFlags
442 )
443 {
444 int nCurrentX;
445 int nCurrentY;
446 int nWidthOld;
447 int nHeightOld;
448 int nXx = nX;
449 int nYy = nY;
450 #if RADIOBTN_PARENT_IS_RADIOBOX
451 int nXOffset = 0;
452 int nYOffset = 0;
453 #else
454 int nXOffset = nXx;
455 int nYOffset = nYy;
456 #endif
457 int nCx1;
458 int nCy1;
459 wxSize vMaxSize = GetMaxButtonSize();
460 int nMaxWidth;
461 int nMaxHeight;
462 wxSize vTotSize;
463 int nTotWidth;
464 int nTotHeight;
465 int nStartX;
466 int nStartY;
467 wxFont vFont = GetFont();
468
469 m_nSizeFlags = nSizeFlags;
470 GetPosition( &nCurrentX
471 ,&nCurrentY
472 );
473 GetSize( &nWidthOld
474 ,&nHeightOld
475 );
476
477 if (nX == wxDefaultCoord && !(nSizeFlags & wxSIZE_ALLOW_MINUS_ONE))
478 nXx = nCurrentX;
479 if (nY == wxDefaultCoord && !(nSizeFlags & wxSIZE_ALLOW_MINUS_ONE))
480 nYy = nCurrentY;
481 if (nYy < 0)
482 nYy = 0;
483 if (nXx < 0)
484 nXx = 0;
485
486 wxGetCharSize( m_hWnd
487 ,&nCx1
488 ,&nCy1
489 ,&vFont
490 );
491
492 //
493 // Attempt to have a look coherent with other platforms: We compute the
494 // biggest toggle dim, then we align all items according this value.
495 //
496 vMaxSize = GetMaxButtonSize();
497 nMaxWidth = vMaxSize.x;
498 nMaxHeight = vMaxSize.y;
499
500 vTotSize = GetTotalButtonSize(vMaxSize);
501 nTotWidth = vTotSize.x;
502 nTotHeight = vTotSize.y;
503
504 //
505 // Only change our width/height if asked for
506 //
507 if (nWidth == -1)
508 {
509 if (nSizeFlags & wxSIZE_AUTO_WIDTH )
510 nWidth = nTotWidth;
511 else
512 nWidth = nWidthOld;
513 }
514
515 if (nHeight == -1)
516 {
517 if (nSizeFlags & wxSIZE_AUTO_HEIGHT)
518 nHeight = nTotHeight;
519 else
520 nHeight = nHeightOld;
521 }
522
523 wxWindowOS2* pParent = (wxWindowOS2*)GetParent();
524
525 if (pParent)
526 {
527 int nOS2Height = GetOS2ParentHeight(pParent);
528
529 nYy = nOS2Height - (nYy + nHeight);
530 nYOffset = nYy + nHeight;
531 }
532 else
533 {
534 RECTL vRect;
535
536 ::WinQueryWindowRect(HWND_DESKTOP, &vRect);
537 nYy = vRect.yTop - (nYy + nHeight);
538 }
539 ::WinSetWindowPos( GetHwnd()
540 ,HWND_TOP
541 ,(LONG)nXx
542 ,(LONG)nYy
543 ,(LONG)nWidth
544 ,(LONG)nHeight
545 ,SWP_ZORDER | SWP_SIZE | SWP_MOVE | SWP_SHOW
546 );
547
548 //
549 // Now position all the buttons: the current button will be put at
550 // wxPoint(x_offset, y_offset) and the new row/column will start at
551 // startX/startY. The size of all buttons will be the same wxSize(maxWidth,
552 // maxHeight) except for the buttons in the last column which should extend
553 // to the right border of radiobox and thus can be wider than this.
554 //
555 // Also, remember that wxRA_SPECIFY_COLS means that we arrange buttons in
556 // left to right order and m_majorDim is the number of columns while
557 // wxRA_SPECIFY_ROWS means that the buttons are arranged top to bottom and
558 // m_majorDim is the number of rows.
559 //
560 nXOffset += nCx1;
561 nYOffset -= (nMaxHeight + ((3*nCy1)/2));
562
563 nStartX = nXOffset;
564 nStartY = nYOffset;
565
566 for (int i = 0; i < m_nNoItems; i++)
567 {
568 //
569 // The last button in the row may be wider than the other ones as the
570 // radiobox may be wider than the sum of the button widths (as it
571 // happens, for example, when the radiobox label is very long)
572 //
573 bool bIsLastInTheRow;
574
575 if (m_windowStyle & wxRA_SPECIFY_COLS)
576 {
577 //
578 // Item is the last in its row if it is a multiple of the number of
579 // columns or if it is just the last item
580 //
581 int n = i + 1;
582
583 bIsLastInTheRow = ((n % GetMajorDim()) == 0) || (n == m_nNoItems);
584 }
585 else // winRA_SPECIFY_ROWS
586 {
587 //
588 // Item is the last in the row if it is in the last columns
589 //
590 bIsLastInTheRow = i >= (m_nNoItems/GetMajorDim()) * GetMajorDim();
591 }
592
593 //
594 // Is this the start of new row/column?
595 //
596 if (i && (i % GetMajorDim() == 0))
597 {
598 if (m_windowStyle & wxRA_SPECIFY_ROWS)
599 {
600
601 //
602 // Start of new column
603 //
604 nYOffset = nStartY;
605 nXOffset += nMaxWidth + nCx1;
606 }
607 else // start of new row
608 {
609 nXOffset = nStartX;
610 nYOffset -= nMaxHeight;
611 if (m_pnRadioWidth[0] > 0L)
612 nYOffset -= nCy1/2;
613 }
614 }
615
616 int nWidthBtn;
617
618 if (bIsLastInTheRow)
619 {
620 //
621 // Make the button go to the end of radio box
622 //
623 nWidthBtn = nStartX + nWidth - nXOffset - (2 * nCx1);
624 if (nWidthBtn < nMaxWidth)
625 nWidthBtn = nMaxWidth;
626 }
627 else
628 {
629 //
630 // Normal button, always of the same size
631 //
632 nWidthBtn = nMaxWidth;
633 }
634
635 //
636 // Make all buttons of the same, maximal size - like this they
637 // cover the radiobox entirely and the radiobox tooltips are always
638 // shown (otherwise they are not when the mouse pointer is in the
639 // radiobox part not belonging to any radiobutton)
640 //
641 ::WinSetWindowPos( (HWND)m_ahRadioButtons[i]
642 ,HWND_TOP
643 ,(LONG)nXOffset
644 ,(LONG)nYOffset
645 ,(LONG)nWidthBtn
646 ,(LONG)nMaxHeight
647 ,SWP_ZORDER | SWP_SIZE | SWP_MOVE | SWP_SHOW
648 );
649 //
650 // Where do we put the next button?
651 //
652 if (m_windowStyle & wxRA_SPECIFY_ROWS)
653 {
654 //
655 // Below this one
656 //
657 nYOffset -= nMaxHeight;
658 if (m_pnRadioWidth[0] > 0)
659 nYOffset -= nCy1/2;
660 }
661 else
662 {
663 //
664 // To the right of this one
665 //
666 nXOffset += nWidthBtn + nCx1;
667 }
668 }
669 } // end of wxRadioBox::DoSetSize
670
671 bool wxRadioBox::Enable(int nItem, bool bEnable)
672 {
673 wxCHECK_MSG( IsValid(nItem), false,
674 wxT("invalid item in wxRadioBox::Enable()") );
675
676 ::WinEnableWindow((HWND) m_ahRadioButtons[nItem], bEnable);
677 return true;
678 } // end of wxRadioBox::Enable
679
680 bool wxRadioBox::Enable(
681 bool bEnable
682 )
683 {
684 if ( !wxControl::Enable(bEnable) )
685 return false;
686 for (int i = 0; i < m_nNoItems; i++)
687 ::WinEnableWindow((HWND)m_ahRadioButtons[i], bEnable);
688 return true;
689 } // end of wxRadioBox::Enable
690
691 int wxRadioBox::GetCount() const
692 {
693 return m_nNoItems;
694 } // end of wxRadioBox::GetCount
695
696 wxString wxRadioBox::GetLabel(int nItem) const
697 {
698 wxCHECK_MSG( IsValid(nItem), wxEmptyString, wxT("invalid radiobox index") );
699
700 return wxGetWindowText(m_ahRadioButtons[nItem]);
701 } // end of wxRadioBox::GetLabel
702
703 wxSize wxRadioBox::GetMaxButtonSize() const
704 {
705 int nWidthMax = 0;
706 int nHeightMax = 0;
707
708 for (int i = 0 ; i < m_nNoItems; i++)
709 {
710 int nWidth;
711 int nHeight;
712
713 if (m_pnRadioWidth[i] < 0L)
714 {
715 GetTextExtent( wxGetWindowText(m_ahRadioButtons[i])
716 ,&nWidth
717 ,&nHeight
718 );
719
720 //
721 // Adjust the size to take into account the radio box itself
722 // FIXME this is totally bogus!
723 //
724 nWidth += RADIO_SIZE;
725 nHeight *= 3;
726 nHeight /= 2;
727 }
728 else
729 {
730 nWidth = m_pnRadioWidth[i];
731 nHeight = m_pnRadioHeight[i];
732 }
733 if (nWidthMax < nWidth )
734 nWidthMax = nWidth;
735 if (nHeightMax < nHeight )
736 nHeightMax = nHeight;
737 }
738 wxSize maxsize( nWidthMax, nHeightMax);
739 return maxsize;
740 } // end of wxRadioBox::GetMaxButtonSize
741
742 void wxRadioBox::GetPosition( int* pnX,
743 int* pnY ) const
744 {
745 wxWindowOS2* pParent = GetParent();
746 RECT vRect = { -1, -1, -1, -1 };
747 POINTL vPoint;
748 int i;
749
750 for (i = 0; i < m_nNoItems; i++)
751 wxFindMaxSize( m_ahRadioButtons[i]
752 ,&vRect
753 );
754 if (m_hWnd)
755 wxFindMaxSize( m_hWnd
756 ,&vRect
757 );
758
759 //
760 // Since we now have the absolute screen coords, if there's a parent we
761 // must subtract its top left corner
762 //
763 vPoint.x = vRect.xLeft;
764 vPoint.y = vRect.yTop;
765 if (pParent)
766 {
767 SWP vSwp;
768
769 ::WinQueryWindowPos((HWND)pParent->GetHWND(), &vSwp);
770 vPoint.x = vSwp.x;
771 vPoint.y = vSwp.y;
772 }
773
774 //
775 // We may be faking the client origin. So a window that's really at (0, 30)
776 // may appear (to wxWin apps) to be at (0, 0).
777 //
778 if (GetParent())
779 {
780 wxPoint vPt(GetParent()->GetClientAreaOrigin());
781
782 vPoint.x = vPt.x;
783 vPoint.y = vPt.y;
784 }
785 if (pnX)
786 *pnX = vPoint.x;
787 if (pnY)
788 *pnY = vPoint.y;
789 } // end of wxRadioBox::GetPosition
790
791 // Get single selection, for single choice list items
792 int wxRadioBox::GetSelection() const
793 {
794 return m_nSelectedButton;
795 } // end of wxRadioBox::GetSelection
796
797 void wxRadioBox::GetSize( int* pnWidth, int* pnHeight ) const
798 {
799 RECT vRect;
800 int i;
801
802 vRect.xLeft = -1;
803 vRect.xRight = -1;
804 vRect.yTop = -1;
805 vRect.yBottom = -1;
806
807 if (m_hWnd)
808 wxFindMaxSize( m_hWnd
809 ,&vRect
810 );
811
812 for (i = 0; i < m_nNoItems; i++)
813 wxFindMaxSize( m_ahRadioButtons[i]
814 ,&vRect
815 );
816
817 if (pnWidth)
818 *pnWidth = vRect.xRight - vRect.xLeft;
819 if (pnHeight)
820 *pnHeight = vRect.yTop - vRect.yBottom;
821 } // end of wxRadioBox::GetSize
822
823 // Find string for position
824 wxString wxRadioBox::GetString(
825 int nNum
826 ) const
827 {
828 return wxGetWindowText(m_ahRadioButtons[nNum]);
829 } // end of wxRadioBox::GetString
830
831 // For single selection items only
832 wxString wxRadioBox::GetStringSelection() const
833 {
834 wxString sResult;
835 int nSel = GetSelection();
836
837 if (nSel > -1)
838 sResult = GetString(nSel);
839 return sResult;
840 } // end of wxRadioBox::GetStringSelection
841
842 wxSize wxRadioBox::GetTotalButtonSize( const wxSize& rSizeBtn ) const
843 {
844 int nCx1;
845 int nCy1;
846 int nHeight;
847 int nWidth;
848 int nWidthLabel = 0;
849
850 nCx1 = GetCharWidth();
851 nCy1 = GetCharHeight();
852 nHeight = GetRowCount() * rSizeBtn.y + (2 * nCy1);
853 nWidth = GetColumnCount() * (rSizeBtn.x + nCx1) + nCx1;
854
855 //
856 // And also wide enough for its label
857 //
858 wxString sStr = wxGetWindowText(GetHwnd());
859 if (!sStr.IsEmpty())
860 {
861 GetTextExtent( sStr
862 ,&nWidthLabel
863 ,NULL
864 );
865 nWidthLabel += 2*nCx1;
866 }
867 if (nWidthLabel > nWidth)
868 nWidth = nWidthLabel;
869
870 wxSize total( nWidth, nHeight );
871 return total;
872 } // end of wxRadioBox::GetTotalButtonSize
873
874 WXHBRUSH wxRadioBox::OnCtlColor( WXHDC hwinDC,
875 WXHWND WXUNUSED(hWnd),
876 WXUINT WXUNUSED(uCtlColor),
877 WXUINT WXUNUSED(uMessage),
878 WXWPARAM WXUNUSED(wParam),
879 WXLPARAM WXUNUSED(lParam) )
880 {
881 HPS hPS = (HPS)hwinDC; // pass in a PS handle in OS/2
882
883 if (GetParent()->GetTransparentBackground())
884 ::GpiSetBackMix(hPS, BM_LEAVEALONE);
885 else
886 ::GpiSetBackMix(hPS, BM_OVERPAINT);
887
888 wxColour vColBack = GetBackgroundColour();
889
890 ::GpiSetBackColor(hPS, vColBack.GetPixel());
891 ::GpiSetColor(hPS, vColBack.GetPixel());
892
893 wxBrush* pBrush = wxTheBrushList->FindOrCreateBrush( vColBack, wxSOLID );
894 return ((WXHBRUSH)pBrush->GetResourceHandle());
895 } // end of wxRadioBox::OnCtlColor
896
897 bool wxRadioBox::OS2Command( WXUINT uCmd,
898 WXWORD wId)
899 {
900 int nSelectedButton = -1;
901
902 if (uCmd == BN_CLICKED)
903 {
904 if (wId == GetId())
905 return true;
906
907
908 for (int i = 0; i < m_nNoItems; i++)
909 {
910 if (wId == wxGetWindowId(m_ahRadioButtons[i]))
911 {
912 nSelectedButton = i;
913 break;
914 }
915 }
916 if (nSelectedButton == -1)
917 {
918 //
919 // Just ignore it
920 //
921 return false;
922 }
923 if (nSelectedButton != m_nSelectedButton)
924 {
925 m_nSelectedButton = nSelectedButton;
926 SendNotificationEvent();
927 }
928 return true;
929 }
930 else
931 return false;
932 } // end of wxRadioBox::OS2Command
933
934 void wxRadioBox::SendNotificationEvent()
935 {
936 wxCommandEvent vEvent( wxEVT_COMMAND_RADIOBOX_SELECTED
937 ,m_windowId
938 );
939
940 vEvent.SetInt( m_nSelectedButton );
941 vEvent.SetString( GetString(m_nSelectedButton) );
942 vEvent.SetEventObject(this);
943 ProcessCommand(vEvent);
944 } // end of wxRadioBox::SendNotificationEvent
945
946 void wxRadioBox::SetFocus()
947 {
948 if (m_nNoItems > 0)
949 {
950 if (m_nSelectedButton == -1)
951 ::WinSetFocus(HWND_DESKTOP, (HWND)m_ahRadioButtons[0]);
952 else
953 ::WinSetFocus(HWND_DESKTOP, (HWND)m_ahRadioButtons[m_nSelectedButton]);
954 }
955 } // end of wxRadioBox::SetFocus
956
957 bool wxRadioBox::SetFont(
958 const wxFont& rFont
959 )
960 {
961 if (!wxControl::SetFont(rFont))
962 {
963 //
964 // Nothing to do
965 //
966 return false;
967 }
968 //
969 // Also set the font of our radio buttons
970 //
971 for (int n = 0; n < (int)m_nNoItems; n++)
972 {
973 HWND hWndBtn = (HWND)m_ahRadioButtons[n];
974
975 wxOS2SetFont( hWndBtn
976 ,rFont
977 );
978 ::WinInvalidateRect(hWndBtn, NULL, FALSE);
979 }
980 return true;
981 } // end of wxRadioBox::SetFont
982
983 void wxRadioBox::SetSelection(
984 int nNum
985 )
986 {
987 wxCHECK_RET( IsValid(nNum), wxT("invalid radiobox index") );
988
989 if ( IsValid(m_nSelectedButton) )
990 ::WinSendMsg((HWND)m_ahRadioButtons[m_nSelectedButton], BM_SETCHECK, (MPARAM)0, (MPARAM)0);
991
992 ::WinSendMsg((HWND)m_ahRadioButtons[nNum], BM_SETCHECK, (MPARAM)1, (MPARAM)0);
993 ::WinSetFocus(HWND_DESKTOP, (HWND)m_ahRadioButtons[nNum]);
994 m_nSelectedButton = nNum;
995 } // end of wxRadioBox::SetSelection
996
997 void wxRadioBox::SetString(
998 int nItem
999 , const wxString& rsLabel
1000 )
1001 {
1002 wxCHECK_RET( IsValid(nItem), wxT("invalid radiobox index") );
1003
1004 m_pnRadioWidth[nItem] = m_pnRadioHeight[nItem] = -1;
1005 ::WinSetWindowText((HWND)m_ahRadioButtons[nItem], (PSZ)rsLabel.c_str());
1006 } // end of wxRadioBox::SetString
1007
1008 bool wxRadioBox::SetStringSelection(const wxString& rsStr)
1009 {
1010 int nSel = FindString(rsStr);
1011
1012 if (nSel > -1)
1013 {
1014 SetSelection(nSel);
1015 return true;
1016 }
1017 else
1018 return false;
1019 } // end of wxRadioBox::SetStringSelection
1020
1021 bool wxRadioBox::Show(
1022 bool bShow
1023 )
1024 {
1025 if (!wxControl::Show(bShow))
1026 return false;
1027
1028 for (int i = 0; i < m_nNoItems; i++)
1029 {
1030 ::WinShowWindow((HWND)m_ahRadioButtons[i], (BOOL)bShow);
1031 }
1032 return true;
1033 } // end of wxRadioBox::Show
1034
1035 // Show a specific button
1036 bool wxRadioBox::Show(
1037 int nItem
1038 , bool bShow
1039 )
1040 {
1041 wxCHECK_MSG( IsValid(nItem), false,
1042 wxT("invalid item in wxRadioBox::Show()") );
1043
1044 ::WinShowWindow((HWND)m_ahRadioButtons[nItem], bShow);
1045
1046 return true;
1047 } // end of wxRadioBox::Show
1048
1049 void wxRadioBox::SubclassRadioButton(
1050 WXHWND hWndBtn
1051 )
1052 {
1053 fnWndProcRadioBtn = (WXFARPROC)::WinSubclassWindow(hWndBtn, (PFNWP)wxRadioBtnWndProc);
1054 } // end of wxRadioBox::SubclassRadioButton
1055
1056 MRESULT wxRadioBox::WindowProc(
1057 WXUINT uMsg
1058 , WXWPARAM wParam
1059 , WXLPARAM lParam
1060 )
1061 {
1062 return (wxControl::OS2WindowProc( uMsg
1063 ,wParam
1064 ,lParam
1065 ));
1066 } // end of wxRadioBox::WindowProc
1067
1068 // ---------------------------------------------------------------------------
1069 // window proc for radio buttons
1070 // ---------------------------------------------------------------------------
1071
1072 MRESULT wxRadioBtnWndProc(
1073 HWND hWnd
1074 , UINT uMessage
1075 , MPARAM wParam
1076 , MPARAM lParam
1077 )
1078 {
1079 switch (uMessage)
1080 {
1081 case WM_CHAR:
1082 {
1083 USHORT uKeyFlags = SHORT1FROMMP((MPARAM)wParam);
1084
1085 if (!(uKeyFlags & KC_KEYUP)) // Key Down event
1086 {
1087 if (uKeyFlags & KC_VIRTUALKEY)
1088 {
1089 wxRadioBox* pRadiobox = (wxRadioBox *)::WinQueryWindowULong( hWnd
1090 ,QWL_USER
1091 );
1092 USHORT uVk = SHORT2FROMMP((MPARAM)lParam);
1093 bool bProcessed = true;
1094 wxDirection eDir;
1095
1096 switch(uVk)
1097 {
1098 case VK_LEFT:
1099 eDir = wxDOWN;
1100 break;
1101
1102 case VK_RIGHT:
1103 eDir = wxDOWN;
1104 break;
1105
1106 case VK_DOWN:
1107 eDir = wxDOWN;
1108 break;
1109
1110 case VK_UP:
1111 eDir = wxUP;
1112 break;
1113
1114 default:
1115 bProcessed = false;
1116
1117 //
1118 // Just to suppress the compiler warning
1119 //
1120 eDir = wxALL;
1121 }
1122
1123 if (bProcessed)
1124 {
1125 int nSelOld = pRadiobox->GetSelection();
1126 int nSelNew = pRadiobox->GetNextItem( nSelOld
1127 ,eDir
1128 ,pRadiobox->GetWindowStyleFlag()
1129 );
1130
1131 if (nSelNew != nSelOld)
1132 {
1133 pRadiobox->SetSelection(nSelNew);
1134
1135 //
1136 // Emulate the button click
1137 //
1138 pRadiobox->SendNotificationEvent();
1139 return 0;
1140 }
1141 }
1142 }
1143 }
1144 }
1145 break;
1146 }
1147
1148 return fnWndProcRadioBtn( hWnd
1149 ,(ULONG)uMessage
1150 ,(MPARAM)wParam
1151 ,(MPARAM)lParam
1152 );
1153 } // end of wxRadioBtnWndProc
1154
1155 MRESULT EXPENTRY wxRadioBoxWndProc( HWND hWnd,
1156 UINT uMessage,
1157 MPARAM wParam,
1158 MPARAM lParam )
1159 {
1160 return (fnWndProcRadioBox( hWnd,
1161 (ULONG)uMessage,
1162 (MPARAM)wParam,
1163 (MPARAM)lParam )
1164 );
1165 } // end of wxRadioBoxWndProc
wxWidgets (Impactor)