X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/0e320a79f187558effb04d92020b470372bbe456..64ea838d8f4d1853b7d850db93ee565e901d099a:/src/os2/checklst.cpp diff --git a/src/os2/checklst.cpp b/src/os2/checklst.cpp index ecabf5408e..6773983e9f 100644 --- a/src/os2/checklst.cpp +++ b/src/os2/checklst.cpp @@ -1,11 +1,11 @@ /////////////////////////////////////////////////////////////////////////////// -// Name: checklst.cpp +// Name: src/os2/checklst.cpp // Purpose: implementation of wxCheckListBox class -// Author: AUTHOR -// Modified by: -// Created: ??/??/98 +// Author: David Webster +// Modified by: +// Created: 10/13/99 // RCS-ID: $Id$ -// Copyright: (c) AUTHOR +// Copyright: (c) David Webster // Licence: wxWindows licence /////////////////////////////////////////////////////////////////////////////// @@ -13,19 +13,214 @@ // headers & declarations // ============================================================================ -#ifdef __GNUG__ -#pragma implementation "checklst.h" -#endif +// For compilers that support precompilation, includes "wx.h". +#include "wx/wxprec.h" + +#if wxUSE_CHECKLISTBOX && wxUSE_OWNER_DRAWN #include "wx/checklst.h" +#ifndef WX_PRECOMP + #include "wx/object.h" + #include "wx/log.h" + #include "wx/window.h" + #include "wx/dcmemory.h" + #include "wx/dcscreen.h" + #include "wx/settings.h" + #include "wx/listbox.h" + #include "wx/bitmap.h" + #include "wx/colour.h" + #include "wx/font.h" +#endif + +#include "wx/os2/dc.h" +#include "wx/ownerdrw.h" + +#define INCL_PM +#include + +// ---------------------------------------------------------------------------- +// constants for base class +// ---------------------------------------------------------------------------- + +static const int CHECK_MARK_WIDTH = 15; + +// ---------------------------------------------------------------------------- +// private functions +// ---------------------------------------------------------------------------- + +// get item (converted to right type) +#define GetItem(n) ((wxCheckListBoxItem *)(GetItem(n))) + // ============================================================================ // implementation // ============================================================================ -#if !USE_SHARED_LIBRARY - IMPLEMENT_DYNAMIC_CLASS(wxCheckListBox, wxListBox) -#endif +// ---------------------------------------------------------------------------- +// declaration and implementation of wxCheckListBoxItem class +// ---------------------------------------------------------------------------- + +class wxCheckListBoxItem : public wxOwnerDrawn +{ + friend class wxCheckListBox; +public: + // + // ctor + // + wxCheckListBoxItem(wxCheckListBox* pParent, size_t nIndex); + + // + // Drawing functions + // + virtual bool OnDrawItem( wxDC& rDc, + const wxRect& rRect, + wxODAction eAct, + wxODStatus eStat + ); + + // + // Simple accessors + // + bool IsChecked(void) const { return m_bChecked; } + void Check(bool bCheck); + void Toggle(void) { Check(!IsChecked()); } + + virtual wxString GetName() const { return m_pParent->GetString(m_nIndex); } + +private: + bool m_bChecked; + wxCheckListBox* m_pParent; + size_t m_nIndex; +}; // end of CLASS wxCheckListBoxItem + + + +wxCheckListBoxItem::wxCheckListBoxItem(wxCheckListBox* pParent, size_t nIndex) + :wxOwnerDrawn( wxEmptyString, true /* checkable */ ) +{ + m_bChecked = false; + m_pParent = pParent; + m_nIndex = nIndex; + + // + // We don't initialize m_nCheckHeight/Width vars because it's + // done in OnMeasure while they are used only in OnDraw and we + // know that there will always be OnMeasure before OnDraw + // + SetMarginWidth(CHECK_MARK_WIDTH); +} // end of wxCheckListBoxItem::wxCheckListBoxItem + + + +bool wxCheckListBoxItem::OnDrawItem ( wxDC& rDc, + const wxRect& rRect, + wxODAction eAct, + wxODStatus eStat ) +{ + wxRect vRect = rRect; + + + wxPMDCImpl *impl = (wxPMDCImpl*) rDc.GetImpl(); + ::WinQueryWindowRect( m_pParent->GetHWND(), &impl->m_vRclPaint ); + if (IsChecked()) + eStat = (wxOwnerDrawn::wxODStatus)(eStat | wxOwnerDrawn::wxODChecked); + + // + // Unfortunately PM doesn't quite get the text position exact. We need to alter + // it down and to the right, just a little bit. The coords in rRect are OS/2 + // coords not wxWidgets coords. + // + vRect.x += 5; + vRect.y -= 3; + if (wxOwnerDrawn::OnDrawItem( rDc, vRect, eAct, eStat)) + { + size_t nCheckWidth = CHECK_MARK_WIDTH; + size_t nCheckHeight = m_pParent->GetItemHeight(); + int nParentHeight; + int nX = rRect.GetX(); + int nY = rRect.GetY(); + int nOldY = nY; + wxColour vColour(wxSystemSettings::GetColour(wxSYS_COLOUR_WINDOW)); + wxPen vPenBack; + wxPen vPenPrev; + + m_pParent->GetSize( NULL, &nParentHeight); + + nY = nParentHeight - nY - nCheckHeight; + vPenBack = wxPen(vColour, 1, wxSOLID); + + // + // Erase the 1-pixel border + // + rDc.SetPen(vPenBack); + rDc.DrawRectangle( nX, nY, nCheckWidth, nCheckHeight ); + + // + // Now we draw the smaller rectangle + // + nY++; + nCheckWidth -= 2; + nCheckHeight -= 2; + + // + // Draw hollow gray rectangle + // + rDc.SetPen(*wxGREY_PEN); + rDc.DrawRectangle( nX, nY, nCheckWidth, nCheckHeight ); + + nX++; + if (IsChecked()) + { + // + // Draw the check by loading the sys standard bitmap and drawing it + // + HBITMAP hChkBmp = ::WinGetSysBitmap( HWND_DESKTOP, SBMP_MENUCHECK ); + POINTL vPoint = {nX, nOldY + 3}; + wxPMDCImpl *impl = (wxPMDCImpl*) rDc.GetImpl(); + ::WinDrawBitmap( impl->GetHPS(), + hChkBmp, + NULL, + &vPoint, + NULL, + NULL, + DBM_NORMAL + ); + } + return true; + } + return false; +} // end of wxCheckListBoxItem::OnDrawItem + +// +// Change the state of the item and redraw it +// +void wxCheckListBoxItem::Check( bool bCheck ) +{ + m_bChecked = bCheck; + + // + // Index may be chanegd because new items were added/deleted + // + if (m_pParent->GetItemIndex(this) != (int)m_nIndex) + { + // + // Update it + // + int nIndex = m_pParent->GetItemIndex(this); + + wxASSERT_MSG(nIndex != wxNOT_FOUND, wxT("what does this item do here?")); + + m_nIndex = (size_t)nIndex; + } + + + wxCommandEvent vEvent( wxEVT_COMMAND_CHECKLISTBOX_TOGGLED,m_pParent->GetId()); + + vEvent.SetInt(m_nIndex); + vEvent.SetEventObject(m_pParent); + m_pParent->ProcessCommand(vEvent); +} // end of wxCheckListBoxItem::Check + // ---------------------------------------------------------------------------- // implementation of wxCheckListBox class @@ -34,41 +229,189 @@ // define event table // ------------------ BEGIN_EVENT_TABLE(wxCheckListBox, wxListBox) + EVT_CHAR(wxCheckListBox::OnChar) + EVT_LEFT_DOWN(wxCheckListBox::OnLeftClick) END_EVENT_TABLE() -// control creation + + +// +// Control creation // ---------------- +// -// def ctor: use Create() to really create the control -wxCheckListBox::wxCheckListBox() : wxListBox() +// +// Default ctor: use Create() to really create the control +// +wxCheckListBox::wxCheckListBox() + :wxCheckListBoxBase() { -} - -// ctor which creates the associated control -wxCheckListBox::wxCheckListBox(wxWindow *parent, wxWindowID id, - const wxPoint& pos, const wxSize& size, - int nStrings, const wxString choices[], - long style, const wxValidator& val, - const wxString& name) - : wxListBox() +} // end of wxCheckListBox::wxCheckListBox + +// +// Ctor which creates the associated control +// +wxCheckListBox::wxCheckListBox ( wxWindow* pParent, + wxWindowID vId, + const wxPoint& rPos, + const wxSize& rSize, + int nStrings, + const wxString asChoices[], + long lStyle, + const wxValidator& rVal, + const wxString& rsName) + :wxCheckListBoxBase() { - // TODO: you'll probably need a separate Create instead of using - // the wxListBox one as here. - Create(parent, id, pos, size, nStrings, choices, style|wxLB_OWNERDRAW, val, name); -} + Create( pParent, vId, rPos, rSize, nStrings, asChoices, lStyle | wxLB_OWNERDRAW, rVal, rsName ); +} // end of wxCheckListBox::wxCheckListBox + +wxCheckListBox::wxCheckListBox ( wxWindow* pParent, + wxWindowID vId, + const wxPoint& rPos, + const wxSize& rSize, + const wxArrayString& asChoices, + long lStyle, + const wxValidator& rVal, + const wxString& rsName ) + :wxCheckListBoxBase() +{ + wxCArrayString chs(asChoices); + Create( pParent, vId, rPos, rSize, chs.GetCount(), chs.GetStrings(), + lStyle | wxLB_OWNERDRAW, rVal, rsName ); +} // end of wxCheckListBox::wxCheckListBox + +void wxCheckListBox::Delete(unsigned int n) +{ + wxCHECK_RET( IsValid(n), + wxT("invalid index in wxCheckListBox::Delete") ); + wxListBox::Delete(n); + + // + // Free memory + // + delete m_aItems[n]; + m_aItems.RemoveAt(n); +} // end of wxCheckListBox::Delete + +bool wxCheckListBox::SetFont ( const wxFont& rFont ) +{ + for (unsigned int i = 0; i < m_aItems.GetCount(); i++) + m_aItems[i]->SetFont(rFont); + wxListBox::SetFont(rFont); + return true; +} // end of wxCheckListBox::SetFont + + + +// +// Create/retrieve item +// -------------------- +// -// check items +// +// Create a check list box item +// +wxOwnerDrawn* wxCheckListBox::CreateItem(size_t nIndex) +{ + wxCheckListBoxItem* pItem = new wxCheckListBoxItem( this, nIndex ); + return pItem; +} // end of wxCheckListBox::CreateItem + + + +// +// Return item size +// ---------------- +// +long wxCheckListBox::OS2OnMeasure ( WXMEASUREITEMSTRUCT* pItem ) +{ + if (!pItem) + pItem = (WXMEASUREITEMSTRUCT*)new OWNERITEM; + if (wxListBox::OS2OnMeasure(pItem)) + { + POWNERITEM pStruct = (POWNERITEM)pItem; + + // + // Save item height + // + m_nItemHeight = pStruct->rclItem.yTop - pStruct->rclItem.yBottom; + + // + // Add place for the check mark + // + pStruct->rclItem.xRight += CHECK_MARK_WIDTH; + return long(MRFROM2SHORT((USHORT)m_nItemHeight, (USHORT)(pStruct->rclItem.xRight - pStruct->rclItem.xLeft))); + } + return 0L; +} // end of wxCheckListBox::CreateItem + + + +// +// Check items // ----------- +// +bool wxCheckListBox::IsChecked(unsigned int uiIndex) const +{ + return GetItem(uiIndex)->IsChecked(); +} // end of wxCheckListBox::IsChecked + +void wxCheckListBox::Check(unsigned int uiIndex, bool bCheck) +{ + GetItem(uiIndex)->Check(bCheck); +} // end of wxCheckListBox::Check + -bool wxCheckListBox::IsChecked(uint uiIndex) const + +// +// Process events +// -------------- +// +void wxCheckListBox::OnChar ( wxKeyEvent& rEvent ) { - // TODO - return FALSE; -} + if (rEvent.GetKeyCode() == WXK_SPACE) + GetItem(GetSelection())->Toggle(); + else + rEvent.Skip(); +} // end of wxCheckListBox::OnChar -void wxCheckListBox::Check(uint uiIndex, bool bCheck) +void wxCheckListBox::OnLeftClick ( wxMouseEvent& rEvent ) { - // TODO -} + // + // Clicking on the item selects it, clicking on the checkmark toggles + // + if (rEvent.GetX() <= CHECK_MARK_WIDTH) + { + int nParentHeight; + wxScreenDC vDc; + wxCoord vHeight; + + GetSize( NULL, &nParentHeight ); + vDc.SetFont(GetFont()); + vHeight = (wxCoord)(vDc.GetCharHeight() * 2.5); + + // + // This, of course, will not work if the LB is scrolled + // + int nY = rEvent.GetY(); + + nY = nParentHeight - (nY + vHeight); + + size_t nItem = (size_t)(nY / vHeight); + if (nItem < m_nNumItems) + GetItem(nItem)->Toggle(); + // + // else: it's not an error, just click outside of client zone + // + } + else + { + // + // Implement default behaviour: clicking on the item selects it + // + rEvent.Skip(); + } +} // end of wxCheckListBox::OnLeftClick +#endif // wxUSE_CHECKLISTBOX && wxUSE_OWNER_DRAWN