/////////////////////////////////////////////////////////////////////////////
-// Name: src/msw/listctrl.cpp
+// Name: src/mac/listctrl_mac.cpp
// Purpose: wxListCtrl
// Author: Julian Smart
// Modified by: Agron Selimaj
#if wxUSE_LISTCTRL
+#include "wx/listctrl.h"
+
#ifndef WX_PRECOMP
- #include "wx/app.h"
#include "wx/intl.h"
- #include "wx/log.h"
- #include "wx/settings.h"
- #include "wx/dcclient.h"
- #include "wx/textctrl.h"
#endif
#include "wx/mac/uma.h"
#include "wx/imaglist.h"
-#include "wx/listctrl.h"
#include "wx/sysopt.h"
#define wxMAC_ALWAYS_USE_GENERIC_LISTCTRL wxT("mac.listctrl.always_use_generic")
#include "wx/listimpl.cpp"
WX_DEFINE_LIST(wxListItemList)
+// so we can check for column clicks
+static const EventTypeSpec eventList[] =
+{
+ { kEventClassControl, kEventControlHit },
+};
+
+static pascal OSStatus wxMacListCtrlEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
+{
+ OSStatus result = eventNotHandledErr ;
+
+ wxMacCarbonEvent cEvent( event ) ;
+
+ ControlRef controlRef ;
+ cEvent.GetParameter( kEventParamDirectObject , &controlRef ) ;
+
+ wxListCtrl *window = (wxListCtrl*) data ;
+ wxListEvent le( wxEVT_COMMAND_LIST_COL_CLICK, window->GetId() );
+ le.SetEventObject( window );
+
+ switch ( GetEventKind( event ) )
+ {
+ // check if the column was clicked on and fire an event if so
+ case kEventControlHit :
+ {
+ ControlPartCode result = cEvent.GetParameter<ControlPartCode>(kEventParamControlPart, typeControlPartCode) ;
+ if (result == kControlButtonPart){
+ DataBrowserPropertyID col;
+ GetDataBrowserSortProperty(controlRef, &col);
+ int column = col - kMinColumnId;
+ le.m_col = column;
+ window->GetEventHandler()->ProcessEvent( le );
+ }
+ result = CallNextEventHandler(handler, event);
+ break;
+ }
+ default :
+ break ;
+ }
+
+
+ return result ;
+}
+
+DEFINE_ONE_SHOT_HANDLER_GETTER( wxMacListCtrlEventHandler )
+
class wxMacListCtrlItem : public wxMacListBoxItem
{
public:
virtual int GetColumnImageValue( unsigned int column );
virtual void SetColumnImageValue( unsigned int column, int imageIndex );
- virtual OSStatus GetSetData( wxMacDataItemBrowserControl *owner ,
- DataBrowserPropertyID property,
- DataBrowserItemDataRef itemData,
- bool changeValue );
-
-
virtual ~wxMacListCtrlItem();
protected:
wxListItemList m_rowItems;
// create a list item (can be a subclass of wxMacListBoxItem)
- virtual wxMacListCtrlItem* CreateItem();
+ virtual wxMacDataItem* CreateItem();
virtual void MacInsertItem( unsigned int n, wxListItem* item );
virtual void MacSetColumnInfo( unsigned int row, unsigned int column, wxListItem* item );
virtual void UpdateState(wxMacDataItem* dataItem, wxListItem* item);
protected:
+ // we need to override to provide specialized handling for virtual wxListCtrls
+ virtual OSStatus GetSetItemData(DataBrowserItemID itemID,
+ DataBrowserPropertyID property,
+ DataBrowserItemDataRef itemData,
+ Boolean changeValue );
+
+ virtual void ItemNotification(
+ DataBrowserItemID itemID,
+ DataBrowserItemNotification message,
+ DataBrowserItemDataRef itemData);
+
+ virtual Boolean CompareItems(DataBrowserItemID itemOneID,
+ DataBrowserItemID itemTwoID,
+ DataBrowserPropertyID sortProperty);
+
wxClientDataType m_clientDataItemsType;
+ bool m_isVirtual;
};
m_textCtrl = NULL;
m_genericImpl = NULL;
m_dbImpl = NULL;
+ m_compareFunc = NULL;
+ m_compareFuncData = 0;
}
class wxGenericListCtrlHook : public wxGenericListCtrl
{
}
+protected:
virtual wxListItemAttr * OnGetItemAttr(long item) const
{
return m_nativeListCtrl->OnGetItemAttr(item);
return m_nativeListCtrl->OnGetItemText(item, column);
}
-protected:
wxListCtrl* m_nativeListCtrl;
};
// Also, use generic list control in VIRTUAL mode.
if ( (wxSystemOptions::HasOption( wxMAC_ALWAYS_USE_GENERIC_LISTCTRL )
&& (wxSystemOptions::GetOptionInt( wxMAC_ALWAYS_USE_GENERIC_LISTCTRL ) == 1)) ||
- (style & wxLC_ICON) || (style & wxLC_SMALL_ICON) || (style & wxLC_LIST) || (style & wxLC_VIRTUAL))
+ (style & wxLC_ICON) || (style & wxLC_SMALL_ICON) || (style & wxLC_LIST) /* || (style & wxLC_VIRTUAL) */ )
{
m_macIsUserPane = true;
return false;
m_dbImpl = new wxMacDataBrowserListCtrlControl( this, pos, size, style );
m_peer = m_dbImpl;
-
+
MacPostControlCreate( pos, size );
+
+ InstallControlEventHandler( m_peer->GetControlRef() , GetwxMacListCtrlEventHandlerUPP(),
+ GetEventTypeCount(eventList), eventList, this,
+ (EventHandlerRef *)&m_macListCtrlEventHandler);
}
return true;
if (m_genericImpl)
{
m_genericImpl->SetItemTextColour(item, col);
+ return;
}
wxListItem info;
if (m_genericImpl)
return m_genericImpl->GetNextItem(item, geom, state);
+ if (m_dbImpl && geom == wxLIST_NEXT_ALL && state == wxLIST_STATE_SELECTED )
+ {
+ long count = m_dbImpl->MacGetCount() ;
+ for ( long line = item + 1 ; line < count; line++ )
+ {
+ wxMacDataItem* id = m_dbImpl->GetItemFromLine(line);
+ if ( m_dbImpl->IsItemSelected(id ) )
+ return line;
+ }
+ return -1;
+ }
+
return 0;
}
m_dbImpl->GetColumnCount(&cols);
for (UInt32 col = 0; col < cols; col++)
{
- DeleteColumn(col);
+ DeleteColumn(col);
}
}
m_dbImpl->RevealItem(dataItem, kDataBrowserRevealWithoutSelecting);
}
- return false;
+ return true;
}
// Find an item whose label matches this string, starting from the item after 'start'
type = kDataBrowserIconAndTextType;
}
- fprintf(stderr, "Flush is %d\n", item.GetAlign());
SInt16 just = teFlushDefault;
if (item.GetMask() & wxLIST_MASK_FORMAT)
{
}
m_dbImpl->InsertColumn(col, type, item.GetText(), just, item.GetWidth());
+ // set/remove options based on the wxListCtrl type.
+ DataBrowserTableViewColumnID id;
+ m_dbImpl->GetColumnIDFromIndex(col, &id);
+ DataBrowserPropertyFlags flags;
+ verify_noerr(m_dbImpl->GetPropertyFlags(id, &flags));
if (GetWindowStyleFlag() & wxLC_EDIT_LABELS)
- {
- DataBrowserTableViewColumnID id;
- m_dbImpl->GetColumnIDFromIndex(col, &id);
- DataBrowserPropertyFlags flags;
- verify_noerr(m_dbImpl->GetPropertyFlags(id, &flags));
flags |= kDataBrowserPropertyIsEditable;
- verify_noerr(m_dbImpl->SetPropertyFlags(id, flags));
+
+ if (GetWindowStyleFlag() & wxLC_VIRTUAL){
+ flags &= ~kDataBrowserListViewSortableColumn;
}
+ verify_noerr(m_dbImpl->SetPropertyFlags(id, flags));
}
return col;
{
if (m_genericImpl)
return m_genericImpl->SortItems(fn, data);
+
+ if (m_dbImpl)
+ {
+ m_compareFunc = fn;
+ m_compareFuncData = data;
+ }
return true;
}
return;
}
+ if (m_dbImpl)
+ {
+ // we need to temporarily disable the new item creation notification
+ // procedure to speed things up
+ // FIXME: Even this doesn't seem to help much...
+ DataBrowserCallbacks callbacks;
+ DataBrowserItemNotificationUPP itemUPP;
+ GetDataBrowserCallbacks(m_dbImpl->GetControlRef(), &callbacks);
+ itemUPP = callbacks.u.v1.itemNotificationCallback;
+ callbacks.u.v1.itemNotificationCallback = 0;
+ m_dbImpl->SetCallbacks(&callbacks);
+ ::AddDataBrowserItems(m_dbImpl->GetControlRef(), kDataBrowserNoItem,
+ count, NULL, kDataBrowserItemNoProperty);
+ callbacks.u.v1.itemNotificationCallback = itemUPP;
+ m_dbImpl->SetCallbacks(&callbacks);
+ }
m_count = count;
}
bool trigger = false;
wxListEvent event( wxEVT_COMMAND_LIST_ITEM_SELECTED, list->GetId() );
- bool isSingle = list->GetWindowStyle() | wxLC_SINGLE_SEL;
+ bool isSingle = (list->GetWindowStyle() & wxLC_SINGLE_SEL) != 0;
event.SetEventObject( list );
event.m_itemIndex = owner->GetLineFromItem( this ) ;
{
OSStatus err = noErr;
m_clientDataItemsType = wxClientData_None;
+ m_isVirtual = false;
+
+ if ( style & wxLC_VIRTUAL )
+ m_isVirtual = true;
DataBrowserSelectionFlags options = kDataBrowserDragSelect;
if ( style & wxLC_SINGLE_SEL )
if ( style & wxLC_LIST || style & wxLC_NO_HEADER )
verify_noerr( SetHeaderButtonHeight( 0 ) );
- SetDataBrowserSortProperty( m_controlRef , kMinColumnId );
+ if ( m_isVirtual )
+ SetSortProperty( kMinColumnId - 1 );
+ else
+ SetSortProperty( kMinColumnId );
if ( style & wxLC_SORT_ASCENDING )
{
m_sortOrder = SortOrder_Text_Ascending;
- SetDataBrowserSortProperty( m_controlRef , kMinColumnId );
- SetDataBrowserSortOrder( m_controlRef , kDataBrowserOrderIncreasing);
+ SetSortOrder( kDataBrowserOrderIncreasing );
}
else if ( style & wxLC_SORT_DESCENDING )
{
m_sortOrder = SortOrder_Text_Descending;
- SetDataBrowserSortProperty( m_controlRef , kMinColumnId );
- SetDataBrowserSortOrder( m_controlRef , kDataBrowserOrderDecreasing);
+ SetSortOrder( kDataBrowserOrderDecreasing );
}
else
{
m_sortOrder = SortOrder_None;
- SetDataBrowserSortProperty( m_controlRef , kMinColumnId);
- SetDataBrowserSortOrder( m_controlRef , kDataBrowserOrderIncreasing);
}
if ( style & wxLC_VRULES )
#endif
}
- verify_noerr( AutoSizeColumns() );
verify_noerr( SetHiliteStyle(kDataBrowserTableViewFillHilite ) );
err = SetHasScrollBars( (style & wxHSCROLL) != 0 , true );
}
+OSStatus wxMacDataBrowserListCtrlControl::GetSetItemData(DataBrowserItemID itemID,
+ DataBrowserPropertyID property,
+ DataBrowserItemDataRef itemData,
+ Boolean changeValue )
+{
+ wxString text;
+ int imgIndex = -1;
+ short listColumn = property - kMinColumnId;
+
+ OSStatus err = errDataBrowserPropertyNotSupported;
+ wxListCtrl* list = wxDynamicCast( GetPeer() , wxListCtrl );
+ wxMacListCtrlItem* lcItem;
+
+ if (listColumn >= 0)
+ {
+ if (!m_isVirtual)
+ {
+ lcItem = (wxMacListCtrlItem*) itemID;
+ if (lcItem->HasColumnInfo(listColumn)){
+ wxListItem* item = lcItem->GetColumnInfo(listColumn);
+ if (item->GetMask() & wxLIST_MASK_TEXT)
+ text = item->GetText();
+ if (item->GetMask() & wxLIST_MASK_IMAGE)
+ imgIndex = item->GetImage();
+ }
+ }
+ else
+ {
+ text = list->OnGetItemText( (long)itemID-1, listColumn );
+ imgIndex = list->OnGetItemColumnImage( (long)itemID-1, listColumn );
+ }
+ }
+
+ if ( !changeValue )
+ {
+ switch (property)
+ {
+ case kDataBrowserItemIsEditableProperty :
+ if ( list && list->HasFlag( wxLC_EDIT_LABELS ) )
+ {
+ verify_noerr(SetDataBrowserItemDataBooleanValue( itemData, true ));
+ err = noErr ;
+ }
+ break ;
+ default :
+ if ( property >= kMinColumnId )
+ {
+ wxMacCFStringHolder cfStr;
+
+ if (text){
+ cfStr.Assign( text, wxLocale::GetSystemEncoding() );
+ err = ::SetDataBrowserItemDataText( itemData, cfStr );
+ err = noErr;
+ }
+
+
+
+ if ( imgIndex != -1 )
+ {
+ wxImageList* imageList = list->GetImageList(wxIMAGE_LIST_SMALL);
+ if (imageList && imageList->GetImageCount() > 0){
+ wxBitmap bmp = imageList->GetBitmap(imgIndex);
+ IconRef icon = bmp.GetBitmapData()->GetIconRef();
+ ::SetDataBrowserItemDataIcon(itemData, icon);
+ }
+ }
+
+ }
+ break ;
+ }
+
+ }
+ else
+ {
+ switch (property)
+ {
+ default:
+ if ( property >= kMinColumnId )
+ {
+ short listColumn = property - kMinColumnId;
+
+ // TODO probably send the 'end edit' from here, as we
+ // can then deal with the veto
+ CFStringRef sr ;
+ verify_noerr( GetDataBrowserItemDataText( itemData , &sr ) ) ;
+ wxMacCFStringHolder cfStr(sr) ;;
+ if (m_isVirtual)
+ list->SetItem( (long)itemData-1 , listColumn, cfStr.AsString() ) ;
+ else
+ {
+ if (lcItem)
+ lcItem->SetColumnTextValue( listColumn, cfStr.AsString() );
+ }
+ err = noErr ;
+ }
+ break;
+ }
+ }
+ return err;
+}
+
+void wxMacDataBrowserListCtrlControl::ItemNotification(DataBrowserItemID itemID,
+ DataBrowserItemNotification message,
+ DataBrowserItemDataRef itemData )
+{
+ // we want to depend on as little as possible to make sure tear-down of controls is safe
+ if ( message == kDataBrowserItemRemoved)
+ {
+ // make sure MacDelete does the proper teardown.
+ return;
+ }
+ else if ( message == kDataBrowserItemAdded )
+ {
+ // we don't issue events on adding, the item is not really stored in the list yet, so we
+ // avoid asserts by getting out now
+ return ;
+ }
+
+ wxListCtrl *list = wxDynamicCast( GetPeer() , wxListCtrl );
+ if ( list )
+ {
+ bool trigger = false;
+
+ wxListEvent event( wxEVT_COMMAND_LIST_ITEM_SELECTED, list->GetId() );
+ bool isSingle = (list->GetWindowStyle() & wxLC_SINGLE_SEL) != 0;
+
+ event.SetEventObject( list );
+ if ( !list->IsVirtual() )
+ {
+ DataBrowserTableViewRowIndex result = 0;
+ verify_noerr( GetItemRow( itemID, &result ) ) ;
+ event.m_itemIndex = result;
+
+ if (event.m_itemIndex >= 0)
+ MacGetColumnInfo(event.m_itemIndex,0,event.m_item);
+ }
+ else
+ {
+ event.m_itemIndex = (long)itemID;
+ }
+
+ switch (message)
+ {
+ case kDataBrowserItemDeselected:
+ event.SetEventType(wxEVT_COMMAND_LIST_ITEM_DESELECTED);
+ if ( !isSingle )
+ trigger = IsSelectionSuppressed();
+ break;
+
+ case kDataBrowserItemSelected:
+ trigger = IsSelectionSuppressed();
+ break;
+
+ case kDataBrowserItemDoubleClicked:
+ event.SetEventType( wxEVT_LEFT_DCLICK );
+ trigger = true;
+ break;
+
+ case kDataBrowserEditStarted :
+ // TODO : how to veto ?
+ event.SetEventType( wxEVT_COMMAND_LIST_BEGIN_LABEL_EDIT ) ;
+ trigger = true ;
+ break ;
+
+ case kDataBrowserEditStopped :
+ // TODO probably trigger only upon the value store callback, because
+ // here IIRC we cannot veto
+ event.SetEventType( wxEVT_COMMAND_LIST_END_LABEL_EDIT ) ;
+ trigger = true ;
+ break ;
+
+ default:
+ break;
+ }
+
+ if ( trigger )
+ {
+ // direct notification is not always having the listbox GetSelection() having in synch with event
+ wxPostEvent( list->GetEventHandler(), event );
+ }
+ }
+}
+
+Boolean wxMacDataBrowserListCtrlControl::CompareItems(DataBrowserItemID itemOneID,
+ DataBrowserItemID itemTwoID,
+ DataBrowserPropertyID sortProperty)
+{
+
+ bool retval = false;
+ wxString itemText;
+ wxString otherItemText;
+ int colId = sortProperty - kMinColumnId;
+ long itemNum = 0;
+ long otherItemNum = 0;
+
+ wxListCtrl* list = wxDynamicCast( GetPeer() , wxListCtrl );
+
+ // means we need to
+ if (colId >= 0)
+ {
+ if (!m_isVirtual)
+ {
+ wxMacListCtrlItem* item = (wxMacListCtrlItem*)itemOneID;
+ wxMacListCtrlItem* otherItem = (wxMacListCtrlItem*)itemTwoID;
+ wxListCtrlCompare func = list->GetCompareFunc();
+ if (func != NULL && item->HasColumnInfo(colId) && otherItem->HasColumnInfo(colId))
+ return func(item->GetColumnInfo(colId)->GetData(), otherItem->GetColumnInfo(colId)->GetData(), list->GetCompareFuncData()) >= 0;
+
+ itemNum = item->GetOrder();
+ otherItemNum = otherItem->GetOrder();
+ if (item->HasColumnInfo(colId))
+ itemText = item->GetColumnInfo(colId)->GetText();
+ if (otherItem->HasColumnInfo(colId))
+ otherItemText = otherItem->GetColumnInfo(colId)->GetText();
+ }
+ else
+ {
+ itemNum = (long)itemOneID;
+ otherItemNum = (long)itemTwoID;
+ itemText = list->OnGetItemText( itemNum-1, colId );
+ otherItemText = list->OnGetItemText( otherItemNum-1, colId );
+
+ }
+
+ DataBrowserSortOrder sort;
+ verify_noerr(GetSortOrder(&sort));
+
+ if ( sort == kDataBrowserOrderIncreasing )
+ {
+ retval = itemText.CmpNoCase( otherItemText ) > 0;
+ }
+ else if ( sort == kDataBrowserOrderDecreasing )
+ {
+ retval = itemText.CmpNoCase( otherItemText ) < 0;
+ }
+ }
+ else{
+ // fallback for undefined cases
+ retval = itemOneID < itemTwoID;
+ }
+
+ return retval;
+}
+
wxMacDataBrowserListCtrlControl::~wxMacDataBrowserListCtrlControl()
{
}
MacSetColumnInfo(n, 0, item);
}
-wxMacListCtrlItem* wxMacDataBrowserListCtrlControl::CreateItem()
+wxMacDataItem* wxMacDataBrowserListCtrlControl::CreateItem()
{
return new wxMacListCtrlItem();
}
if ( column >= m_rowItems.GetCount() )
{
wxListItem* listItem = new wxListItem(*item);
- //listItem->SetAlign(item->GetAlign());
- //listItem->SetBackgroundColour(item->GetBackgroundColour());
- //listItem->SetColumn(item->GetColumn());
- //listItem->SetData(item->GetData());
- //listItem->SetFont(item->GetFont());
- //listItem->SetId(GetOrder());
- //listItem->SetImage(item->GetImage());
- //listItem->SetMask(item->GetMask());
-
- //listItem->SetText(item->GetText());
m_rowItems.Append( listItem );
}
- else{
+ else
+ {
wxListItem* listItem = GetColumnInfo( column );
long mask = item->GetMask();
if (mask & wxLIST_MASK_TEXT)
}
}
-OSStatus wxMacListCtrlItem::GetSetData( wxMacDataItemBrowserControl *owner ,
- DataBrowserPropertyID property,
- DataBrowserItemDataRef itemData,
- bool changeValue )
-{
-
- OSStatus err = errDataBrowserPropertyNotSupported;
- wxListCtrl* list = wxDynamicCast( owner->GetPeer() , wxListCtrl );
- if ( !changeValue )
- {
- switch (property)
- {
- case kDataBrowserItemIsEditableProperty :
- if ( list && list->HasFlag( wxLC_EDIT_LABELS ) )
- {
- verify_noerr(SetDataBrowserItemDataBooleanValue( itemData, true ));
- err = noErr ;
- }
- break ;
- default :
- if ( property >= kMinColumnId )
- {
- short listColumn = property - kMinColumnId;
-
- if (HasColumnInfo(listColumn))
- {
- wxListItem* item = GetColumnInfo(listColumn);
- wxMacCFStringHolder cfStr;
-
- if (item->GetText())
- {
- cfStr.Assign( item->GetText(), wxLocale::GetSystemEncoding() );
- err = ::SetDataBrowserItemDataText( itemData, cfStr );
- err = noErr;
- }
-
- int imgIndex = item->GetImage();
- if ( (item->GetMask() & wxLIST_MASK_IMAGE) )
- {
- wxImageList* imageList = list->GetImageList(wxIMAGE_LIST_SMALL);
- if (imageList && imageList->GetImageCount() > 0)
- {
- wxBitmap bmp = imageList->GetBitmap(imgIndex);
- IconRef icon = bmp.GetBitmapData()->GetIconRef();
- ::SetDataBrowserItemDataIcon(itemData, icon);
- }
- }
-
- }
- }
- break ;
- }
- }
- else
- {
- switch (property)
- {
- default:
- if ( property >= kMinColumnId )
- {
- short listColumn = property - kMinColumnId;
-
- if (HasColumnInfo(listColumn))
- {
- // TODO probably send the 'end edit' from here, as we
- // can then deal with the veto
- CFStringRef sr ;
- verify_noerr( GetDataBrowserItemDataText( itemData , &sr ) ) ;
- wxMacCFStringHolder cfStr(sr) ;;
- list->SetItem( owner->GetLineFromItem(this) , listColumn, cfStr.AsString() ) ;
- err = noErr ;
- }
- }
- break;
- }
- }
-
- // don't duplicate the numeric order column handling
- if (err == errDataBrowserPropertyNotSupported)
- err = wxMacDataItem::GetSetData(owner, property, itemData, changeValue);
-
- return err;
-}
-
#endif // wxUSE_LISTCTRL