///////////////////////////////////////////////////////////////////////////////
// Name: checklst.cpp
// Purpose: implementation of wxCheckListBox class
-// Author: AUTHOR
+// Author: David Webster
// Modified by:
-// Created: ??/??/98
+// Created: 10/13/99
// RCS-ID: $Id$
-// Copyright: (c) AUTHOR
+// Copyright: (c) David Webster
// Licence: wxWindows licence
///////////////////////////////////////////////////////////////////////////////
// headers & declarations
// ============================================================================
-#ifdef __GNUG__
-#pragma implementation "checklst.h"
-#endif
+// For compilers that support precompilation, includes "wx.h".
+#include "wx/wxprec.h"
+
+#if wxUSE_OWNER_DRAWN
+
+#include "wx/object.h"
+#include "wx/colour.h"
+#include "wx/font.h"
+#include "wx/bitmap.h"
+#include "wx/window.h"
+#include "wx/listbox.h"
+#include "wx/ownerdrw.h"
+#include "wx/settings.h"
+#include "wx/dcmemory.h"
+#include "wx/dcscreen.h"
+#include "wx/os2/checklst.h"
+#include "wx/log.h"
-#include "wx/checklst.h"
+#define INCL_PM
+#include <os2.h>
+
+// ----------------------------------------------------------------------------
+// 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
+IMPLEMENT_DYNAMIC_CLASS(wxCheckListBox, wxListBox)
+
+// ----------------------------------------------------------------------------
+// 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()); }
+
+private:
+ bool m_bChecked;
+ wxCheckListBox* m_pParent;
+ size_t m_nIndex;
+}; // end of CLASS wxCheckListBoxItem
+
+wxCheckListBoxItem::wxCheckListBoxItem (
+ wxCheckListBox* pParent
+, size_t nIndex
+)
+: wxOwnerDrawn( ""
+ ,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(GetDefaultMarginWidth());
+} // end of wxCheckListBoxItem::wxCheckListBoxItem
+
+bool wxCheckListBoxItem::OnDrawItem (
+ wxDC& rDc
+, const wxRect& rRect
+, wxODAction eAct
+, wxODStatus eStat
+)
+{
+ wxRect vRect = rRect;
+
+ ::WinQueryWindowRect( m_pParent->GetHWND()
+ ,&rDc.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 wxWindows coords.
+ //
+ vRect.x += 5;
+ vRect.y -= 3;
+ if (wxOwnerDrawn::OnDrawItem( rDc
+ ,vRect
+ ,eAct
+ ,eStat))
+ {
+ size_t nCheckWidth = GetDefaultMarginWidth();
+ 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 vPenGray;
+ wxPen vPenPrev;
+
+ m_pParent->GetSize( NULL
+ ,&nParentHeight
+ );
+
+ nY = nParentHeight - nY - nCheckHeight;
+ vPenBack = wxPen(vColour, 1, wxSOLID);
+ vPenGray = wxPen(wxColour(127, 127, 127), 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(vPenGray);
+ 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};
+
+ ::WinDrawBitmap( rDc.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
// 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()
+: wxListBox()
{
-}
+} // end of wxCheckListBox::wxCheckListBox
-// 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)
+//
+// 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
+)
: wxListBox()
{
- // 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
+)
+ : wxListBox()
+{
+ wxCArrayString chs(asChoices);
+ Create( pParent
+ ,vId
+ ,rPos
+ ,rSize
+ ,chs.GetCount()
+ ,chs.GetStrings()
+ ,lStyle | wxLB_OWNERDRAW
+ ,rVal
+ ,rsName
+ );
+} // end of wxCheckListBox::wxCheckListBox
+
+void wxCheckListBox::Delete(
+ int N
+)
+{
+ wxCHECK_RET( N >= 0 && N < m_nNumItems,
+ wxT("invalid index in wxListBox::Delete") );
+ wxListBox::Delete(N);
+
+ //
+ // Free memory
+ //
+ delete m_aItems[N];
+ m_aItems.RemoveAt(N);
+} // end of wxCheckListBox::Delete
+
+void wxCheckListBox::InsertItems (
+ int nItems
+, const wxString asItems[]
+, int nPos
+)
+{
+ int i;
+
+ wxCHECK_RET( nPos >= 0 && nPos <= m_nNumItems,
+ wxT("invalid index in wxCheckListBox::InsertItems") );
+
+ wxListBox::InsertItems( nItems
+ ,asItems
+ ,nPos
+ );
+ for (i = 0; i < nItems; i++)
+ {
+ wxOwnerDrawn* pNewItem = CreateItem((size_t)(nPos + i));
+
+ pNewItem->SetName(asItems[i]);
+ m_aItems.Insert(pNewItem, (size_t)(nPos + i));
+ ::WinSendMsg( (HWND)GetHWND()
+ ,LM_SETITEMHANDLE
+ ,(MPARAM)(i + nPos)
+ ,MPFROMP(pNewItem)
+ );
+ }
+} // end of wxCheckListBox::InsertItems
+
+bool wxCheckListBox::SetFont (
+ const wxFont& rFont
+)
+{
+ size_t i;
+
+ for (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 += wxOwnerDrawn::GetDefaultMarginWidth();
+ return long(MRFROM2SHORT((USHORT)m_nItemHeight, (USHORT)(pStruct->rclItem.xRight - pStruct->rclItem.xLeft)));
+ }
+ return 0L;
+} // end of wxCheckListBox::CreateItem
+
+//
+// Check items
// -----------
+//
+bool wxCheckListBox::IsChecked (
+ size_t uiIndex
+) const
+{
+ return GetItem(uiIndex)->IsChecked();
+} // end of wxCheckListBox::IsChecked
-bool wxCheckListBox::IsChecked(unsigned int uiIndex) const
+void wxCheckListBox::Check (
+ size_t uiIndex
+, bool bCheck
+)
{
- // TODO
- return FALSE;
-}
+ GetItem(uiIndex)->Check(bCheck);
+} // end of wxCheckListBox::Check
-void wxCheckListBox::Check(unsigned int uiIndex, bool bCheck)
+//
+// Process events
+// --------------
+//
+void wxCheckListBox::OnChar (
+ wxKeyEvent& rEvent
+)
{
- // TODO
-}
+ if (rEvent.GetKeyCode() == WXK_SPACE)
+ GetItem(GetSelection())->Toggle();
+ else
+ rEvent.Skip();
+} // end of wxCheckListBox::OnChar
+void wxCheckListBox::OnLeftClick (
+ wxMouseEvent& rEvent
+)
+{
+ //
+ // Clicking on the item selects it, clicking on the checkmark toggles
+ //
+ if (rEvent.GetX() <= wxOwnerDrawn::GetDefaultMarginWidth())
+ {
+ 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 < (size_t)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
projects / wxWidgets.git / blobdiff