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