]> git.saurik.com Git - wxWidgets.git/blame - src/os2/radiobox.cpp
projects / wxWidgets.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Clipboard usage fixes inspired by Tinderbox logs.
[wxWidgets.git] / src / os2 / radiobox.cpp
CommitLineData
0e320a79
DW		 1/////////////////////////////////////////////////////////////////////////////
2// Name: radiobox.cpp
3// Purpose: wxRadioBox
cdf1e714 4// Author: David Webster
0e320a79 5// Modified by:
cdf1e714 6// Created: 10/12/99
0e320a79 7// RCS-ID: $Id$
cdf1e714 8// Copyright: (c) David Webster
65571936 9// Licence: wxWindows licence
0e320a79
DW		 10/////////////////////////////////////////////////////////////////////////////
11
cdf1e714
DW		 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"
b59c98dd
SN		 18 #include "wx/wxchar.h"
19 #include "wx/string.h"
cdf1e714
DW		 20 #include "wx/bitmap.h"
21 #include "wx/brush.h"
22 #include "wx/radiobox.h"
0e320a79
DW		 23#endif
24
cdf1e714 25#include "wx/os2/private.h"
0e320a79 26
0e320a79 27IMPLEMENT_DYNAMIC_CLASS(wxRadioBox, wxControl)
0e320a79 28
cdf1e714
DW		 29// ---------------------------------------------------------------------------
30// private functions
31// ---------------------------------------------------------------------------
32
33// wnd proc for radio buttons
3c299c3a
DW		 34MRESULT EXPENTRY wxRadioBtnWndProc( HWND hWnd
35 ,UINT uMessage
36 ,MPARAM wParam
37 ,MPARAM lParam
38 );
f289196b
DW		 39MRESULT EXPENTRY wxRadioBoxWndProc( HWND hWnd
40 ,UINT uMessage
41 ,MPARAM wParam
42 ,MPARAM lParam
43 );
cdf1e714
DW		 44
45// ---------------------------------------------------------------------------
46// global vars
47// ---------------------------------------------------------------------------
48
49// the pointer to standard radio button wnd proc
f289196b
DW		 50extern void wxAssociateWinWithHandle( HWND hWnd
51 ,wxWindowOS2* pWin
52 );
3c299c3a 53static WXFARPROC fnWndProcRadioBtn = NULL;
f289196b 54static WXFARPROC fnWndProcRadioBox = NULL;
cdf1e714
DW		 55
56// ===========================================================================
57// implementation
58// ===========================================================================
59
60// ---------------------------------------------------------------------------
61// wxRadioBox
62// ---------------------------------------------------------------------------
63
3c299c3a
DW		 64// Radio box item
65wxRadioBox::wxRadioBox()
0367c1c0 66{
3c299c3a
DW		 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
0367c1c0 75
3c299c3a 76wxRadioBox::~wxRadioBox()
0367c1c0 77{
1a87edf2 78 m_isBeingDeleted = true;
0367c1c0 79
3c299c3a 80 if (m_ahRadioButtons)
cdf1e714 81 {
3c299c3a
DW		 82 int i;
83 for (i = 0; i < m_nNoItems; i++)
84 ::WinDestroyWindow((HWND)m_ahRadioButtons[i]);
85 delete[] m_ahRadioButtons;
cdf1e714 86 }
3c299c3a
DW		 87 if (m_pnRadioWidth)
88 delete[] m_pnRadioWidth;
89 if (m_pnRadioHeight)
90 delete[] m_pnRadioHeight;
91} // end of wxRadioBox::~wxRadioBox
92
93void wxRadioBox::AdjustButtons(
94 int nX
95, int nY
96, int nWidth
97, int nHeight
d8a3f66c 98, int nSizeFlags
3c299c3a 99)
cdf1e714 100{
3c299c3a
DW		 101 wxSize vMaxSize;
102 int nXOffset = nX;
103 int nYOffset = nY + nHeight;
104 int nCx1;
105 int nCy1;
106 int nStartX;
107 int nStartY;
108 int nMaxWidth;
109 int nMaxHeight;
7804d121 110 wxFont vFont = GetFont();
3c299c3a
DW		 111
112 wxGetCharSize( m_hWnd
113 ,&nCx1
114 ,&nCy1
7804d121 115 ,&vFont
3c299c3a
DW		 116 );
117 vMaxSize = GetMaxButtonSize();
118 nMaxWidth = vMaxSize.x;
119 nMaxHeight = vMaxSize.y;
120
121 nXOffset += nCx1;
122 nYOffset -= (nMaxHeight + ((3*nCy1)/2));
123
124 nStartX = nXOffset;
125 nStartY = nYOffset;
126
127 for (int i = 0; i < m_nNoItems; i++)
cdf1e714 128 {
3c299c3a
DW		 129 //
130 // The last button in the row may be wider than the other ones as the
131 // radiobox may be wider than the sum of the button widths (as it
132 // happens, for example, when the radiobox label is very long)
133 //
134 bool bIsLastInTheRow;
135
136 if (m_windowStyle & wxRA_SPECIFY_COLS)
137 {
138 //
139 // Item is the last in its row if it is a multiple of the number of
140 // columns or if it is just the last item
141 //
142 int n = i + 1;
cdf1e714 143
3c299c3a
DW		 144 bIsLastInTheRow = ((n % m_nMajorDim) == 0) || (n == m_nNoItems);
145 }
146 else // winRA_SPECIFY_ROWS
147 {
148 //
149 // Item is the last in the row if it is in the last columns
150 //
151 bIsLastInTheRow = i >= (m_nNoItems/m_nMajorDim) * m_nMajorDim;
152 }
cdf1e714 153
3c299c3a
DW		 154 //
155 // Is this the start of new row/column?
156 //
157 if (i && (i % m_nMajorDim == 0))
cdf1e714 158 {
3c299c3a 159 if (m_windowStyle & wxRA_SPECIFY_ROWS)
cdf1e714 160 {
cdf1e714 161
3c299c3a
DW		 162 //
163 // Start of new column
164 //
165 nYOffset = nStartY;
166 nXOffset += nMaxWidth + nCx1;
167 }
168 else // start of new row
169 {
170 nXOffset = nStartX;
171 nYOffset -= nMaxHeight;
172 if (m_pnRadioWidth[0] > 0L)
173 nYOffset -= nCy1/2;
cdf1e714
DW		 174 }
175 }
176
3c299c3a 177 int nWidthBtn;
cdf1e714 178
3c299c3a 179 if (bIsLastInTheRow)
cdf1e714 180 {
3c299c3a
DW		 181 //
182 // Make the button go to the end of radio box
183 //
184 nWidthBtn = nStartX + nWidth - nXOffset - (2 * nCx1);
185 if (nWidthBtn < nMaxWidth)
186 nWidthBtn = nMaxWidth;
187 }
188 else
189 {
190 //
191 // Normal button, always of the same size
192 //
193 nWidthBtn = nMaxWidth;
cdf1e714 194 }
cdf1e714 195
3c299c3a
DW		 196 //
197 // Make all buttons of the same, maximal size - like this they
198 // cover the radiobox entirely and the radiobox tooltips are always
199 // shown (otherwise they are not when the mouse pointer is in the
200 // radiobox part not beYInt32ing to any radiobutton)
201 //
202 ::WinSetWindowPos( (HWND)m_ahRadioButtons[i]
203 ,HWND_TOP
204 ,(LONG)nXOffset
205 ,(LONG)nYOffset
206 ,(LONG)nWidthBtn
207 ,(LONG)nMaxHeight
208 ,SWP_ZORDER | SWP_SIZE | SWP_MOVE | SWP_SHOW
209 );
210 //
211 // Where do we put the next button?
212 //
213 if (m_windowStyle & wxRA_SPECIFY_ROWS)
214 {
215 //
216 // Below this one
217 //
218 nYOffset -= nMaxHeight;
219 if (m_pnRadioWidth[0] > 0)
220 nYOffset -= nCy1/2;
221 }
222 else
223 {
224 //
225 // To the right of this one
226 //
227 nXOffset += nWidthBtn + nCx1;
228 }
cdf1e714 229 }
3c299c3a 230} // end of wxRadioBox::AdjustButtons
cdf1e714 231
3c299c3a
DW		 232void wxRadioBox::Command (
233 wxCommandEvent& rEvent
234)
235{
236 SetSelection (rEvent.GetInt());
237 ProcessCommand(rEvent);
238} // end of wxRadioBox::Command
cdf1e714 239
3c299c3a
DW		 240bool wxRadioBox::ContainsHWND(
241 WXHWND hWnd
242) const
0e320a79 243{
3c299c3a
DW		 244 size_t nCount = GetCount();
245 size_t i;
246
247 for (i = 0; i < nCount; i++)
248 {
249 if (GetRadioButtons()[i] == hWnd)
1a87edf2 250 return true;
3c299c3a 251 }
1a87edf2 252 return false;
3c299c3a
DW		 253} // end of wxRadioBox::ContainsHWND
254
584ad2a3
MB		 255bool wxRadioBox::Create(
256 wxWindow* pParent
257, wxWindowID vId
258, const wxString& rsTitle
259, const wxPoint& rPos
260, const wxSize& rSize
261, const wxArrayString& asChoices
262, int nMajorDim
263, long lStyle
264, const wxValidator& rVal
265, const wxString& rsName
266)
267{
41c54fac 268 wxCArrayString chs(asChoices);
584ad2a3
MB		 269
270 return Create(pParent, vId, rsTitle, rPos, rSize, chs.GetCount(),
271 chs.GetStrings(), nMajorDim, lStyle, rVal, rsName);
272}
273
3c299c3a
DW		 274bool wxRadioBox::Create(
275 wxWindow* pParent
276, wxWindowID vId
277, const wxString& rsTitle
278, const wxPoint& rPos
279, const wxSize& rSize
280, int nNum
281, const wxString asChoices[]
282, int nMajorDim
283, long lStyle
3c299c3a 284, const wxValidator& rVal
3c299c3a
DW		 285, const wxString& rsName
286)
0e320a79 287{
3c299c3a
DW		 288 wxColour vColour;
289 LONG lColor;
290
0fba44b4 291 vColour.Set(wxString(wxT("BLACK")));
b389a12d 292 m_backgroundColour = pParent->GetBackgroundColour();
3c299c3a 293 m_nSelectedButton = -1;
b389a12d 294 m_nNoItems = 0;
3c299c3a
DW		 295
296 m_nMajorDim = nMajorDim == 0 ? nNum : nMajorDim;
297 m_nNoRowsOrCols = nMajorDim;
298
299 //
300 // Common initialization
301 //
b9b1d6c8
DW		 302 if (!CreateControl( pParent
303 ,vId
304 ,rPos
305 ,rSize
306 ,lStyle
b9b1d6c8 307 ,rVal
b9b1d6c8
DW		 308 ,rsName
309 ))
1a87edf2 310 return false;
0fba44b4 311 if (!OS2CreateControl( wxT("STATIC")
f289196b 312 ,SS_GROUPBOX
3c299c3a
DW		 313 ,rPos
314 ,rSize
315 ,rsTitle
316 ))
1a87edf2 317 return false;
cdf1e714 318
f289196b 319 wxAssociateWinWithHandle(m_hWnd, this);
cdf1e714 320
3c299c3a 321 //
cdf1e714 322 // Some radio boxes test consecutive id.
3c299c3a 323 //
b389a12d 324 m_nNoItems = nNum;
cdf1e714 325 (void)NewControlId();
3c299c3a
DW		 326 m_ahRadioButtons = new WXHWND[nNum];
327 m_pnRadioWidth = new int[nNum];
328 m_pnRadioHeight = new int[nNum];
329
3c299c3a 330 for (int i = 0; i < nNum; i++)
cdf1e714 331 {
3c299c3a
DW		 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
0fba44b4 342 ,(PSZ)asChoices[i].c_str()
3c299c3a
DW		 343 ,lStyleBtn
344 ,0, 0, 0, 0
345 ,GetWinHwnd(pParent)
346 ,HWND_TOP
347 ,(HMENU)nNewId
348 ,NULL
349 ,NULL
350 );
5d44b24e 351 lColor = (LONG)vColour.GetPixel();
3c299c3a
DW		 352 ::WinSetPresParam( hWndBtn
353 ,PP_FOREGROUNDCOLOR
354 ,sizeof(LONG)
355 ,(PVOID)&lColor
356 );
5d44b24e
DW		 357 lColor = (LONG)m_backgroundColour.GetPixel();
358
359 ::WinSetPresParam( hWndBtn
360 ,PP_BACKGROUNDCOLOR
361 ,sizeof(LONG)
362 ,(PVOID)&lColor
363 );
3c299c3a 364 if (!hWndBtn)
cdf1e714 365 {
1a87edf2 366 return false;
cdf1e714 367 }
3c299c3a
DW		 368 m_ahRadioButtons[i] = (WXHWND)hWndBtn;
369 SubclassRadioButton((WXHWND)hWndBtn);
f289196b 370 wxAssociateWinWithHandle(hWndBtn, this);
3c299c3a 371 wxOS2SetFont( hWndBtn
f289196b 372 ,*wxSMALL_FONT
3c299c3a
DW		 373 );
374 ::WinSetWindowULong(hWndBtn, QWL_USER, (ULONG)this);
375 m_aSubControls.Add(nNewId);
cdf1e714 376 }
0e320a79 377
3c299c3a 378 //
cdf1e714 379 // Create a dummy radio control to end the group.
3c299c3a
DW		 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 );
f289196b
DW		 392 SetFont(*wxSMALL_FONT);
393 fnWndProcRadioBox = (WXFARPROC)::WinSubclassWindow( GetHwnd()
394 ,(PFNWP)wxRadioBoxWndProc
395 );
396 ::WinSetWindowULong(GetHwnd(), QWL_USER, (ULONG)this);
5d44b24e 397 lColor = (LONG)vColour.GetPixel();
3c299c3a
DW		 398 ::WinSetPresParam( m_hWnd
399 ,PP_FOREGROUNDCOLOR
400 ,sizeof(LONG)
401 ,(PVOID)&lColor
402 );
f289196b
DW		 403 ::WinSetPresParam( m_hWnd
404 ,PP_BORDERDARKCOLOR
405 ,sizeof(LONG)
406 ,(PVOID)&lColor
407 );
5d44b24e
DW		 408 lColor = (LONG)m_backgroundColour.GetPixel();
409
410 ::WinSetPresParam( m_hWnd
411 ,PP_BACKGROUNDCOLOR
412 ,sizeof(LONG)
413 ,(PVOID)&lColor
414 );
f289196b
DW		 415 ::WinSetPresParam( m_hWnd
416 ,PP_BORDERLIGHTCOLOR
417 ,sizeof(LONG)
418 ,(PVOID)&lColor
419 );
b389a12d
DW		 420 SetXComp(0);
421 SetYComp(0);
cdf1e714 422 SetSelection(0);
3c299c3a
DW		 423 SetSize( rPos.x
424 ,rPos.y
425 ,rSize.x
426 ,rSize.y
427 );
1a87edf2 428 return true;
3c299c3a 429} // end of wxRadioBox::Create
0e320a79 430
3c299c3a 431wxSize wxRadioBox::DoGetBestSize() const
0e320a79 432{
3c299c3a
DW		 433 return (GetTotalButtonSize(GetMaxButtonSize()));
434} // end of WinGuiBase_CRadioBox::DoGetBestSize
435
436void 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;
7804d121 467 wxFont vFont = GetFont();
3c299c3a
DW		 468
469 m_nSizeFlags = nSizeFlags;
470 GetPosition( &nCurrentX
471 ,&nCurrentY
472 );
473 GetSize( &nWidthOld
474 ,&nHeightOld
475 );
476
fa50c0e3 477 if (nX == wxDefaultCoord && !(nSizeFlags & wxSIZE_ALLOW_MINUS_ONE))
3c299c3a 478 nXx = nCurrentX;
fa50c0e3 479 if (nY == wxDefaultCoord && !(nSizeFlags & wxSIZE_ALLOW_MINUS_ONE))
3c299c3a 480 nYy = nCurrentY;
b389a12d
DW		 481 if (nYy < 0)
482 nYy = 0;
483 if (nXx < 0)
484 nXx = 0;
3c299c3a
DW		 485
486 wxGetCharSize( m_hWnd
487 ,&nCx1
488 ,&nCy1
7804d121 489 ,&vFont
3c299c3a
DW		 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 }
cdf1e714 514
3c299c3a 515 if (nHeight == -1)
cdf1e714 516 {
3c299c3a
DW		 517 if (nSizeFlags & wxSIZE_AUTO_HEIGHT)
518 nHeight = nTotHeight;
519 else
520 nHeight = nHeightOld;
cdf1e714
DW		 521 }
522
3c299c3a 523 wxWindowOS2* pParent = (wxWindowOS2*)GetParent();
cdf1e714 524
3c299c3a
DW		 525 if (pParent)
526 {
d8a3f66c
DW		 527 int nOS2Height = GetOS2ParentHeight(pParent);
528
529 nYy = nOS2Height - (nYy + nHeight);
3c299c3a
DW		 530 nYOffset = nYy + nHeight;
531 }
532 else
533 {
534 RECTL vRect;
0e320a79 535
3c299c3a
DW		 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;
0367c1c0 582
3c299c3a
DW		 583 bIsLastInTheRow = ((n % m_nMajorDim) == 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/m_nMajorDim) * m_nMajorDim;
591 }
0367c1c0 592
3c299c3a
DW		 593 //
594 // Is this the start of new row/column?
595 //
596 if (i && (i % m_nMajorDim == 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 }
cdf1e714 634
3c299c3a
DW		 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 beinting 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
0e320a79 670
1a87edf2 671bool wxRadioBox::Enable(int nItem, bool bEnable)
0e320a79 672{
fa50c0e3 673 wxCHECK_MSG( IsValid(nItem), false,
3c299c3a 674 wxT("invalid item in wxRadioBox::Enable()") );
cdf1e714 675
3c299c3a 676 ::WinEnableWindow((HWND) m_ahRadioButtons[nItem], bEnable);
1a87edf2 677 return true;
3c299c3a 678} // end of wxRadioBox::Enable
0e320a79 679
3c299c3a
DW		 680bool wxRadioBox::Enable(
681 bool bEnable
682)
0e320a79 683{
3c299c3a 684 if ( !wxControl::Enable(bEnable) )
1a87edf2 685 return false;
3c299c3a
DW		 686 for (int i = 0; i < m_nNoItems; i++)
687 ::WinEnableWindow((HWND)m_ahRadioButtons[i], bEnable);
1a87edf2 688 return true;
3c299c3a 689} // end of wxRadioBox::Enable
0e320a79 690
3c299c3a
DW		 691int wxRadioBox::FindString(
692 const wxString& rsStr
693) const
0e320a79 694{
3c299c3a 695 for (int i = 0; i < m_nNoItems; i++)
cdf1e714 696 {
3c299c3a 697 if (rsStr == wxGetWindowText(m_ahRadioButtons[i]) )
cdf1e714
DW		 698 return i;
699 }
cdf1e714 700 return wxNOT_FOUND;
3c299c3a 701} // end of wxRadioBox::FindString
cdf1e714 702
3c299c3a 703int wxRadioBox::GetColumnCount() const
0e320a79 704{
3c299c3a
DW		 705 return GetNumHor();
706} // end of wxRadioBox::GetColumnCount
0e320a79 707
3c299c3a 708int wxRadioBox::GetCount() const
0e320a79 709{
3c299c3a
DW		 710 return m_nNoItems;
711} // end of wxRadioBox::GetCount
0e320a79 712
3c299c3a
DW		 713wxString wxRadioBox::GetLabel(
714 int nItem
715) const
0e320a79 716{
fa50c0e3 717 wxCHECK_MSG( IsValid(nItem), wxEmptyString, wxT("invalid radiobox index") );
cdf1e714 718
3c299c3a
DW		 719 return wxGetWindowText(m_ahRadioButtons[nItem]);
720} // end of wxRadioBox::GetLabel
cdf1e714 721
3c299c3a
DW		 722wxSize wxRadioBox::GetMaxButtonSize() const
723{
724 int nWidthMax = 0;
725 int nHeightMax = 0;
cdf1e714 726
3c299c3a 727 for (int i = 0 ; i < m_nNoItems; i++)
cdf1e714 728 {
3c299c3a
DW		 729 int nWidth;
730 int nHeight;
731
732 if (m_pnRadioWidth[i] < 0L)
cdf1e714 733 {
3c299c3a
DW		 734 GetTextExtent( wxGetWindowText(m_ahRadioButtons[i])
735 ,&nWidth
736 ,&nHeight
737 );
738
739 //
740 // Adjust the size to take into account the radio box itself
741 // FIXME this is totally bogus!
742 //
743 nWidth += RADIO_SIZE;
744 nHeight *= 3;
745 nHeight /= 2;
cdf1e714
DW		 746 }
747 else
748 {
3c299c3a
DW		 749 nWidth = m_pnRadioWidth[i];
750 nHeight = m_pnRadioHeight[i];
cdf1e714 751 }
3c299c3a
DW		 752 if (nWidthMax < nWidth )
753 nWidthMax = nWidth;
754 if (nHeightMax < nHeight )
755 nHeightMax = nHeight;
756 }
757 return(wxSize( nWidthMax
758 ,nHeightMax
759 )
760 );
761} // end of wxRadioBox::GetMaxButtonSize
cdf1e714 762
3c299c3a
DW		 763int wxRadioBox::GetNumHor() const
764{
765 if ( m_windowStyle & wxRA_SPECIFY_ROWS )
766 {
767 return (m_nNoItems + m_nMajorDim - 1)/m_nMajorDim;
768 }
769 else
770 {
771 return m_nMajorDim;
772 }
773} // end of wxRadioBox::GetNumHor
774
775int wxRadioBox::GetNumVer() const
776{
777 if ( m_windowStyle & wxRA_SPECIFY_ROWS )
778 {
779 return m_nMajorDim;
cdf1e714 780 }
3c299c3a
DW		 781 else
782 {
783 return (m_nNoItems + m_nMajorDim - 1)/m_nMajorDim;
784 }
785} // end of wxRadioBox::GetNumVer
cdf1e714 786
3c299c3a
DW		 787void wxRadioBox::GetPosition(
788 int* pnX
789, int* pnY
790) const
791{
792 wxWindowOS2* pParent = GetParent();
793 RECT vRect = { -1, -1, -1, -1 };;
794 POINTL vPoint;
795 int i;
796
797 for (i = 0; i < m_nNoItems; i++)
798 wxFindMaxSize( m_ahRadioButtons[i]
799 ,&vRect
800 );
cdf1e714 801 if (m_hWnd)
3c299c3a
DW		 802 wxFindMaxSize( m_hWnd
803 ,&vRect
804 );
805
806 //
807 // Since we now have the absolute screen coords, if there's a parent we
808 // must subtract its top left corner
809 //
810 vPoint.x = vRect.xLeft;
811 vPoint.y = vRect.yTop;
812 if (pParent)
cdf1e714 813 {
3c299c3a 814 SWP vSwp;
cdf1e714 815
3c299c3a
DW		 816 ::WinQueryWindowPos((HWND)pParent->GetHWND(), &vSwp);
817 vPoint.x = vSwp.x;
818 vPoint.y = vSwp.y;
819 }
cdf1e714 820
3c299c3a
DW		 821 //
822 // We may be faking the client origin. So a window that's really at (0, 30)
823 // may appear (to wxWin apps) to be at (0, 0).
824 //
825 if (GetParent())
826 {
827 wxPoint vPt(GetParent()->GetClientAreaOrigin());
cdf1e714 828
3c299c3a
DW		 829 vPoint.x = vPt.x;
830 vPoint.y = vPt.y;
831 }
832 *pnX = vPoint.x;
833 *pnX = vPoint.y;
834} // end of wxRadioBox::GetPosition
cdf1e714 835
3c299c3a
DW		 836int wxRadioBox::GetRowCount() const
837{
838 return GetNumVer();
839} // end of wxRadioBox::GetRowCount
cdf1e714 840
3c299c3a
DW		 841// Get single selection, for single choice list items
842int wxRadioBox::GetSelection() const
843{
844 return m_nSelectedButton;
845} // end of wxRadioBox::GetSelection
cdf1e714 846
3c299c3a
DW		 847void wxRadioBox::GetSize(
848 int* pnWidth
849, int* pnHeight
850) const
851{
852 RECT vRect;
853 int i;
cdf1e714 854
3c299c3a
DW		 855 vRect.xLeft = -1;
856 vRect.xRight = -1;
857 vRect.yTop = -1;
858 vRect.yBottom = -1;
859
860 if (m_hWnd)
861 wxFindMaxSize( m_hWnd
862 ,&vRect
863 );
864
865 for (i = 0; i < m_nNoItems; i++)
866 wxFindMaxSize( m_ahRadioButtons[i]
867 ,&vRect
868 );
869
a00ffdf1
SN		 870 if (pnWidth)
871 *pnWidth = vRect.xRight - vRect.xLeft;
872 if (pnHeight)
873 *pnHeight = vRect.yTop - vRect.yBottom;
3c299c3a 874} // end of wxRadioBox::GetSize
cdf1e714 875
3c299c3a
DW		 876// Find string for position
877wxString wxRadioBox::GetString(
878 int nNum
879) const
880{
881 return wxGetWindowText(m_ahRadioButtons[nNum]);
882} // end of wxRadioBox::GetString
883
884// For single selection items only
885wxString wxRadioBox::GetStringSelection() const
886{
887 wxString sResult;
888 int nSel = GetSelection();
889
890 if (nSel > -1)
891 sResult = GetString(nSel);
892 return sResult;
893} // end of wxRadioBox::GetStringSelection
894
895wxSize wxRadioBox::GetTotalButtonSize(
896 const wxSize& rSizeBtn
897) const
898{
899 int nCx1;
900 int nCy1;
901 int nExtraHeight;
902 int nHeight;
903 int nWidth;
904 int nWidthLabel;
7804d121 905 wxFont vFont = GetFont();
3c299c3a
DW		 906
907 wxGetCharSize( m_hWnd
908 ,&nCx1
909 ,&nCy1
7804d121 910 ,&vFont
3c299c3a
DW		 911 );
912 nExtraHeight = nCy1;
913
914 nHeight = GetNumVer() * rSizeBtn.y + (2 * nCy1);
915 nWidth = GetNumHor() * (rSizeBtn.x + nCx1) + nCx1;
916
917 //
918 // And also wide enough for its label
919 //
920 GetTextExtent( GetTitle()
921 ,&nWidthLabel
922 ,NULL
923 );
924 nWidthLabel += RADIO_SIZE;
925 if (nWidthLabel > nWidth)
926 nWidth = nWidthLabel;
927
928 return(wxSize( nWidth
929 ,nHeight
930 )
931 );
932} // end of wxRadioBox::GetTotalButtonSize
933
934WXHBRUSH wxRadioBox::OnCtlColor(
935 WXHDC hwinDC
936, WXHWND hWnd
937, WXUINT uCtlColor
938, WXUINT uMessage
939, WXWPARAM wParam
940, WXLPARAM lParam
941)
942{
943 HPS hPS = (HPS)hwinDC; // pass in a PS handle in OS/2
944
945 if (GetParent()->GetTransparentBackground())
946 ::GpiSetBackMix(hPS, BM_LEAVEALONE);
947 else
948 ::GpiSetBackMix(hPS, BM_OVERPAINT);
949
950 wxColour vColBack = GetBackgroundColour();
cdf1e714 951
3c299c3a
DW		 952 ::GpiSetBackColor(hPS, vColBack.GetPixel());
953 ::GpiSetColor(hPS, vColBack.GetPixel());
954
955
956 wxBrush* pBrush = wxTheBrushList->FindOrCreateBrush( vColBack
957 ,wxSOLID
958 );
959 return ((WXHBRUSH)pBrush->GetResourceHandle());
960} // end of wxRadioBox::OnCtlColor
961
962bool wxRadioBox::OS2Command(
963 WXUINT uCmd
964, WXWORD wId
965)
966{
967 int nSelectedButton = -1;
968
969 if (uCmd == BN_CLICKED)
cdf1e714 970 {
3c299c3a 971 if (wId == GetId())
1a87edf2 972 return true;
3c299c3a
DW		 973
974
975 for (int i = 0; i < m_nNoItems; i++)
cdf1e714 976 {
3c299c3a 977 if (wId == wxGetWindowId(m_ahRadioButtons[i]))
cdf1e714 978 {
3c299c3a
DW		 979 nSelectedButton = i;
980 break;
cdf1e714
DW		 981 }
982 }
3c299c3a 983 if (nSelectedButton == -1)
cdf1e714 984 {
3c299c3a 985 //
f289196b
DW		 986 // Just ignore it
987 //
1a87edf2 988 return false;
cdf1e714 989 }
3c299c3a 990 if (nSelectedButton != m_nSelectedButton)
cdf1e714 991 {
3c299c3a
DW		 992 m_nSelectedButton = nSelectedButton;
993 SendNotificationEvent();
cdf1e714 994 }
1a87edf2 995 return true;
cdf1e714 996 }
3c299c3a 997 else
1a87edf2 998 return false;
3c299c3a 999} // end of wxRadioBox::OS2Command
0e320a79 1000
3c299c3a 1001void wxRadioBox::SendNotificationEvent()
0e320a79 1002{
3c299c3a
DW		 1003 wxCommandEvent vEvent( wxEVT_COMMAND_RADIOBOX_SELECTED
1004 ,m_windowId
1005 );
cdf1e714 1006
3c299c3a
DW		 1007 vEvent.SetInt( m_nSelectedButton );
1008 vEvent.SetString( GetString(m_nSelectedButton) );
1009 vEvent.SetEventObject(this);
1010 ProcessCommand(vEvent);
1011} // end of wxRadioBox::SendNotificationEvent
0e320a79
DW		 1012
1013void wxRadioBox::SetFocus()
1014{
3c299c3a 1015 if (m_nNoItems > 0)
cdf1e714 1016 {
3c299c3a
DW		 1017 if (m_nSelectedButton == -1)
1018 ::WinSetFocus(HWND_DESKTOP, (HWND)m_ahRadioButtons[0]);
cdf1e714 1019 else
3c299c3a 1020 ::WinSetFocus(HWND_DESKTOP, (HWND)m_ahRadioButtons[m_nSelectedButton]);
cdf1e714 1021 }
3c299c3a 1022} // end of wxRadioBox::SetFocus
0e320a79 1023
3c299c3a
DW		 1024bool wxRadioBox::SetFont(
1025 const wxFont& rFont
1026)
0e320a79 1027{
3c299c3a
DW		 1028 if (!wxControl::SetFont(rFont))
1029 {
1030 //
1031 // Nothing to do
1032 //
1a87edf2 1033 return false;
3c299c3a
DW		 1034 }
1035 //
1036 // Also set the font of our radio buttons
1037 //
3c299c3a 1038 for (int n = 0; n < (int)m_nNoItems; n++)
cdf1e714 1039 {
3c299c3a 1040 HWND hWndBtn = (HWND)m_ahRadioButtons[n];
cdf1e714 1041
3c299c3a
DW		 1042 wxOS2SetFont( hWndBtn
1043 ,rFont
1044 );
1045 ::WinInvalidateRect(hWndBtn, NULL, FALSE);
1046 }
1a87edf2 1047 return true;
3c299c3a 1048} // end of wxRadioBox::SetFont
0e320a79 1049
3c299c3a
DW		 1050void wxRadioBox::SetSelection(
1051 int nNum
1052)
0e320a79 1053{
fa50c0e3 1054 wxCHECK_RET( IsValid(nNum), wxT("invalid radiobox index") );
cdf1e714 1055
fa50c0e3 1056 if ( IsValid(m_nSelectedButton) )
3c299c3a 1057 ::WinSendMsg((HWND)m_ahRadioButtons[m_nSelectedButton], BM_SETCHECK, (MPARAM)0, (MPARAM)0);
0e320a79 1058
3c299c3a
DW		 1059 ::WinSendMsg((HWND)m_ahRadioButtons[nNum], BM_SETCHECK, (MPARAM)1, (MPARAM)0);
1060 ::WinSetFocus(HWND_DESKTOP, (HWND)m_ahRadioButtons[nNum]);
1061 m_nSelectedButton = nNum;
1062} // end of wxRadioBox::SetSelection
0e320a79 1063
3c299c3a
DW		 1064void wxRadioBox::SetString(
1065 int nItem
1066, const wxString& rsLabel
1067)
0e320a79 1068{
fa50c0e3 1069 wxCHECK_RET( IsValid(nItem), wxT("invalid radiobox index") );
cdf1e714 1070
3c299c3a 1071 m_pnRadioWidth[nItem] = m_pnRadioHeight[nItem] = -1;
0fba44b4 1072 ::WinSetWindowText((HWND)m_ahRadioButtons[nItem], (PSZ)rsLabel.c_str());
3c299c3a 1073} // end of wxRadioBox::SetString
cdf1e714 1074
3c299c3a
DW		 1075bool wxRadioBox::SetStringSelection(
1076 const wxString& rsStr
1077)
cdf1e714 1078{
3c299c3a 1079 int nSel = FindString(rsStr);
0e320a79 1080
3c299c3a 1081 if (nSel > -1)
0e320a79 1082 {
3c299c3a 1083 SetSelection(nSel);
1a87edf2 1084 return true;
0e320a79
DW		 1085 }
1086 else
1a87edf2 1087 return false;
3c299c3a 1088} // end of wxRadioBox::SetStringSelection
0e320a79 1089
3c299c3a
DW		 1090bool wxRadioBox::Show(
1091 bool bShow
1092)
cdf1e714 1093{
3c299c3a 1094 if (!wxControl::Show(bShow))
1a87edf2 1095 return false;
3c299c3a
DW		 1096
1097 for (int i = 0; i < m_nNoItems; i++)
cdf1e714 1098 {
3c299c3a 1099 ::WinShowWindow((HWND)m_ahRadioButtons[i], (BOOL)bShow);
cdf1e714 1100 }
1a87edf2 1101 return true;
3c299c3a 1102} // end of wxRadioBox::Show
cdf1e714 1103
3c299c3a 1104// Show a specific button
fa50c0e3 1105bool wxRadioBox::Show(
3c299c3a
DW		 1106 int nItem
1107, bool bShow
1108)
0e320a79 1109{
fa50c0e3 1110 wxCHECK_MSG( IsValid(nItem), false,
3c299c3a 1111 wxT("invalid item in wxRadioBox::Show()") );
0e320a79 1112
3c299c3a 1113 ::WinShowWindow((HWND)m_ahRadioButtons[nItem], bShow);
fa50c0e3
WS		 1114
1115 return true;
3c299c3a 1116} // end of wxRadioBox::Show
cdf1e714 1117
3c299c3a
DW		 1118void wxRadioBox::SubclassRadioButton(
1119 WXHWND hWndBtn
1120)
1121{
3c299c3a
DW		 1122 fnWndProcRadioBtn = (WXFARPROC)::WinSubclassWindow(hWndBtn, (PFNWP)wxRadioBtnWndProc);
1123} // end of wxRadioBox::SubclassRadioButton
cdf1e714 1124
3c299c3a
DW		 1125MRESULT wxRadioBox::WindowProc(
1126 WXUINT uMsg
1127, WXWPARAM wParam
1128, WXLPARAM lParam
1129)
cdf1e714 1130{
3c299c3a
DW		 1131 return (wxControl::OS2WindowProc( uMsg
1132 ,wParam
1133 ,lParam
1134 ));
1135} // end of wxRadioBox::WindowProc
cdf1e714
DW		 1136
1137// ---------------------------------------------------------------------------
1138// window proc for radio buttons
1139// ---------------------------------------------------------------------------
1140
3c299c3a
DW		 1141MRESULT wxRadioBtnWndProc(
1142 HWND hWnd
1143, UINT uMessage
1144, MPARAM wParam
1145, MPARAM lParam
1146)
cdf1e714 1147{
3c299c3a 1148 switch (uMessage)
cdf1e714 1149 {
3c299c3a
DW		 1150 case WM_CHAR:
1151 {
1152 USHORT uKeyFlags = SHORT1FROMMP((MPARAM)wParam);
cdf1e714 1153
3c299c3a 1154 if (!(uKeyFlags & KC_KEYUP)) // Key Down event
cdf1e714 1155 {
3c299c3a
DW		 1156 if (uKeyFlags & KC_VIRTUALKEY)
1157 {
1158 wxRadioBox* pRadiobox = (wxRadioBox *)::WinQueryWindowULong( hWnd
1159 ,QWL_USER
1160 );
1161 USHORT uVk = SHORT2FROMMP((MPARAM)lParam);
1a87edf2 1162 bool bProcessed = true;
3c299c3a
DW		 1163 wxDirection eDir;
1164
1165 switch(uVk)
1166 {
1167 case VK_LEFT:
1168 eDir = wxDOWN;
1169 break;
1170
1171 case VK_RIGHT:
1172 eDir = wxDOWN;
1173 break;
1174
1175 case VK_DOWN:
1176 eDir = wxDOWN;
1177 break;
1178
1179 case VK_UP:
1180 eDir = wxUP;
1181 break;
1182
1183 default:
1a87edf2 1184 bProcessed = false;
3c299c3a
DW		 1185
1186 //
1187 // Just to suppress the compiler warning
1188 //
1189 eDir = wxALL;
1190 }
1191
1192 if (bProcessed)
1193 {
1194 int nSelOld = pRadiobox->GetSelection();
1195 int nSelNew = pRadiobox->GetNextItem( nSelOld
1196 ,eDir
1197 ,pRadiobox->GetWindowStyleFlag()
1198 );
1199
1200 if (nSelNew != nSelOld)
1201 {
1202 pRadiobox->SetSelection(nSelNew);
1203
1204 //
1205 // Emulate the button click
1206 //
1207 pRadiobox->SendNotificationEvent();
1208 return 0;
1209 }
1210 }
1211 }
cdf1e714 1212 }
cdf1e714 1213 }
3c299c3a 1214 break;
cdf1e714
DW		 1215 }
1216
3c299c3a
DW		 1217 return fnWndProcRadioBtn( hWnd
1218 ,(ULONG)uMessage
1219 ,(MPARAM)wParam
1220 ,(MPARAM)lParam
1221 );
1222} // end of wxRadioBtnWndProc
0e320a79 1223
f289196b
DW		 1224MRESULT EXPENTRY wxRadioBoxWndProc(
1225 HWND hWnd
1226, UINT uMessage
1227, MPARAM wParam
1228, MPARAM lParam
1229)
1230{
1231 return (fnWndProcRadioBox( hWnd
1232 ,(ULONG)uMessage
1233 ,(MPARAM)wParam
1234 ,(MPARAM)lParam
1235 )
1236 );
1237} // end of wxRadioBoxWndProc
1238
wxWidgets (Impactor)