+ if (bValue)
+ {
+ const wxWindowList& rSiblings = GetParent()->GetChildren();
+ wxWindowList::Node* pNodeThis = rSiblings.Find(this);
+
+ wxCHECK_RET(pNodeThis, _T("radio button not a child of its parent?"));
+
+ //
+ // If it's not the first item of the group ...
+ //
+ if ( !HasFlag(wxRB_GROUP) )
+ {
+ //
+ // ...turn off all radio buttons before this one
+ //
+ for ( wxWindowList::Node* pNodeBefore = pNodeThis->GetPrevious();
+ pNodeBefore;
+ pNodeBefore = pNodeBefore->GetPrevious() )
+ {
+ wxRadioButton* pBtn = wxDynamicCast( pNodeBefore->GetData()
+ ,wxRadioButton
+ );
+ if (!pBtn)
+ {
+ //
+ // The radio buttons in a group must be consecutive, so there
+ // are no more of them
+ //
+ break;
+ }
+ pBtn->SetValue(FALSE);
+ if (pBtn->HasFlag(wxRB_GROUP))
+ {
+ //
+ // Even if there are other radio buttons before this one,
+ // they're not in the same group with us
+ //
+ break;
+ }
+ }
+ }
+
+ //
+ // ... and all after this one
+ //
+ for (wxWindowList::Node* pNodeAfter = pNodeThis->GetNext();
+ pNodeAfter;
+ pNodeAfter = pNodeAfter->GetNext())
+ {
+ wxRadioButton* pBtn = wxDynamicCast( pNodeAfter->GetData()
+ ,wxRadioButton
+ );
+
+ if (!pBtn || pBtn->HasFlag(wxRB_GROUP) )
+ {
+ //
+ // No more buttons or the first button of the next group
+ //
+ break;
+ }
+ pBtn->SetValue(FALSE);
+ }
+ }