/* Treeview control * * Copyright 1998 Eric Kohl * Copyright 1998,1999 Alex Priem * Copyright 1999 Sylvain St-Germain * * Note that TREEVIEW_INFO * and HTREEITEM are the same thing. * * Note2: All items always! have valid (allocated) pszText field. * If item's text == LPSTR_TEXTCALLBACKA we allocate buffer * of size TEXT_CALLBACK_SIZE in DoSetItem. * We use callbackMask to keep track of fields to be updated. * * TODO: * missing notifications: NM_SETCURSOR, TVN_GETINFOTIP, TVN_KEYDOWN, * TVN_SETDISPINFO, TVN_SINGLEEXPAND * * missing styles: TVS_FULLROWSELECT, TVS_INFOTIP, TVS_NOSCROLL, * TVS_RTLREADING, TVS_TRACKSELECT * * missing item styles: TVIS_CUT, TVIS_EXPANDPARTIAL * * Make the insertion mark look right. * Scroll (instead of repaint) as much as possible. */ #include #include #include #include "winbase.h" #include "wingdi.h" #include "wine/winestring.h" #include "commctrl.h" #include "comctl32.h" #include "debugtools.h" /* internal structures */ typedef struct _TREEITEM /* HTREEITEM is a _TREEINFO *. */ { UINT callbackMask; UINT state; UINT stateMask; LPSTR pszText; int cchTextMax; int iImage; int iSelectedImage; int cChildren; LPARAM lParam; int iIntegral; /* item height multiplier (1 is normal) */ int iLevel; /* indentation level:0=root level */ HTREEITEM parent; /* handle to parent or 0 if at root*/ HTREEITEM firstChild; /* handle to first child or 0 if no child*/ HTREEITEM lastChild; HTREEITEM prevSibling; /* handle to prev item in list, 0 if first */ HTREEITEM nextSibling; /* handle to next item in list, 0 if last */ RECT rect; LONG linesOffset; LONG stateOffset; LONG imageOffset; LONG textOffset; LONG textWidth; /* horizontal text extent for pszText */ LONG visibleOrder; /* visible ordering, 0 is first visible item */ } TREEVIEW_ITEM; typedef struct tagTREEVIEW_INFO { HWND hwnd; DWORD dwStyle; HTREEITEM root; UINT uInternalStatus; INT Timer; UINT uNumItems; /* number of valid TREEVIEW_ITEMs */ INT cdmode; /* last custom draw setting */ UINT uScrollTime; /* max. time for scrolling in milliseconds*/ BOOL bRedraw; /* if FALSE we validate but don't redraw in TREEVIEW_Paint() */ UINT uItemHeight; /* item height */ BOOL bHeightSet; LONG clientWidth; /* width of control window */ LONG clientHeight; /* height of control window */ LONG treeWidth; /* width of visible tree items */ LONG treeHeight; /* height of visible tree items */ UINT uIndent; /* indentation in pixels */ HTREEITEM selectedItem; /* handle to selected item or 0 if none */ HTREEITEM hotItem; /* handle currently under cursor, 0 if none */ HTREEITEM focusedItem; /* item that was under the cursor when WM_LBUTTONDOWN was received */ HTREEITEM firstVisible; /* handle to first visible item */ LONG maxVisibleOrder; HTREEITEM dropItem; /* handle to item selected by drag cursor */ HTREEITEM insertMarkItem; /* item after which insertion mark is placed */ BOOL insertBeforeorAfter; /* flag used by TVM_SETINSERTMARK */ HIMAGELIST dragList; /* Bitmap of dragged item */ LONG scrollX; COLORREF clrBk; COLORREF clrText; COLORREF clrLine; COLORREF clrInsertMark; HFONT hFont; HFONT hBoldFont; HWND hwndToolTip; HWND hwndEdit; WNDPROC wpEditOrig; /* orig window proc for subclassing edit */ BOOL bIgnoreEditKillFocus; BOOL bLabelChanged; HIMAGELIST himlNormal; int normalImageHeight; int normalImageWidth; HIMAGELIST himlState; int stateImageHeight; int stateImageWidth; HDPA items; } TREEVIEW_INFO; /* bitflags for infoPtr->uInternalStatus */ #define TV_HSCROLL 0x01 /* treeview too large to fit in window */ #define TV_VSCROLL 0x02 /* (horizontal/vertical) */ #define TV_LDRAG 0x04 /* Lbutton pushed to start drag */ #define TV_LDRAGGING 0x08 /* Lbutton pushed, mouse moved. */ #define TV_RDRAG 0x10 /* dito Rbutton */ #define TV_RDRAGGING 0x20 /* bitflags for infoPtr->timer */ #define TV_EDIT_TIMER 2 #define TV_EDIT_TIMER_SET 2 VOID TREEVIEW_Register (VOID); VOID TREEVIEW_Unregister (VOID); DEFAULT_DEBUG_CHANNEL(treeview); #define TEXT_CALLBACK_SIZE 260 #define TREEVIEW_LEFT_MARGIN 8 #define MINIMUM_INDENT 19 #define CALLBACK_MASK_ALL (TVIF_TEXT|TVIF_CHILDREN|TVIF_IMAGE|TVIF_SELECTEDIMAGE) #define STATEIMAGEINDEX(x) (((x) >> 12) & 0x0f) #define OVERLAYIMAGEINDEX(x) (((x) >> 8) & 0x0f) #define ISVISIBLE(x) ((x)->visibleOrder >= 0) typedef VOID (*TREEVIEW_ItemEnumFunc)(TREEVIEW_INFO *, TREEVIEW_ITEM *,LPVOID); static VOID TREEVIEW_QueueRefresh(TREEVIEW_INFO *); static VOID TREEVIEW_QueueItemRefresh(TREEVIEW_INFO *, TREEVIEW_ITEM *); static LRESULT TREEVIEW_DoSelectItem(TREEVIEW_INFO *, INT, HTREEITEM, INT); static VOID TREEVIEW_SetFirstVisible(TREEVIEW_INFO *, TREEVIEW_ITEM *, BOOL); static LRESULT TREEVIEW_EnsureVisible(TREEVIEW_INFO *, HTREEITEM, BOOL); static LRESULT TREEVIEW_RButtonUp(TREEVIEW_INFO *, LPPOINT); static LRESULT TREEVIEW_EndEditLabelNow(TREEVIEW_INFO *infoPtr, BOOL bCancel); static VOID TREEVIEW_UpdateScrollBars(TREEVIEW_INFO *infoPtr); static LRESULT TREEVIEW_HScroll(TREEVIEW_INFO *, WPARAM); /* Random Utilities *****************************************************/ #ifdef NDEBUG static inline void TREEVIEW_VerifyTree(TREEVIEW_INFO *infoPtr) { (void)infoPtr; } #else /* The definition is at the end of the file. */ static void TREEVIEW_VerifyTree(TREEVIEW_INFO *infoPtr); #endif /* Returns the treeview private data if hwnd is a treeview. * Otherwise returns an undefined value. */ static TREEVIEW_INFO * TREEVIEW_GetInfoPtr(HWND hwnd) { return (TREEVIEW_INFO *)GetWindowLongA(hwnd, 0); } /* Don't call this. Nothing wants an item index. */ static inline int TREEVIEW_GetItemIndex(TREEVIEW_INFO *infoPtr, HTREEITEM handle) { assert(infoPtr != NULL); return DPA_GetPtrIndex(infoPtr->items, handle); } /*************************************************************************** * This method checks that handle is an item for this tree. */ static BOOL TREEVIEW_ValidItem(TREEVIEW_INFO *infoPtr, HTREEITEM handle) { if (TREEVIEW_GetItemIndex(infoPtr, handle) == -1) { TRACE("invalid item %p\n", handle); return FALSE; } else return TRUE; } static HFONT TREEVIEW_CreateBoldFont(HFONT hOrigFont) { LOGFONTA font; GetObjectA(hOrigFont, sizeof(font), &font); font.lfWeight = FW_BOLD; return CreateFontIndirectA(&font); } static inline HFONT TREEVIEW_FontForItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item) { return (item->state & TVIS_BOLD) ? infoPtr->hBoldFont : infoPtr->hFont; } /* for trace/debugging purposes only */ static const char * TREEVIEW_ItemName(TREEVIEW_ITEM *item) { if (item == NULL) return ""; if (item->pszText == LPSTR_TEXTCALLBACKA) return ""; if (item->pszText == NULL) return ""; return item->pszText; } /* An item is not a child of itself. */ static BOOL TREEVIEW_IsChildOf(TREEVIEW_ITEM *parent, TREEVIEW_ITEM *child) { do { child = child->parent; if (child == parent) return TRUE; } while (child != NULL); return FALSE; } /* Tree Traversal *******************************************************/ /*************************************************************************** * This method returns the last expanded sibling or child child item * of a tree node */ static TREEVIEW_ITEM * TREEVIEW_GetLastListItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem) { if (!wineItem) return NULL; while (wineItem->lastChild) { if (wineItem->state & TVIS_EXPANDED) wineItem = wineItem->lastChild; else break; } if (wineItem == infoPtr->root) return NULL; return wineItem; } /*************************************************************************** * This method returns the previous non-hidden item in the list not * considering the tree hierarchy. */ static TREEVIEW_ITEM * TREEVIEW_GetPrevListItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *tvItem) { if (tvItem->prevSibling) { /* This item has a prevSibling, get the last item in the sibling's tree. */ TREEVIEW_ITEM *upItem = tvItem->prevSibling; if ((upItem->state & TVIS_EXPANDED) && upItem->lastChild != NULL) return TREEVIEW_GetLastListItem(infoPtr, upItem->lastChild); else return upItem; } else { /* this item does not have a prevSibling, get the parent */ return (tvItem->parent != infoPtr->root) ? tvItem->parent : NULL; } } /*************************************************************************** * This method returns the next physical item in the treeview not * considering the tree hierarchy. */ static TREEVIEW_ITEM * TREEVIEW_GetNextListItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *tvItem) { assert(tvItem != NULL); /* * If this item has children and is expanded, return the first child */ if ((tvItem->state & TVIS_EXPANDED) && tvItem->firstChild != NULL) { return tvItem->firstChild; } /* * try to get the sibling */ if (tvItem->nextSibling) return tvItem->nextSibling; /* * Otherwise, get the parent's sibling. */ while (tvItem->parent) { tvItem = tvItem->parent; if (tvItem->nextSibling) return tvItem->nextSibling; } return NULL; } /*************************************************************************** * This method returns the nth item starting at the given item. It returns * the last item (or first) we we run out of items. * * Will scroll backward if count is <0. * forward if count is >0. */ static TREEVIEW_ITEM * TREEVIEW_GetListItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem, LONG count) { TREEVIEW_ITEM *(*next_item)(TREEVIEW_INFO *, TREEVIEW_ITEM *); TREEVIEW_ITEM *previousItem; assert(wineItem != NULL); if (count > 0) { next_item = TREEVIEW_GetNextListItem; } else if (count < 0) { count = -count; next_item = TREEVIEW_GetPrevListItem; } else return wineItem; do { previousItem = wineItem; wineItem = next_item(infoPtr, wineItem); } while (--count && wineItem != NULL); return wineItem ? wineItem : previousItem; } /* Notifications ************************************************************/ static BOOL TREEVIEW_SendSimpleNotify(TREEVIEW_INFO *infoPtr, UINT code) { NMHDR nmhdr; HWND hwnd = infoPtr->hwnd; TRACE("%x\n", code); nmhdr.hwndFrom = hwnd; nmhdr.idFrom = GetWindowLongA(hwnd, GWL_ID); nmhdr.code = code; return (BOOL)SendMessageA(GetParent(hwnd), WM_NOTIFY, (WPARAM)nmhdr.idFrom, (LPARAM)&nmhdr); } static VOID TREEVIEW_TVItemFromItem(UINT mask, TVITEMA *tvItem, TREEVIEW_ITEM *item) { tvItem->mask = mask; tvItem->hItem = item; tvItem->state = item->state; tvItem->stateMask = 0; tvItem->iImage = item->iImage; tvItem->pszText = item->pszText; tvItem->cchTextMax = item->cchTextMax; tvItem->iImage = item->iImage; tvItem->iSelectedImage = item->iSelectedImage; tvItem->cChildren = item->cChildren; tvItem->lParam = item->lParam; } static BOOL TREEVIEW_SendTreeviewNotify(TREEVIEW_INFO *infoPtr, UINT code, UINT action, UINT mask, HTREEITEM oldItem, HTREEITEM newItem) { HWND hwnd = infoPtr->hwnd; NMTREEVIEWA nmhdr; TRACE("code:%x action:%x olditem:%p newitem:%p\n", code, action, oldItem, newItem); ZeroMemory(&nmhdr, sizeof(NMTREEVIEWA)); nmhdr.hdr.hwndFrom = hwnd; nmhdr.hdr.idFrom = GetWindowLongA(hwnd, GWL_ID); nmhdr.hdr.code = code; nmhdr.action = action; if (oldItem) TREEVIEW_TVItemFromItem(mask, &nmhdr.itemOld, oldItem); if (newItem) TREEVIEW_TVItemFromItem(mask, &nmhdr.itemNew, newItem); nmhdr.ptDrag.x = 0; nmhdr.ptDrag.y = 0; return (BOOL)SendMessageA(GetParent(hwnd), WM_NOTIFY, (WPARAM)GetWindowLongA(hwnd, GWL_ID), (LPARAM)&nmhdr); } static BOOL TREEVIEW_SendTreeviewDnDNotify(TREEVIEW_INFO *infoPtr, UINT code, HTREEITEM dragItem, POINT pt) { HWND hwnd = infoPtr->hwnd; NMTREEVIEWA nmhdr; TRACE("code:%x dragitem:%p\n", code, dragItem); nmhdr.hdr.hwndFrom = hwnd; nmhdr.hdr.idFrom = GetWindowLongA(hwnd, GWL_ID); nmhdr.hdr.code = code; nmhdr.action = 0; nmhdr.itemNew.mask = TVIF_STATE | TVIF_PARAM | TVIF_HANDLE; nmhdr.itemNew.hItem = dragItem; nmhdr.itemNew.state = dragItem->state; nmhdr.itemNew.lParam = dragItem->lParam; nmhdr.ptDrag.x = pt.x; nmhdr.ptDrag.y = pt.y; return (BOOL)SendMessageA(GetParent(hwnd), WM_NOTIFY, (WPARAM)GetWindowLongA(hwnd, GWL_ID), (LPARAM)&nmhdr); } static BOOL TREEVIEW_SendCustomDrawNotify(TREEVIEW_INFO *infoPtr, DWORD dwDrawStage, HDC hdc, RECT rc) { HWND hwnd = infoPtr->hwnd; NMTVCUSTOMDRAW nmcdhdr; LPNMCUSTOMDRAW nmcd; TRACE("drawstage:%lx hdc:%x\n", dwDrawStage, hdc); nmcd = &nmcdhdr.nmcd; nmcd->hdr.hwndFrom = hwnd; nmcd->hdr.idFrom = GetWindowLongA(hwnd, GWL_ID); nmcd->hdr.code = NM_CUSTOMDRAW; nmcd->dwDrawStage = dwDrawStage; nmcd->hdc = hdc; nmcd->rc = rc; nmcd->dwItemSpec = 0; nmcd->uItemState = 0; nmcd->lItemlParam = 0; nmcdhdr.clrText = infoPtr->clrText; nmcdhdr.clrTextBk = infoPtr->clrBk; nmcdhdr.iLevel = 0; return (BOOL)SendMessageA(GetParent(hwnd), WM_NOTIFY, (WPARAM)GetWindowLongA(hwnd, GWL_ID), (LPARAM)&nmcdhdr); } /* FIXME: need to find out when the flags in uItemState need to be set */ static BOOL TREEVIEW_SendCustomDrawItemNotify(TREEVIEW_INFO *infoPtr, HDC hdc, TREEVIEW_ITEM *wineItem, UINT uItemDrawState) { HWND hwnd = infoPtr->hwnd; NMTVCUSTOMDRAW nmcdhdr; LPNMCUSTOMDRAW nmcd; DWORD dwDrawStage, dwItemSpec; UINT uItemState; INT retval; dwDrawStage = CDDS_ITEM | uItemDrawState; dwItemSpec = (DWORD)wineItem; uItemState = 0; if (wineItem->state & TVIS_SELECTED) uItemState |= CDIS_SELECTED; if (wineItem == infoPtr->selectedItem) uItemState |= CDIS_FOCUS; if (wineItem == infoPtr->hotItem) uItemState |= CDIS_HOT; nmcd = &nmcdhdr.nmcd; nmcd->hdr.hwndFrom = hwnd; nmcd->hdr.idFrom = GetWindowLongA(hwnd, GWL_ID); nmcd->hdr.code = NM_CUSTOMDRAW; nmcd->dwDrawStage = dwDrawStage; nmcd->hdc = hdc; nmcd->rc = wineItem->rect; nmcd->dwItemSpec = dwItemSpec; nmcd->uItemState = uItemState; nmcd->lItemlParam = wineItem->lParam; nmcdhdr.clrText = infoPtr->clrText; nmcdhdr.clrTextBk = infoPtr->clrBk; nmcdhdr.iLevel = wineItem->iLevel; TRACE("drawstage:%lx hdc:%x item:%lx, itemstate:%x, lItemlParam:%lx\n", nmcd->dwDrawStage, nmcd->hdc, nmcd->dwItemSpec, nmcd->uItemState, nmcd->lItemlParam); retval = SendMessageA(GetParent(hwnd), WM_NOTIFY, (WPARAM)GetWindowLongA(hwnd, GWL_ID), (LPARAM)&nmcdhdr); infoPtr->clrText = nmcdhdr.clrText; infoPtr->clrBk = nmcdhdr.clrTextBk; return (BOOL)retval; } static BOOL TREEVIEW_BeginLabelEditNotify(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *editItem) { HWND hwnd = infoPtr->hwnd; NMTVDISPINFOA tvdi; tvdi.hdr.hwndFrom = hwnd; tvdi.hdr.idFrom = GetWindowLongA(hwnd, GWL_ID); tvdi.hdr.code = TVN_BEGINLABELEDITA; tvdi.item.mask = TVIF_HANDLE | TVIF_STATE | TVIF_PARAM | TVIF_TEXT; tvdi.item.hItem = editItem; tvdi.item.state = editItem->state; tvdi.item.lParam = editItem->lParam; tvdi.item.pszText = editItem->pszText; tvdi.item.cchTextMax = editItem->cchTextMax; return SendMessageA(GetParent(hwnd), WM_NOTIFY, tvdi.hdr.idFrom, (LPARAM)&tvdi); } static void TREEVIEW_UpdateDispInfo(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem, UINT mask) { NMTVDISPINFOA callback; HWND hwnd = infoPtr->hwnd; mask &= wineItem->callbackMask; if (mask == 0) return; callback.hdr.hwndFrom = hwnd; callback.hdr.idFrom = GetWindowLongA(hwnd, GWL_ID); callback.hdr.code = TVN_GETDISPINFOA; /* 'state' always contains valid value, as well as 'lParam'. * All other parameters are uninitialized. */ callback.item.pszText = wineItem->pszText; callback.item.cchTextMax = wineItem->cchTextMax; callback.item.mask = mask; callback.item.hItem = wineItem; callback.item.state = wineItem->state; callback.item.lParam = wineItem->lParam; /* If text is changed we need to recalculate textWidth */ if (mask & TVIF_TEXT) wineItem->textWidth = 0; SendMessageA(GetParent(hwnd), WM_NOTIFY, callback.hdr.idFrom, (LPARAM)&callback); /* It may have changed due to a call to SetItem. */ mask &= wineItem->callbackMask; if ((mask & TVIF_TEXT) && callback.item.pszText != wineItem->pszText) { /* Instead of copying text into our buffer user specified its own */ int len = max(lstrlenA(callback.item.pszText) + 1, TEXT_CALLBACK_SIZE); LPSTR newText = COMCTL32_ReAlloc(wineItem->pszText, len); if (newText) { wineItem->pszText = newText; strcpy(wineItem->pszText, callback.item.pszText); wineItem->cchTextMax = len; } /* If ReAlloc fails we have nothing to do, but keep original text */ } if (mask & TVIF_IMAGE) wineItem->iImage = callback.item.iImage; if (mask & TVIF_SELECTEDIMAGE) wineItem->iSelectedImage = callback.item.iSelectedImage; if (mask & TVIF_CHILDREN) wineItem->cChildren = callback.item.cChildren; /* These members are now permanently set. */ if (callback.item.mask & TVIF_DI_SETITEM) wineItem->callbackMask &= ~callback.item.mask; } /*************************************************************************** * This function uses cChildren field to decide whether the item has * children or not. * Note: if this returns TRUE, the child items may not actually exist, * they could be virtual. * * Just use wineItem->firstChild to check for physical children. */ static BOOL TREEVIEW_HasChildren(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem) { TREEVIEW_UpdateDispInfo(infoPtr, wineItem, TVIF_CHILDREN); return wineItem->cChildren > 0; } /* Item Position ********************************************************/ /* Compute linesOffset, stateOffset, imageOffset, textOffset of an item. */ static VOID TREEVIEW_ComputeItemInternalMetrics(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item) { /* Same effect, different optimisation. */ #if 0 BOOL lar = ((infoPtr->dwStyle & TVS_LINESATROOT) && (infoPtr->dwStyle & (TVS_HASLINES|TVS_HASBUTTONS))); #else BOOL lar = ((infoPtr->dwStyle & (TVS_LINESATROOT|TVS_HASLINES|TVS_HASBUTTONS)) > TVS_LINESATROOT); #endif item->linesOffset = infoPtr->uIndent * (item->iLevel + lar - 1) - infoPtr->scrollX; item->stateOffset = item->linesOffset + infoPtr->uIndent; item->imageOffset = item->stateOffset + (STATEIMAGEINDEX(item->state) ? infoPtr->stateImageWidth : 0); item->textOffset = item->imageOffset + infoPtr->normalImageWidth; } static VOID TREEVIEW_ComputeTextWidth(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item, HDC hDC) { HDC hdc; HFONT hOldFont=0; SIZE sz; /* DRAW's OM docker creates items like this */ if (item->pszText == NULL) { item->textWidth = 0; return; } if (item->textWidth != 0 && !(item->callbackMask & TVIF_TEXT)) return; if (hDC != 0) { hdc = hDC; } else { hdc = GetDC(infoPtr->hwnd); hOldFont = SelectObject(hdc, TREEVIEW_FontForItem(infoPtr, item)); } GetTextExtentPoint32A(hdc, item->pszText, strlen(item->pszText), &sz); item->textWidth = sz.cx; if (hDC == 0) { SelectObject(hdc, hOldFont); ReleaseDC(0, hdc); } } static VOID TREEVIEW_ComputeItemRect(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item) { item->rect.top = infoPtr->uItemHeight * (item->visibleOrder - infoPtr->firstVisible->visibleOrder); item->rect.bottom = item->rect.top + infoPtr->uItemHeight * item->iIntegral; item->rect.left = 0; item->rect.right = infoPtr->clientWidth; } /* We know that only items after start need their order updated. */ static void TREEVIEW_RecalculateVisibleOrder(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *start) { TREEVIEW_ITEM *item; int order; if (!start) { start = infoPtr->root->firstChild; order = 0; } else order = start->visibleOrder; for (item = start; item != NULL; item = TREEVIEW_GetNextListItem(infoPtr, item)) { item->visibleOrder = order; order += item->iIntegral; } infoPtr->maxVisibleOrder = order; for (item = start; item != NULL; item = TREEVIEW_GetNextListItem(infoPtr, item)) { TREEVIEW_ComputeItemRect(infoPtr, item); } } /* Update metrics of all items in selected subtree. * root must be expanded */ static VOID TREEVIEW_UpdateSubTree(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *root) { TREEVIEW_ITEM *sibling; HDC hdc; HFONT hOldFont; if (!root->firstChild || !(root->state & TVIS_EXPANDED)) return; root->state &= ~TVIS_EXPANDED; sibling = TREEVIEW_GetNextListItem(infoPtr, root); root->state |= TVIS_EXPANDED; hdc = GetDC(infoPtr->hwnd); hOldFont = SelectObject(hdc, infoPtr->hFont); for (; root != sibling; root = TREEVIEW_GetNextListItem(infoPtr, root)) { TREEVIEW_ComputeItemInternalMetrics(infoPtr, root); if (root->callbackMask & TVIF_TEXT) TREEVIEW_UpdateDispInfo(infoPtr, root, TVIF_TEXT); if (root->textWidth == 0) { SelectObject(hdc, TREEVIEW_FontForItem(infoPtr, root)); TREEVIEW_ComputeTextWidth(infoPtr, root, hdc); } } SelectObject(hdc, hOldFont); ReleaseDC(infoPtr->hwnd, hdc); } /* Item Allocation **********************************************************/ static TREEVIEW_ITEM * TREEVIEW_AllocateItem(TREEVIEW_INFO *infoPtr) { TREEVIEW_ITEM *newItem = COMCTL32_Alloc(sizeof(TREEVIEW_ITEM)); if (!newItem) return NULL; if (DPA_InsertPtr(infoPtr->items, INT_MAX, newItem) == -1) { COMCTL32_Free(newItem); return NULL; } return newItem; } /* Exact opposite of TREEVIEW_AllocateItem. In particular, it does not * free item->pszText. */ static void TREEVIEW_FreeItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item) { DPA_DeletePtr(infoPtr->items, DPA_GetPtrIndex(infoPtr->items, item)); COMCTL32_Free(item); } /* Item Insertion *******************************************************/ /*************************************************************************** * This method inserts newItem before sibling as a child of parent. * sibling can be NULL, but only if parent has no children. */ static void TREEVIEW_InsertBefore(TREEVIEW_ITEM *newItem, TREEVIEW_ITEM *sibling, TREEVIEW_ITEM *parent) { assert(newItem != NULL); assert(parent != NULL); if (sibling != NULL) { assert(sibling->parent == parent); if (sibling->prevSibling != NULL) sibling->prevSibling->nextSibling = newItem; newItem->prevSibling = sibling->prevSibling; sibling->prevSibling = newItem; } else newItem->prevSibling = NULL; newItem->nextSibling = sibling; if (parent->firstChild == sibling) parent->firstChild = newItem; if (parent->lastChild == NULL) parent->lastChild = newItem; } /*************************************************************************** * This method inserts newItem after sibling as a child of parent. * sibling can be NULL, but only if parent has no children. */ static void TREEVIEW_InsertAfter(TREEVIEW_ITEM *newItem, TREEVIEW_ITEM *sibling, TREEVIEW_ITEM *parent) { assert(newItem != NULL); assert(parent != NULL); if (sibling != NULL) { assert(sibling->parent == parent); if (sibling->nextSibling != NULL) sibling->nextSibling->prevSibling = newItem; newItem->nextSibling = sibling->nextSibling; sibling->nextSibling = newItem; } else newItem->nextSibling = NULL; newItem->prevSibling = sibling; if (parent->lastChild == sibling) parent->lastChild = newItem; if (parent->firstChild == NULL) parent->firstChild = newItem; } static BOOL TREEVIEW_DoSetItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem, const TVITEMEXA *tvItem) { UINT callbackClear = 0; UINT callbackSet = 0; /* Do this first in case it fails. */ if (tvItem->mask & TVIF_TEXT) { if (tvItem->pszText != LPSTR_TEXTCALLBACKA) { int len = lstrlenA(tvItem->pszText) + 1; LPSTR newText = COMCTL32_ReAlloc(wineItem->pszText, len); if (newText == NULL) return FALSE; callbackClear |= TVIF_TEXT; wineItem->pszText = newText; wineItem->cchTextMax = len; lstrcpynA(wineItem->pszText, tvItem->pszText, len); } else { callbackSet |= TVIF_TEXT; wineItem->pszText = COMCTL32_ReAlloc(wineItem->pszText, TEXT_CALLBACK_SIZE); wineItem->cchTextMax = TEXT_CALLBACK_SIZE; } } if (tvItem->mask & TVIF_CHILDREN) { wineItem->cChildren = tvItem->cChildren; if (wineItem->cChildren == I_CHILDRENCALLBACK) callbackSet |= TVIF_CHILDREN; else callbackClear |= TVIF_CHILDREN; } if (tvItem->mask & TVIF_IMAGE) { wineItem->iImage = tvItem->iImage; if (wineItem->iImage == I_IMAGECALLBACK) callbackSet |= TVIF_IMAGE; else callbackClear |= TVIF_IMAGE; } if (tvItem->mask & TVIF_SELECTEDIMAGE) { wineItem->iSelectedImage = tvItem->iSelectedImage; if (wineItem->iSelectedImage == I_IMAGECALLBACK) callbackSet |= TVIF_SELECTEDIMAGE; else callbackClear |= TVIF_SELECTEDIMAGE; } if (tvItem->mask & TVIF_PARAM) wineItem->lParam = tvItem->lParam; /* If the application sets TVIF_INTEGRAL without * supplying a TVITEMEX structure, it's toast. */ if (tvItem->mask & TVIF_INTEGRAL) wineItem->iIntegral = tvItem->iIntegral; if (tvItem->mask & TVIF_STATE) { TRACE("prevstate,state,mask:%x,%x,%x\n", wineItem->state, tvItem->state, tvItem->stateMask); wineItem->state &= ~tvItem->stateMask; wineItem->state |= (tvItem->state & tvItem->stateMask); } wineItem->callbackMask |= callbackSet; wineItem->callbackMask &= ~callbackClear; return TRUE; } /* Note that the new item is pre-zeroed. */ static LRESULT TREEVIEW_InsertItemA(TREEVIEW_INFO *infoPtr, LPARAM lParam) { const TVINSERTSTRUCTA *ptdi = (LPTVINSERTSTRUCTA) lParam; const TVITEMEXA *tvItem = &ptdi->DUMMYUNIONNAME.itemex; HTREEITEM insertAfter; TREEVIEW_ITEM *newItem, *parentItem; BOOL bTextUpdated = FALSE; if (ptdi->hParent == TVI_ROOT || ptdi->hParent == 0) { parentItem = infoPtr->root; } else { parentItem = ptdi->hParent; if (!TREEVIEW_ValidItem(infoPtr, parentItem)) { WARN("invalid parent %p\n", parentItem); return (LRESULT)(HTREEITEM)NULL; } } insertAfter = ptdi->hInsertAfter; /* Validate this now for convenience. */ switch ((DWORD)insertAfter) { case (DWORD)TVI_FIRST: case (DWORD)TVI_LAST: case (DWORD)TVI_SORT: break; default: if (!TREEVIEW_ValidItem(infoPtr, insertAfter) || insertAfter->parent != parentItem) { WARN("invalid insert after %p\n", insertAfter); insertAfter = TVI_LAST; } } TRACE("parent %p position %p: %s\n", parentItem, insertAfter, (tvItem->mask & TVIF_TEXT) ? ((tvItem->pszText == LPSTR_TEXTCALLBACKA) ? "" : tvItem->pszText) : ""); newItem = TREEVIEW_AllocateItem(infoPtr); if (newItem == NULL) return (LRESULT)(HTREEITEM)NULL; newItem->parent = parentItem; newItem->iIntegral = 1; if (!TREEVIEW_DoSetItem(infoPtr, newItem, tvItem)) return (LRESULT)(HTREEITEM)NULL; /* After this point, nothing can fail. (Except for TVI_SORT.) */ infoPtr->uNumItems++; switch ((DWORD)insertAfter) { case (DWORD)TVI_FIRST: if (infoPtr->firstVisible == parentItem->firstChild) TREEVIEW_SetFirstVisible(infoPtr, newItem, TRUE); TREEVIEW_InsertBefore(newItem, parentItem->firstChild, parentItem); break; case (DWORD)TVI_LAST: TREEVIEW_InsertAfter(newItem, parentItem->lastChild, parentItem); break; /* hInsertAfter names a specific item we want to insert after */ default: TREEVIEW_InsertAfter(newItem, insertAfter, insertAfter->parent); break; case (DWORD)TVI_SORT: { TREEVIEW_ITEM *aChild; TREEVIEW_ITEM *previousChild = NULL; BOOL bItemInserted = FALSE; aChild = parentItem->firstChild; bTextUpdated = TRUE; TREEVIEW_UpdateDispInfo(infoPtr, newItem, TVIF_TEXT); /* Iterate the parent children to see where we fit in */ while (aChild != NULL) { INT comp; TREEVIEW_UpdateDispInfo(infoPtr, aChild, TVIF_TEXT); comp = lstrcmpA(newItem->pszText, aChild->pszText); if (comp < 0) /* we are smaller than the current one */ { TREEVIEW_InsertBefore(newItem, aChild, parentItem); bItemInserted = TRUE; break; } else if (comp > 0) /* we are bigger than the current one */ { previousChild = aChild; /* This will help us to exit if there is no more sibling */ aChild = (aChild->nextSibling == 0) ? NULL : aChild->nextSibling; /* Look at the next item */ continue; } else if (comp == 0) { /* * An item with this name is already existing, therefore, * we add after the one we found */ TREEVIEW_InsertAfter(newItem, aChild, parentItem); bItemInserted = TRUE; break; } } /* * we reach the end of the child list and the item as not * yet been inserted, therefore, insert it after the last child. */ if ((!bItemInserted) && (aChild == NULL)) TREEVIEW_InsertAfter(newItem, previousChild, parentItem); break; } } TRACE("new item %p; parent %p, mask %x\n", newItem, newItem->parent, tvItem->mask); newItem->iLevel = newItem->parent->iLevel + 1; if (newItem->parent->cChildren == 0) newItem->parent->cChildren = 1; if (infoPtr->dwStyle & TVS_CHECKBOXES) { if (STATEIMAGEINDEX(newItem->state) == 0) newItem->state |= INDEXTOSTATEIMAGEMASK(1); } if (infoPtr->firstVisible == NULL) infoPtr->firstVisible = newItem; TREEVIEW_VerifyTree(infoPtr); if (parentItem == infoPtr->root || (ISVISIBLE(parentItem) && parentItem->state & TVIS_EXPANDED)) { TREEVIEW_ITEM *prev = TREEVIEW_GetPrevListItem(infoPtr, newItem); TREEVIEW_RecalculateVisibleOrder(infoPtr, prev); TREEVIEW_ComputeItemInternalMetrics(infoPtr, newItem); if (!bTextUpdated) TREEVIEW_UpdateDispInfo(infoPtr, newItem, TVIF_TEXT); TREEVIEW_ComputeTextWidth(infoPtr, newItem, 0); TREEVIEW_UpdateScrollBars(infoPtr); TREEVIEW_QueueRefresh(infoPtr); } else { newItem->visibleOrder = -1; /* refresh treeview if newItem is the first item inserted under parentItem */ if (ISVISIBLE(parentItem) && newItem->prevSibling == newItem->nextSibling) { /* parent got '+' - update it */ TREEVIEW_QueueItemRefresh(infoPtr, parentItem); } } return (LRESULT)newItem; } static LRESULT TREEVIEW_InsertItemW(TREEVIEW_INFO *infoPtr, LPARAM lParam) { TVINSERTSTRUCTW *tvisW; TVINSERTSTRUCTA tvisA; LRESULT lRes; tvisW = (LPTVINSERTSTRUCTW) lParam; tvisA.hParent = tvisW->hParent; tvisA.hInsertAfter = tvisW->hInsertAfter; tvisA.DUMMYUNIONNAME.item.mask = tvisW->DUMMYUNIONNAME.item.mask; tvisA.DUMMYUNIONNAME.item.hItem = tvisW->DUMMYUNIONNAME.item.hItem; tvisA.DUMMYUNIONNAME.item.state = tvisW->DUMMYUNIONNAME.item.state; tvisA.DUMMYUNIONNAME.item.stateMask = tvisW->DUMMYUNIONNAME.item.stateMask; tvisA.DUMMYUNIONNAME.item.cchTextMax = tvisW->DUMMYUNIONNAME.item.cchTextMax; if (tvisW->DUMMYUNIONNAME.item.pszText) { if (tvisW->DUMMYUNIONNAME.item.pszText != LPSTR_TEXTCALLBACKW) { int len = lstrlenW(tvisW->DUMMYUNIONNAME.item.pszText) + 1; tvisA.DUMMYUNIONNAME.item.pszText = COMCTL32_Alloc(len); lstrcpyWtoA(tvisA.DUMMYUNIONNAME.item.pszText, tvisW->DUMMYUNIONNAME.item.pszText); } else { tvisA.DUMMYUNIONNAME.item.pszText = LPSTR_TEXTCALLBACKA; tvisA.DUMMYUNIONNAME.item.cchTextMax = 0; } } tvisA.DUMMYUNIONNAME.item.iImage = tvisW->DUMMYUNIONNAME.item.iImage; tvisA.DUMMYUNIONNAME.item.iSelectedImage = tvisW->DUMMYUNIONNAME.item.iSelectedImage; tvisA.DUMMYUNIONNAME.item.cChildren = tvisW->DUMMYUNIONNAME.item.cChildren; tvisA.DUMMYUNIONNAME.item.lParam = tvisW->DUMMYUNIONNAME.item.lParam; lRes = TREEVIEW_InsertItemA(infoPtr, (LPARAM)&tvisA); if (tvisA.DUMMYUNIONNAME.item.pszText != LPSTR_TEXTCALLBACKA) { COMCTL32_Free(tvisA.DUMMYUNIONNAME.item.pszText); } return lRes; } /* Item Deletion ************************************************************/ static void TREEVIEW_RemoveItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem); static void TREEVIEW_RemoveAllChildren(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *parentItem) { TREEVIEW_ITEM *kill = parentItem->firstChild; while (kill != NULL) { TREEVIEW_ITEM *next = kill->nextSibling; TREEVIEW_RemoveItem(infoPtr, kill); kill = next; } assert(parentItem->cChildren <= 0); /* I_CHILDRENCALLBACK or 0 */ assert(parentItem->firstChild == NULL); assert(parentItem->lastChild == NULL); } static void TREEVIEW_UnlinkItem(TREEVIEW_ITEM *item) { TREEVIEW_ITEM *parentItem = item->parent; assert(item != NULL); assert(item->parent != NULL); /* i.e. it must not be the root */ if (parentItem->firstChild == item) parentItem->firstChild = item->nextSibling; if (parentItem->lastChild == item) parentItem->lastChild = item->prevSibling; if (parentItem->firstChild == NULL && parentItem->lastChild == NULL && parentItem->cChildren > 0) parentItem->cChildren = 0; if (item->prevSibling) item->prevSibling->nextSibling = item->nextSibling; if (item->nextSibling) item->nextSibling->prevSibling = item->prevSibling; } static void TREEVIEW_RemoveItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem) { TRACE("%p, (%s)\n", wineItem, TREEVIEW_ItemName(wineItem)); TREEVIEW_SendTreeviewNotify(infoPtr, TVN_DELETEITEMA, TVIF_HANDLE | TVIF_PARAM, 0, wineItem, 0); if (wineItem->firstChild) TREEVIEW_RemoveAllChildren(infoPtr, wineItem); TREEVIEW_UnlinkItem(wineItem); infoPtr->uNumItems--; if (wineItem->pszText != LPSTR_TEXTCALLBACKA) COMCTL32_Free(wineItem->pszText); TREEVIEW_FreeItem(infoPtr, wineItem); } /* Empty out the tree. */ static void TREEVIEW_RemoveTree(TREEVIEW_INFO *infoPtr) { TREEVIEW_RemoveAllChildren(infoPtr, infoPtr->root); assert(infoPtr->uNumItems == 0); /* root isn't counted in uNumItems */ } static LRESULT TREEVIEW_DeleteItem(TREEVIEW_INFO *infoPtr, HTREEITEM wineItem) { TREEVIEW_ITEM *oldSelection = infoPtr->selectedItem; TREEVIEW_ITEM *newSelection = oldSelection; TREEVIEW_ITEM *newFirstVisible = NULL; TREEVIEW_ITEM *parent, *prev = NULL; BOOL visible = FALSE; if (wineItem == TVI_ROOT) { TRACE("TVI_ROOT\n"); parent = infoPtr->root; newSelection = NULL; visible = TRUE; TREEVIEW_RemoveTree(infoPtr); } else { if (!TREEVIEW_ValidItem(infoPtr, wineItem)) return FALSE; TRACE("%p (%s)\n", wineItem, TREEVIEW_ItemName(wineItem)); parent = wineItem->parent; if (ISVISIBLE(wineItem)) { prev = TREEVIEW_GetPrevListItem(infoPtr, wineItem); visible = TRUE; } if (infoPtr->selectedItem != NULL && (wineItem == infoPtr->selectedItem || TREEVIEW_IsChildOf(wineItem, infoPtr->selectedItem))) { if (wineItem->nextSibling) newSelection = wineItem->nextSibling; else if (wineItem->parent != infoPtr->root) newSelection = wineItem->parent; } if (infoPtr->firstVisible == wineItem) { if (wineItem->nextSibling) newFirstVisible = wineItem->nextSibling; else if (wineItem->prevSibling) newFirstVisible = wineItem->prevSibling; else if (wineItem->parent != infoPtr->root) newFirstVisible = wineItem->parent; } else newFirstVisible = infoPtr->firstVisible; TREEVIEW_RemoveItem(infoPtr, wineItem); } /* Don't change if somebody else already has. */ if (oldSelection == infoPtr->selectedItem) { if (TREEVIEW_ValidItem(infoPtr, newSelection)) TREEVIEW_DoSelectItem(infoPtr, TVGN_CARET, newSelection, TVC_UNKNOWN); else infoPtr->selectedItem = 0; } /* Validate insertMark dropItem. * hotItem ??? - used for comparision only. */ if (!TREEVIEW_ValidItem(infoPtr, infoPtr->insertMarkItem)) infoPtr->insertMarkItem = 0; if (!TREEVIEW_ValidItem(infoPtr, infoPtr->dropItem)) infoPtr->dropItem = 0; if (!TREEVIEW_ValidItem(infoPtr, newFirstVisible)) newFirstVisible = infoPtr->root->firstChild; TREEVIEW_VerifyTree(infoPtr); if (visible) { TREEVIEW_RecalculateVisibleOrder(infoPtr, prev); TREEVIEW_SetFirstVisible(infoPtr, newFirstVisible, TRUE); TREEVIEW_UpdateScrollBars(infoPtr); TREEVIEW_QueueRefresh(infoPtr); } else if (ISVISIBLE(parent) && !TREEVIEW_HasChildren(infoPtr, parent)) { /* parent lost '+/-' - update it */ TREEVIEW_QueueItemRefresh(infoPtr, parent); } return TRUE; } /* Get/Set Messages *********************************************************/ static LRESULT TREEVIEW_SetRedraw(TREEVIEW_INFO* infoPtr, WPARAM wParam, LPARAM lParam) { if(wParam) infoPtr->bRedraw = TRUE; else infoPtr->bRedraw = FALSE; return 0; } static LRESULT TREEVIEW_GetIndent(TREEVIEW_INFO *infoPtr) { TRACE("\n"); return infoPtr->uIndent; } static LRESULT TREEVIEW_SetIndent(TREEVIEW_INFO *infoPtr, UINT newIndent) { TRACE("\n"); if (newIndent < MINIMUM_INDENT) newIndent = MINIMUM_INDENT; if (infoPtr->uIndent != newIndent) { infoPtr->uIndent = newIndent; TREEVIEW_UpdateSubTree(infoPtr, infoPtr->root); TREEVIEW_UpdateScrollBars(infoPtr); TREEVIEW_QueueRefresh(infoPtr); } return 0; } static LRESULT TREEVIEW_GetToolTips(TREEVIEW_INFO *infoPtr) { TRACE("\n"); return infoPtr->hwndToolTip; } static LRESULT TREEVIEW_SetToolTips(TREEVIEW_INFO *infoPtr, HWND hwndTT) { HWND prevToolTip; TRACE("\n"); prevToolTip = infoPtr->hwndToolTip; infoPtr->hwndToolTip = hwndTT; return prevToolTip; } static LRESULT TREEVIEW_GetScrollTime(TREEVIEW_INFO *infoPtr) { return infoPtr->uScrollTime; } static LRESULT TREEVIEW_SetScrollTime(TREEVIEW_INFO *infoPtr, UINT uScrollTime) { UINT uOldScrollTime = infoPtr->uScrollTime; infoPtr->uScrollTime = min(uScrollTime, 100); return uOldScrollTime; } static LRESULT TREEVIEW_GetImageList(TREEVIEW_INFO *infoPtr, WPARAM wParam) { TRACE("\n"); switch (wParam) { case (WPARAM)TVSIL_NORMAL: return (LRESULT)infoPtr->himlNormal; case (WPARAM)TVSIL_STATE: return (LRESULT)infoPtr->himlState; default: return 0; } } static LRESULT TREEVIEW_SetImageList(TREEVIEW_INFO *infoPtr, WPARAM wParam, HIMAGELIST himlNew) { HIMAGELIST himlOld = 0; int oldWidth = infoPtr->normalImageWidth; int oldHeight = infoPtr->normalImageHeight; TRACE("%x,%p\n", wParam, himlNew); switch (wParam) { case (WPARAM)TVSIL_NORMAL: himlOld = infoPtr->himlNormal; infoPtr->himlNormal = himlNew; if (himlNew != NULL) ImageList_GetIconSize(himlNew, &infoPtr->normalImageWidth, &infoPtr->normalImageHeight); else { infoPtr->normalImageWidth = 0; infoPtr->normalImageHeight = 0; } break; case (WPARAM)TVSIL_STATE: himlOld = infoPtr->himlState; infoPtr->himlState = himlNew; if (himlNew != NULL) ImageList_GetIconSize(himlNew, &infoPtr->stateImageWidth, &infoPtr->stateImageHeight); else { infoPtr->stateImageWidth = 0; infoPtr->stateImageHeight = 0; } break; } if (oldWidth != infoPtr->normalImageWidth || oldHeight != infoPtr->normalImageHeight) { TREEVIEW_UpdateSubTree(infoPtr, infoPtr->root); TREEVIEW_UpdateScrollBars(infoPtr); } TREEVIEW_QueueRefresh(infoPtr); return (LRESULT)himlOld; } /* Compute the natural height (based on the font size) for items. */ static UINT TREEVIEW_NaturalHeight(TREEVIEW_INFO *infoPtr) { TEXTMETRICA tm; HDC hdc = GetDC(0); HFONT hOldFont = SelectObject(hdc, infoPtr->hFont); GetTextMetricsA(hdc, &tm); SelectObject(hdc, hOldFont); ReleaseDC(0, hdc); /* The 16 is a hack because our fonts are tiny. */ return max(16, tm.tmHeight + tm.tmExternalLeading); } static LRESULT TREEVIEW_SetItemHeight(TREEVIEW_INFO *infoPtr, INT newHeight) { INT prevHeight = infoPtr->uItemHeight; TRACE("%d \n", newHeight); if (newHeight == -1) { infoPtr->uItemHeight = TREEVIEW_NaturalHeight(infoPtr); infoPtr->bHeightSet = FALSE; } else { infoPtr->uItemHeight = newHeight; infoPtr->bHeightSet = TRUE; } /* Round down, unless we support odd ("non even") heights. */ if (!(infoPtr->dwStyle) & TVS_NONEVENHEIGHT) infoPtr->uItemHeight &= ~1; if (infoPtr->uItemHeight != prevHeight) { TREEVIEW_RecalculateVisibleOrder(infoPtr, NULL); TREEVIEW_UpdateScrollBars(infoPtr); TREEVIEW_QueueRefresh(infoPtr); } return prevHeight; } static LRESULT TREEVIEW_GetItemHeight(TREEVIEW_INFO *infoPtr) { TRACE("\n"); return infoPtr->uItemHeight; } static LRESULT TREEVIEW_GetFont(TREEVIEW_INFO *infoPtr) { TRACE("%x\n", infoPtr->hFont); return infoPtr->hFont; } static INT CALLBACK TREEVIEW_ResetTextWidth(LPVOID pItem, DWORD unused) { (void)unused; ((TREEVIEW_ITEM *)pItem)->textWidth = 0; return 1; } static LRESULT TREEVIEW_SetFont(TREEVIEW_INFO *infoPtr, HFONT hFont, BOOL bRedraw) { UINT uHeight = infoPtr->uItemHeight; TRACE("%x %i\n", hFont, bRedraw); infoPtr->hFont = hFont ? hFont : GetStockObject(SYSTEM_FONT); DeleteObject(infoPtr->hBoldFont); infoPtr->hBoldFont = TREEVIEW_CreateBoldFont(infoPtr->hFont); if (!infoPtr->bHeightSet) infoPtr->uItemHeight = TREEVIEW_NaturalHeight(infoPtr); if (uHeight != infoPtr->uItemHeight) TREEVIEW_RecalculateVisibleOrder(infoPtr, NULL); DPA_EnumCallback(infoPtr->items, TREEVIEW_ResetTextWidth, 0); TREEVIEW_UpdateSubTree(infoPtr, infoPtr->root); TREEVIEW_UpdateScrollBars(infoPtr); if (bRedraw) TREEVIEW_QueueRefresh(infoPtr); return 0; } static LRESULT TREEVIEW_GetLineColor(TREEVIEW_INFO *infoPtr) { TRACE("\n"); return (LRESULT)infoPtr->clrLine; } static LRESULT TREEVIEW_SetLineColor(TREEVIEW_INFO *infoPtr, COLORREF color) { COLORREF prevColor = infoPtr->clrLine; TRACE("\n"); infoPtr->clrLine = color; return (LRESULT)prevColor; } static LRESULT TREEVIEW_GetTextColor(TREEVIEW_INFO *infoPtr) { TRACE("\n"); return (LRESULT)infoPtr->clrText; } static LRESULT TREEVIEW_SetTextColor(TREEVIEW_INFO *infoPtr, COLORREF color) { COLORREF prevColor = infoPtr->clrText; TRACE("\n"); infoPtr->clrText = color; if (infoPtr->clrText != prevColor) TREEVIEW_QueueRefresh(infoPtr); return (LRESULT)prevColor; } static LRESULT TREEVIEW_GetBkColor(TREEVIEW_INFO *infoPtr) { TRACE("\n"); return (LRESULT)infoPtr->clrBk; } static LRESULT TREEVIEW_SetBkColor(TREEVIEW_INFO *infoPtr, COLORREF newColor) { COLORREF prevColor = infoPtr->clrBk; TRACE("\n"); infoPtr->clrBk = newColor; if (newColor != prevColor) TREEVIEW_QueueRefresh(infoPtr); return (LRESULT)prevColor; } static LRESULT TREEVIEW_GetInsertMarkColor(TREEVIEW_INFO *infoPtr) { TRACE("\n"); return (LRESULT)infoPtr->clrInsertMark; } static LRESULT TREEVIEW_SetInsertMarkColor(TREEVIEW_INFO *infoPtr, COLORREF color) { COLORREF prevColor = infoPtr->clrInsertMark; TRACE("%lx\n", color); infoPtr->clrInsertMark = color; return (LRESULT)prevColor; } static LRESULT TREEVIEW_SetInsertMark(TREEVIEW_INFO *infoPtr, BOOL wParam, HTREEITEM item) { TRACE("%d %p\n", wParam, item); if (!TREEVIEW_ValidItem(infoPtr, item)) return 0; infoPtr->insertBeforeorAfter = wParam; infoPtr->insertMarkItem = item; TREEVIEW_QueueRefresh(infoPtr); return 1; } /************************************************************************ * Some serious braindamage here. lParam is a pointer to both the * input HTREEITEM and the output RECT. */ static LRESULT TREEVIEW_GetItemRect(TREEVIEW_INFO *infoPtr, BOOL fTextRect, LPRECT lpRect) { TREEVIEW_ITEM *wineItem; const HTREEITEM *pItem = (HTREEITEM *)lpRect; TRACE("\n"); /* * validate parameters */ if (pItem == NULL) return FALSE; wineItem = *pItem; if (!TREEVIEW_ValidItem(infoPtr, wineItem) || !ISVISIBLE(wineItem)) return FALSE; /* * If wParam is TRUE return the text size otherwise return * the whole item size */ if (fTextRect) { /* Windows does not send TVN_GETDISPINFO here. */ lpRect->top = wineItem->rect.top; lpRect->bottom = wineItem->rect.bottom; lpRect->left = wineItem->textOffset; lpRect->right = wineItem->textOffset + wineItem->textWidth; } else { *lpRect = wineItem->rect; } TRACE("%s [L:%d R:%d T:%d B:%d]\n", fTextRect ? "text" : "item", lpRect->left, lpRect->right, lpRect->top, lpRect->bottom); return TRUE; } static inline LRESULT TREEVIEW_GetVisibleCount(TREEVIEW_INFO *infoPtr) { /* Suprise! This does not take integral height into account. */ return infoPtr->clientHeight / infoPtr->uItemHeight; } static LRESULT TREEVIEW_GetItemA(TREEVIEW_INFO *infoPtr, LPTVITEMEXA tvItem) { TREEVIEW_ITEM *wineItem; wineItem = tvItem->hItem; if (!TREEVIEW_ValidItem(infoPtr, wineItem)) return FALSE; TREEVIEW_UpdateDispInfo(infoPtr, wineItem, tvItem->mask); if (tvItem->mask & TVIF_CHILDREN) tvItem->cChildren = wineItem->cChildren; if (tvItem->mask & TVIF_HANDLE) tvItem->hItem = wineItem; if (tvItem->mask & TVIF_IMAGE) tvItem->iImage = wineItem->iImage; if (tvItem->mask & TVIF_INTEGRAL) tvItem->iIntegral = wineItem->iIntegral; /* undocumented: windows ignores TVIF_PARAM and * * always sets lParam */ tvItem->lParam = wineItem->lParam; if (tvItem->mask & TVIF_SELECTEDIMAGE) tvItem->iSelectedImage = wineItem->iSelectedImage; if (tvItem->mask & TVIF_STATE) tvItem->state = wineItem->state & tvItem->stateMask; if (tvItem->mask & TVIF_TEXT) lstrcpynA(tvItem->pszText, wineItem->pszText, tvItem->cchTextMax); TRACE("item <%p>, txt %p, img %p, mask %x\n", wineItem, tvItem->pszText, &tvItem->iImage, tvItem->mask); return TRUE; } /* Beware MSDN Library Visual Studio 6.0. It says -1 on failure, 0 on success, * which is wrong. */ static LRESULT TREEVIEW_SetItemA(TREEVIEW_INFO *infoPtr, LPTVITEMEXA tvItem) { TREEVIEW_ITEM *wineItem; TREEVIEW_ITEM originalItem; wineItem = tvItem->hItem; TRACE("item %d,mask %x\n", TREEVIEW_GetItemIndex(infoPtr, wineItem), tvItem->mask); if (!TREEVIEW_ValidItem(infoPtr, wineItem)) return FALSE; if (!TREEVIEW_DoSetItem(infoPtr, wineItem, tvItem)) return FALSE; /* store the orignal item values */ originalItem = *wineItem; /* If the text or TVIS_BOLD was changed, and it is visible, recalculate. */ if ((tvItem->mask & TVIF_TEXT || (tvItem->mask & TVIF_STATE && tvItem->stateMask & TVIS_BOLD)) && ISVISIBLE(wineItem)) { TREEVIEW_UpdateDispInfo(infoPtr, wineItem, TVIF_TEXT); TREEVIEW_ComputeTextWidth(infoPtr, wineItem, 0); } if (tvItem->mask != 0 && ISVISIBLE(wineItem)) { /* The refresh updates everything, but we can't wait until then. */ TREEVIEW_ComputeItemInternalMetrics(infoPtr, wineItem); /* if any of the items values changed, redraw the item */ if(memcmp(&originalItem, wineItem, sizeof(TREEVIEW_ITEM))) { if (tvItem->mask & TVIF_INTEGRAL) { TREEVIEW_RecalculateVisibleOrder(infoPtr, wineItem); TREEVIEW_UpdateScrollBars(infoPtr); TREEVIEW_QueueRefresh(infoPtr); } else { TREEVIEW_UpdateScrollBars(infoPtr); TREEVIEW_QueueItemRefresh(infoPtr, wineItem); } } } return TRUE; } static LRESULT TREEVIEW_GetItemW(TREEVIEW_INFO *infoPtr, LPTVITEMEXA tvItem) { TREEVIEW_ITEM *wineItem; INT iItem; iItem = (INT)tvItem->hItem; wineItem = tvItem->hItem; if(!TREEVIEW_ValidItem (infoPtr, wineItem)) return FALSE; TREEVIEW_UpdateDispInfo(infoPtr, wineItem, tvItem->mask); if (tvItem->mask & TVIF_CHILDREN) { if (TVIF_CHILDREN==I_CHILDRENCALLBACK) FIXME("I_CHILDRENCALLBACK not supported\n"); tvItem->cChildren = wineItem->cChildren; } if (tvItem->mask & TVIF_HANDLE) { tvItem->hItem = wineItem; } if (tvItem->mask & TVIF_IMAGE) { tvItem->iImage = wineItem->iImage; } if (tvItem->mask & TVIF_INTEGRAL) { tvItem->iIntegral = wineItem->iIntegral; } /* undocumented: windows ignores TVIF_PARAM and * always sets lParam */ tvItem->lParam = wineItem->lParam; if (tvItem->mask & TVIF_SELECTEDIMAGE) { tvItem->iSelectedImage = wineItem->iSelectedImage; } if (tvItem->mask & TVIF_STATE) { tvItem->state = wineItem->state & tvItem->stateMask; } #if 0 if (tvItem->mask & TVIF_TEXT) { if (wineItem->pszText == LPSTR_TEXTCALLBACKW) { tvItem->pszText = LPSTR_TEXTCALLBACKW; /* FIXME:send notification? */ ERR(" GetItem called with LPSTR_TEXTCALLBACK\n"); } else if (wineItem->pszText) { lstrcpynAtoW(tvItem->pszText, wineItem->pszText, tvItem->cchTextMax); } } #endif wineItem->pszText = NULL; TRACE("item %d<%p>, txt %p, img %p, action %x\n", iItem, tvItem, tvItem->pszText, &tvItem->iImage, tvItem->mask); return TRUE; } static LRESULT TREEVIEW_GetItemState(TREEVIEW_INFO *infoPtr, HTREEITEM wineItem, UINT mask) { TRACE("\n"); if (!wineItem || !TREEVIEW_ValidItem(infoPtr, wineItem)) return 0; return (wineItem->state & mask); } static LRESULT TREEVIEW_GetNextItem(TREEVIEW_INFO *infoPtr, UINT which, HTREEITEM wineItem) { TREEVIEW_ITEM *retval; retval = 0; /* handle all the global data here */ switch (which) { case TVGN_CHILD: /* Special case: child of 0 is root */ if (wineItem) break; /* fall through */ case TVGN_ROOT: retval = infoPtr->root->firstChild; break; case TVGN_CARET: retval = infoPtr->selectedItem; break; case TVGN_FIRSTVISIBLE: retval = infoPtr->firstVisible; break; case TVGN_DROPHILITE: retval = infoPtr->dropItem; break; case TVGN_LASTVISIBLE: retval = TREEVIEW_GetLastListItem(infoPtr, infoPtr->root); break; } if (retval) { TRACE("flags:%x, returns %p\n", which, retval); return (LRESULT)retval; } if (!TREEVIEW_ValidItem(infoPtr, wineItem)) return FALSE; switch (which) { case TVGN_NEXT: retval = wineItem->nextSibling; break; case TVGN_PREVIOUS: retval = wineItem->prevSibling; break; case TVGN_PARENT: retval = (wineItem->parent != infoPtr->root) ? wineItem->parent : NULL; break; case TVGN_CHILD: retval = wineItem->firstChild; break; case TVGN_NEXTVISIBLE: retval = TREEVIEW_GetNextListItem(infoPtr, wineItem); break; case TVGN_PREVIOUSVISIBLE: retval = TREEVIEW_GetPrevListItem(infoPtr, wineItem); break; default: TRACE("Unknown msg %x,item %p\n", which, wineItem); break; } TRACE("flags:%x, item %p;returns %p\n", which, wineItem, retval); return (LRESULT)retval; } static LRESULT TREEVIEW_GetCount(TREEVIEW_INFO *infoPtr) { TRACE(" %d\n", infoPtr->uNumItems); return (LRESULT)infoPtr->uNumItems; } static VOID TREEVIEW_ToggleItemState(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item) { if (infoPtr->dwStyle & TVS_CHECKBOXES) { static const unsigned int state_table[] = { 0, 2, 1 }; unsigned int state; state = STATEIMAGEINDEX(item->state); TRACE("state:%x\n", state); item->state &= ~TVIS_STATEIMAGEMASK; if (state < 3) state = state_table[state]; item->state |= INDEXTOSTATEIMAGEMASK(state); TRACE("state:%x\n", state); TREEVIEW_QueueItemRefresh(infoPtr, item); } } /* Painting *************************************************************/ /* Draw the lines and expand button for an item. Also draws one section * of the line from item's parent to item's parent's next sibling. */ static void TREEVIEW_DrawItemLines(TREEVIEW_INFO *infoPtr, HDC hdc, TREEVIEW_ITEM *item) { LONG centerx, centery; BOOL lar = ((infoPtr->dwStyle & (TVS_LINESATROOT|TVS_HASLINES|TVS_HASBUTTONS)) > TVS_LINESATROOT); if (!lar && item->iLevel == 0) return; centerx = (item->linesOffset + item->stateOffset) / 2; centery = (item->rect.top + item->rect.bottom) / 2; if (infoPtr->dwStyle & TVS_HASLINES) { HPEN hOldPen, hNewPen; HTREEITEM parent; /* * Get a dotted grey pen */ hNewPen = CreatePen(PS_DOT, 0, infoPtr->clrLine); hOldPen = SelectObject(hdc, hNewPen); MoveToEx(hdc, item->stateOffset, centery, NULL); LineTo(hdc, centerx - 1, centery); if (item->prevSibling || item->parent != infoPtr->root) { MoveToEx(hdc, centerx, item->rect.top, NULL); LineTo(hdc, centerx, centery); } if (item->nextSibling) { MoveToEx(hdc, centerx, centery, NULL); LineTo(hdc, centerx, item->rect.bottom + 1); } /* Draw the line from our parent to its next sibling. */ parent = item->parent; while (parent != infoPtr->root) { int pcenterx = (parent->linesOffset + parent->stateOffset) / 2; if (parent->nextSibling /* skip top-levels unless TVS_LINESATROOT */ && parent->stateOffset > parent->linesOffset) { MoveToEx(hdc, pcenterx, item->rect.top, NULL); LineTo(hdc, pcenterx, item->rect.bottom + 1); } parent = parent->parent; } SelectObject(hdc, hOldPen); DeleteObject(hNewPen); } /* * Display the (+/-) signs */ if (infoPtr->dwStyle & TVS_HASBUTTONS) { if (item->cChildren) { LONG height = item->rect.bottom - item->rect.top; LONG width = item->stateOffset - item->linesOffset; LONG rectsize = min(height, width) / 4; /* plussize = ceil(rectsize * 3/4) */ LONG plussize = (rectsize + 1) * 3 / 4; HPEN hNewPen = CreatePen(PS_SOLID, 0, infoPtr->clrLine); HPEN hOldPen = SelectObject(hdc, hNewPen); HBRUSH hbr = CreateSolidBrush(infoPtr->clrBk); HBRUSH hbrOld = SelectObject(hdc, hbr); Rectangle(hdc, centerx - rectsize, centery - rectsize, centerx + rectsize + 1, centery + rectsize + 1); SelectObject(hdc, hbrOld); DeleteObject(hbr); SelectObject(hdc, hOldPen); DeleteObject(hNewPen); MoveToEx(hdc, centerx - plussize + 1, centery, NULL); LineTo(hdc, centerx + plussize, centery); if (!(item->state & TVIS_EXPANDED)) { MoveToEx(hdc, centerx, centery - plussize + 1, NULL); LineTo(hdc, centerx, centery + plussize); } } } } static void TREEVIEW_DrawItem(TREEVIEW_INFO *infoPtr, HDC hdc, TREEVIEW_ITEM *wineItem) { INT cditem; HFONT hOldFont; int centery; hOldFont = SelectObject(hdc, TREEVIEW_FontForItem(infoPtr, wineItem)); TREEVIEW_UpdateDispInfo(infoPtr, wineItem, CALLBACK_MASK_ALL); /* The custom draw handler can query the text rectangle, * so get ready. */ TREEVIEW_ComputeTextWidth(infoPtr, wineItem, hdc); cditem = 0; if (infoPtr->cdmode & CDRF_NOTIFYITEMDRAW) { cditem = TREEVIEW_SendCustomDrawItemNotify (infoPtr, hdc, wineItem, CDDS_ITEMPREPAINT); TRACE("prepaint:cditem-app returns 0x%x\n", cditem); if (cditem & CDRF_SKIPDEFAULT) { SelectObject(hdc, hOldFont); return; } } if (cditem & CDRF_NEWFONT) TREEVIEW_ComputeTextWidth(infoPtr, wineItem, hdc); TREEVIEW_DrawItemLines(infoPtr, hdc, wineItem); centery = (wineItem->rect.top + wineItem->rect.bottom) / 2; /* * Display the images associated with this item */ { INT imageIndex; /* State images are displayed to the left of the Normal image * image number is in state; zero should be `display no image'. */ imageIndex = STATEIMAGEINDEX(wineItem->state); if (infoPtr->himlState && imageIndex) { ImageList_Draw(infoPtr->himlState, imageIndex, hdc, wineItem->stateOffset, centery - infoPtr->stateImageHeight / 2, ILD_NORMAL); } /* Now, draw the normal image; can be either selected or * non-selected image. */ if ((wineItem->state & TVIS_SELECTED) && (wineItem->iSelectedImage)) { /* The item is curently selected */ imageIndex = wineItem->iSelectedImage; } else { /* The item is not selected */ imageIndex = wineItem->iImage; } if (infoPtr->himlNormal) { int ovlIdx = wineItem->state & TVIS_OVERLAYMASK; ImageList_Draw(infoPtr->himlNormal, imageIndex, hdc, wineItem->imageOffset, centery - infoPtr->normalImageHeight / 2, ILD_NORMAL | ovlIdx); } } /* * Display the text associated with this item */ /* Don't paint item's text if it's being edited */ if (!infoPtr->hwndEdit || (infoPtr->selectedItem != wineItem)) { if (wineItem->pszText) { COLORREF oldTextColor = 0; INT oldBkMode; HBRUSH hbrBk = 0; BOOL inFocus = (GetFocus() == infoPtr->hwnd); RECT rcText; oldBkMode = SetBkMode(hdc, TRANSPARENT); /* - If item is drop target or it is selected and window is in focus - * use blue background (COLOR_HIGHLIGHT). * - If item is selected, window is not in focus, but it has style * TVS_SHOWSELALWAYS - use grey background (COLOR_BTNFACE) * - Otherwise - don't fill background */ if ((wineItem->state & TVIS_DROPHILITED) || ((wineItem == infoPtr->focusedItem) && !(wineItem->state & TVIS_SELECTED)) || ((wineItem->state & TVIS_SELECTED) && (!infoPtr->focusedItem) && (inFocus || (infoPtr->dwStyle & TVS_SHOWSELALWAYS)))) { if ((wineItem->state & TVIS_DROPHILITED) || inFocus) { hbrBk = CreateSolidBrush(GetSysColor(COLOR_HIGHLIGHT)); oldTextColor = SetTextColor(hdc, GetSysColor(COLOR_HIGHLIGHTTEXT)); } else { hbrBk = CreateSolidBrush(GetSysColor(COLOR_BTNFACE)); if (infoPtr->clrText == -1) oldTextColor = SetTextColor(hdc, GetSysColor(COLOR_WINDOWTEXT)); else oldTextColor = SetTextColor(hdc, infoPtr->clrText); } } else { if (infoPtr->clrText == -1) oldTextColor = SetTextColor(hdc, GetSysColor(COLOR_WINDOWTEXT)); else oldTextColor = SetTextColor(hdc, infoPtr->clrText); } rcText.top = wineItem->rect.top; rcText.bottom = wineItem->rect.bottom; rcText.left = wineItem->textOffset; rcText.right = rcText.left + wineItem->textWidth + 4; if (hbrBk) { FillRect(hdc, &rcText, hbrBk); DeleteObject(hbrBk); } /* Draw the box arround the selected item */ if ((wineItem == infoPtr->selectedItem) && inFocus) { HPEN hNewPen = CreatePen(PS_DOT, 0, GetSysColor(COLOR_WINDOWTEXT)); HPEN hOldPen = SelectObject(hdc, hNewPen); INT rop = SetROP2(hdc, R2_XORPEN); POINT points[5]; points[4].x = points[0].x = rcText.left; points[4].y = points[0].y = rcText.top; points[1].x = rcText.right - 1; points[1].y = rcText.top; points[2].x = rcText.right - 1; points[2].y = rcText.bottom - 1; points[3].x = rcText.left; points[3].y = rcText.bottom - 1; Polyline(hdc, points, 5); SetROP2(hdc, rop); SelectObject(hdc, hOldPen); DeleteObject(hNewPen); } rcText.left += 2; rcText.right -= 2; /* Draw it */ DrawTextA(hdc, wineItem->pszText, lstrlenA(wineItem->pszText), &rcText, DT_CENTER | DT_VCENTER | DT_SINGLELINE | DT_NOPREFIX); /* Restore the hdc state */ SetTextColor(hdc, oldTextColor); if (oldBkMode != TRANSPARENT) SetBkMode(hdc, oldBkMode); } } /* Draw insertion mark if necessary */ if (infoPtr->insertMarkItem) TRACE("item:%d,mark:%d\n", TREEVIEW_GetItemIndex(infoPtr, wineItem), (int)infoPtr->insertMarkItem); if (wineItem == infoPtr->insertMarkItem) { HPEN hNewPen, hOldPen; int offset; int left, right; hNewPen = CreatePen(PS_SOLID, 2, infoPtr->clrInsertMark); hOldPen = SelectObject(hdc, hNewPen); if (infoPtr->insertBeforeorAfter) offset = wineItem->rect.bottom - 1; else offset = wineItem->rect.top + 1; left = wineItem->textOffset - 2; right = wineItem->textOffset + wineItem->textWidth + 2; MoveToEx(hdc, left, offset - 3, NULL); LineTo(hdc, left, offset + 4); MoveToEx(hdc, left, offset, NULL); LineTo(hdc, right + 1, offset); MoveToEx(hdc, right, offset + 3, NULL); LineTo(hdc, right, offset - 4); SelectObject(hdc, hOldPen); DeleteObject(hNewPen); } if (cditem & CDRF_NOTIFYPOSTPAINT) { cditem = TREEVIEW_SendCustomDrawItemNotify (infoPtr, hdc, wineItem, CDDS_ITEMPOSTPAINT); TRACE("postpaint:cditem-app returns 0x%x\n", cditem); } SelectObject(hdc, hOldFont); } /* Computes treeHeight and treeWidth and updates the scroll bars. */ static void TREEVIEW_UpdateScrollBars(TREEVIEW_INFO *infoPtr) { TREEVIEW_ITEM *wineItem; HWND hwnd = infoPtr->hwnd; BOOL vert = FALSE; BOOL horz = FALSE; SCROLLINFO si; LONG scrollX = infoPtr->scrollX; infoPtr->treeWidth = 0; infoPtr->treeHeight = 0; /* We iterate through all visible items in order to get the tree height * and width */ wineItem = infoPtr->root->firstChild; while (wineItem != NULL) { if (ISVISIBLE(wineItem)) { /* actually we draw text at textOffset + 2 */ if (2+wineItem->textOffset+wineItem->textWidth > infoPtr->treeWidth) infoPtr->treeWidth = wineItem->textOffset+wineItem->textWidth+2; /* This is scroll-adjusted, but we fix this below. */ infoPtr->treeHeight = wineItem->rect.bottom; } wineItem = TREEVIEW_GetNextListItem(infoPtr, wineItem); } /* Fix the scroll adjusted treeHeight and treeWidth. */ if (infoPtr->root->firstChild) infoPtr->treeHeight -= infoPtr->root->firstChild->rect.top; infoPtr->treeWidth += infoPtr->scrollX; /* Adding one scroll bar may take up enough space that it forces us * to add the other as well. */ if (infoPtr->treeHeight > infoPtr->clientHeight) { vert = TRUE; if (infoPtr->treeWidth > infoPtr->clientWidth - GetSystemMetrics(SM_CXVSCROLL)) horz = TRUE; } else if (infoPtr->treeWidth > infoPtr->clientWidth) horz = TRUE; if (!vert && horz && infoPtr->treeHeight > infoPtr->clientHeight - GetSystemMetrics(SM_CYVSCROLL)) vert = TRUE; si.cbSize = sizeof(SCROLLINFO); si.fMask = SIF_POS|SIF_RANGE|SIF_PAGE; si.nMin = 0; if (vert) { infoPtr->uInternalStatus |= TV_VSCROLL; si.nPage = TREEVIEW_GetVisibleCount(infoPtr); si.nPos = infoPtr->firstVisible->visibleOrder; si.nMax = infoPtr->maxVisibleOrder - 1; SetScrollInfo(hwnd, SB_VERT, &si, TRUE); } else { if (infoPtr->uInternalStatus & TV_VSCROLL) ShowScrollBar(hwnd, SB_VERT, FALSE); infoPtr->uInternalStatus &= ~TV_VSCROLL; } if (horz) { infoPtr->uInternalStatus |= TV_HSCROLL; si.nPage = infoPtr->clientWidth; si.nPos = infoPtr->scrollX; si.nMax = infoPtr->treeWidth - 1; if (si.nPos > si.nMax - max( si.nPage-1, 0 )) { si.nPos = si.nMax - max( si.nPage-1, 0 ); scrollX = si.nPos; } SetScrollInfo(hwnd, SB_HORZ, &si, TRUE); } else { if (infoPtr->uInternalStatus & TV_HSCROLL) ShowScrollBar(hwnd, SB_HORZ, FALSE); scrollX = 0; } if (infoPtr->scrollX != scrollX) { TREEVIEW_HScroll(infoPtr, MAKEWPARAM(SB_THUMBPOSITION, scrollX)); } if (!horz) infoPtr->uInternalStatus &= ~TV_HSCROLL; } /* CtrlSpy doesn't mention this, but CorelDRAW's object manager needs it. */ static LRESULT TREEVIEW_EraseBackground(TREEVIEW_INFO *infoPtr, HDC hDC) { HBRUSH hBrush = CreateSolidBrush(infoPtr->clrBk); RECT rect; GetClientRect(infoPtr->hwnd, &rect); FillRect(hDC, &rect, hBrush); DeleteObject(hBrush); return 1; } static void TREEVIEW_Refresh(TREEVIEW_INFO *infoPtr, HDC hdc, RECT *rc) { HWND hwnd = infoPtr->hwnd; RECT rect = *rc; TREEVIEW_ITEM *wineItem; if (infoPtr->clientHeight == 0 || infoPtr->clientWidth == 0) { TRACE("empty window\n"); return; } infoPtr->cdmode = TREEVIEW_SendCustomDrawNotify(infoPtr, CDDS_PREPAINT, hdc, rect); if (infoPtr->cdmode == CDRF_SKIPDEFAULT) { ReleaseDC(hwnd, hdc); return; } for (wineItem = infoPtr->root->firstChild; wineItem != NULL; wineItem = TREEVIEW_GetNextListItem(infoPtr, wineItem)) { if (ISVISIBLE(wineItem)) { /* Avoid unneeded calculations */ if (wineItem->rect.top > rect.bottom) break; if (wineItem->rect.bottom < rect.top) continue; TREEVIEW_DrawItem(infoPtr, hdc, wineItem); } } TREEVIEW_UpdateScrollBars(infoPtr); if (infoPtr->cdmode & CDRF_NOTIFYPOSTPAINT) infoPtr->cdmode = TREEVIEW_SendCustomDrawNotify(infoPtr, CDDS_POSTPAINT, hdc, rect); } static void TREEVIEW_QueueRefresh(TREEVIEW_INFO *infoPtr) { InvalidateRect(infoPtr->hwnd, NULL, TRUE); } /* It be that item->rect is out of date. If so, we invalidate the wrong area, * but then whoever updates item->rect knows that they must invalidate after * correcting it. */ static void TREEVIEW_QueueItemRefresh(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item) { if (item != NULL) InvalidateRect(infoPtr->hwnd, &item->rect, TRUE); } static LRESULT TREEVIEW_Paint(TREEVIEW_INFO *infoPtr, WPARAM wParam) { HDC hdc; PAINTSTRUCT ps; RECT rc; TRACE("\n"); if (wParam) { hdc = (HDC)wParam; GetUpdateRect(infoPtr->hwnd, &rc, TRUE); } else { hdc = BeginPaint(infoPtr->hwnd, &ps); rc = ps.rcPaint; } if(infoPtr->bRedraw) /* WM_SETREDRAW sets bRedraw */ TREEVIEW_Refresh(infoPtr, hdc, &rc); if (!wParam) EndPaint(infoPtr->hwnd, &ps); return 0; } /* Sorting **************************************************************/ /*************************************************************************** * Forward the DPA local callback to the treeview owner callback */ static INT WINAPI TREEVIEW_CallBackCompare(TREEVIEW_ITEM *first, TREEVIEW_ITEM *second, LPTVSORTCB pCallBackSort) { /* Forward the call to the client-defined callback */ return pCallBackSort->lpfnCompare(first->lParam, second->lParam, pCallBackSort->lParam); } /*************************************************************************** * Treeview native sort routine: sort on item text. */ static INT WINAPI TREEVIEW_SortOnName(TREEVIEW_ITEM *first, TREEVIEW_ITEM *second, TREEVIEW_INFO *infoPtr) { TREEVIEW_UpdateDispInfo(infoPtr, first, TVIF_TEXT); TREEVIEW_UpdateDispInfo(infoPtr, second, TVIF_TEXT); return strcasecmp(first->pszText, second->pszText); } /* Returns the number of physical children belonging to item. */ static INT TREEVIEW_CountChildren(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item) { INT cChildren = 0; HTREEITEM hti; for (hti = item->firstChild; hti != NULL; hti = hti->nextSibling) cChildren++; return cChildren; } /* Returns a DPA containing a pointer to each physical child of item in * sibling order. If item has no children, an empty DPA is returned. */ static HDPA TREEVIEW_BuildChildDPA(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item) { HTREEITEM child = item->firstChild; HDPA list = DPA_Create(8); if (list == 0) return NULL; for (child = item->firstChild; child != NULL; child = child->nextSibling) { if (DPA_InsertPtr(list, INT_MAX, child) == -1) { DPA_Destroy(list); return NULL; } } return list; } /*************************************************************************** * Setup the treeview structure with regards of the sort method * and sort the children of the TV item specified in lParam * fRecurse: currently unused. Should be zero. * parent: if pSort!=NULL, should equal pSort->hParent. * otherwise, item which child items are to be sorted. * pSort: sort method info. if NULL, sort on item text. * if non-NULL, sort on item's lParam content, and let the * application decide what that means. See also TVM_SORTCHILDRENCB. */ static LRESULT TREEVIEW_Sort(TREEVIEW_INFO *infoPtr, BOOL fRecurse, HTREEITEM parent, LPTVSORTCB pSort) { INT cChildren; PFNDPACOMPARE pfnCompare; LPARAM lpCompare; /* undocumented feature: TVI_ROOT means `sort the whole tree' */ if (parent == TVI_ROOT) parent = infoPtr->root; /* Check for a valid handle to the parent item */ if (!TREEVIEW_ValidItem(infoPtr, parent)) { ERR("invalid item hParent=%x\n", (INT)parent); return FALSE; } if (pSort) { pfnCompare = (PFNDPACOMPARE)TREEVIEW_CallBackCompare; lpCompare = (LPARAM)pSort; } else { pfnCompare = (PFNDPACOMPARE)TREEVIEW_SortOnName; lpCompare = (LPARAM)infoPtr; } cChildren = TREEVIEW_CountChildren(infoPtr, parent); /* Make sure there is something to sort */ if (cChildren > 1) { /* TREEVIEW_ITEM rechaining */ INT count = 0; HTREEITEM item = 0; HTREEITEM nextItem = 0; HTREEITEM prevItem = 0; HDPA sortList = TREEVIEW_BuildChildDPA(infoPtr, parent); if (sortList == NULL) return FALSE; /* let DPA sort the list */ DPA_Sort(sortList, pfnCompare, lpCompare); /* The order of DPA entries has been changed, so fixup the * nextSibling and prevSibling pointers. */ item = (HTREEITEM)DPA_GetPtr(sortList, count++); while ((nextItem = (HTREEITEM)DPA_GetPtr(sortList, count++)) != NULL) { /* link the two current item toghether */ item->nextSibling = nextItem; nextItem->prevSibling = item; if (prevItem == NULL) { /* this is the first item, update the parent */ parent->firstChild = item; item->prevSibling = NULL; } else { /* fix the back chaining */ item->prevSibling = prevItem; } /* get ready for the next one */ prevItem = item; item = nextItem; } /* the last item is pointed to by item and never has a sibling */ item->nextSibling = NULL; parent->lastChild = item; DPA_Destroy(sortList); TREEVIEW_VerifyTree(infoPtr); if (parent->state & TVIS_EXPANDED) { int visOrder = infoPtr->firstVisible->visibleOrder; TREEVIEW_RecalculateVisibleOrder(infoPtr, parent); if (TREEVIEW_IsChildOf(parent, infoPtr->firstVisible)) { TREEVIEW_ITEM *item; for (item = infoPtr->root->firstChild; item != NULL; item = TREEVIEW_GetNextListItem(infoPtr, item)) { if (item->visibleOrder == visOrder) break; } TREEVIEW_SetFirstVisible(infoPtr, item, FALSE); } TREEVIEW_QueueRefresh(infoPtr); } return TRUE; } return FALSE; } /*************************************************************************** * Setup the treeview structure with regards of the sort method * and sort the children of the TV item specified in lParam */ static LRESULT TREEVIEW_SortChildrenCB(TREEVIEW_INFO *infoPtr, WPARAM wParam, LPTVSORTCB pSort) { return TREEVIEW_Sort(infoPtr, wParam, pSort->hParent, pSort); } /*************************************************************************** * Sort the children of the TV item specified in lParam. */ static LRESULT TREEVIEW_SortChildren(TREEVIEW_INFO *infoPtr, WPARAM wParam, LPARAM lParam) { return TREEVIEW_Sort(infoPtr, (BOOL)wParam, (HTREEITEM)lParam, NULL); } /* Expansion/Collapse ***************************************************/ static BOOL TREEVIEW_SendExpanding(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem, UINT action) { return !TREEVIEW_SendTreeviewNotify(infoPtr, TVN_ITEMEXPANDINGA, action, TVIF_HANDLE | TVIF_STATE | TVIF_PARAM | TVIF_IMAGE | TVIF_SELECTEDIMAGE, 0, wineItem); } static VOID TREEVIEW_SendExpanded(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem, UINT action) { TREEVIEW_SendTreeviewNotify(infoPtr, TVN_ITEMEXPANDEDA, action, TVIF_HANDLE | TVIF_STATE | TVIF_PARAM | TVIF_IMAGE | TVIF_SELECTEDIMAGE, 0, wineItem); } /* This corresponds to TVM_EXPAND with TVE_COLLAPSE. * bRemoveChildren corresponds to TVE_COLLAPSERESET. */ static BOOL TREEVIEW_Collapse(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem, BOOL bRemoveChildren, BOOL bUser) { UINT action = TVE_COLLAPSE | (bRemoveChildren ? TVE_COLLAPSERESET : 0); BOOL bSetSelection, bSetFirstVisible; TRACE("TVE_COLLAPSE %p %s\n", wineItem, TREEVIEW_ItemName(wineItem)); if (!(wineItem->state & TVIS_EXPANDED) || wineItem->firstChild == NULL) return FALSE; if (bUser) TREEVIEW_SendExpanding(infoPtr, wineItem, action); wineItem->state &= ~TVIS_EXPANDED; if (bUser) TREEVIEW_SendExpanded(infoPtr, wineItem, action); bSetSelection = (infoPtr->selectedItem != NULL && TREEVIEW_IsChildOf(wineItem, infoPtr->selectedItem)); bSetFirstVisible = (infoPtr->firstVisible != NULL && TREEVIEW_IsChildOf(wineItem, infoPtr->firstVisible)); if (bRemoveChildren) { TRACE("TVE_COLLAPSERESET\n"); wineItem->state &= ~TVIS_EXPANDEDONCE; TREEVIEW_RemoveAllChildren(infoPtr, wineItem); } if (wineItem->firstChild) { TREEVIEW_ITEM *item, *sibling; sibling = TREEVIEW_GetNextListItem(infoPtr, wineItem); for (item = wineItem->firstChild; item != sibling; item = TREEVIEW_GetNextListItem(infoPtr, item)) { item->visibleOrder = -1; } } TREEVIEW_RecalculateVisibleOrder(infoPtr, wineItem); TREEVIEW_SetFirstVisible(infoPtr, bSetFirstVisible ? wineItem : infoPtr->firstVisible, TRUE); if (bSetSelection) { /* Don't call DoSelectItem, it sends notifications. */ if (TREEVIEW_ValidItem(infoPtr, infoPtr->selectedItem)) infoPtr->selectedItem->state &= ~TVIS_SELECTED; wineItem->state |= TVIS_SELECTED; infoPtr->selectedItem = wineItem; TREEVIEW_EnsureVisible(infoPtr, wineItem, FALSE); } TREEVIEW_UpdateScrollBars(infoPtr); TREEVIEW_QueueRefresh(infoPtr); return TRUE; } static BOOL TREEVIEW_Expand(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem, BOOL bExpandPartial, BOOL bUser) { TRACE("\n"); if (!TREEVIEW_HasChildren(infoPtr, wineItem) || wineItem->state & TVIS_EXPANDED) return FALSE; TRACE("TVE_EXPAND %p %s\n", wineItem, TREEVIEW_ItemName(wineItem)); if (bUser || !(wineItem->state & TVIS_EXPANDEDONCE)) { if (!TREEVIEW_SendExpanding(infoPtr, wineItem, TVE_EXPAND)) { TRACE(" TVN_ITEMEXPANDING returned TRUE, exiting...\n"); return FALSE; } wineItem->state |= TVIS_EXPANDED; TREEVIEW_SendExpanded(infoPtr, wineItem, TVE_EXPAND); wineItem->state |= TVIS_EXPANDEDONCE; } else { /* this item has already been expanded */ wineItem->state |= TVIS_EXPANDED; } if (bExpandPartial) FIXME("TVE_EXPANDPARTIAL not implemented\n"); TREEVIEW_RecalculateVisibleOrder(infoPtr, wineItem); TREEVIEW_UpdateSubTree(infoPtr, wineItem); TREEVIEW_UpdateScrollBars(infoPtr); /* Scroll up so that as many children as possible are visible. * This looses when expanding causes an HScroll bar to appear, but we * don't know that yet, so the last item is obscured. */ if (wineItem->firstChild != NULL) { int nChildren = wineItem->lastChild->visibleOrder - wineItem->firstChild->visibleOrder + 1; int visible_pos = wineItem->visibleOrder - infoPtr->firstVisible->visibleOrder; int rows_below = TREEVIEW_GetVisibleCount(infoPtr) - visible_pos - 1; if (visible_pos > 0 && nChildren > rows_below) { int scroll = nChildren - rows_below; if (scroll > visible_pos) scroll = visible_pos; if (scroll > 0) { TREEVIEW_ITEM *newFirstVisible = TREEVIEW_GetListItem(infoPtr, infoPtr->firstVisible, scroll); TREEVIEW_SetFirstVisible(infoPtr, newFirstVisible, TRUE); } } } TREEVIEW_QueueRefresh(infoPtr); return TRUE; } static BOOL TREEVIEW_Toggle(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *wineItem, BOOL bUser) { TRACE("\n"); if (wineItem->state & TVIS_EXPANDED) return TREEVIEW_Collapse(infoPtr, wineItem, FALSE, bUser); else return TREEVIEW_Expand(infoPtr, wineItem, FALSE, bUser); } static VOID TREEVIEW_ExpandAll(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item) { TREEVIEW_Expand(infoPtr, item, FALSE, TRUE); for (item = item->firstChild; item != NULL; item = item->nextSibling) { if (TREEVIEW_HasChildren(infoPtr, item)) TREEVIEW_ExpandAll(infoPtr, item); } } /* Note:If the specified item is the child of a collapsed parent item, the parent's list of child items is (recursively) expanded to reveal the specified item. This is mentioned for TREEVIEW_SelectItem; don't know if it also applies here. */ static LRESULT TREEVIEW_ExpandMsg(TREEVIEW_INFO *infoPtr, UINT flag, HTREEITEM wineItem) { if (!TREEVIEW_ValidItem(infoPtr, wineItem)) return 0; TRACE("For (%s) item:%d, flags %x, state:%d\n", TREEVIEW_ItemName(wineItem), flag, TREEVIEW_GetItemIndex(infoPtr, wineItem), wineItem->state); switch (flag & TVE_TOGGLE) { case TVE_COLLAPSE: return TREEVIEW_Collapse(infoPtr, wineItem, flag & TVE_COLLAPSERESET, FALSE); case TVE_EXPAND: return TREEVIEW_Expand(infoPtr, wineItem, flag & TVE_EXPANDPARTIAL, FALSE); case TVE_TOGGLE: return TREEVIEW_Toggle(infoPtr, wineItem, TRUE); default: return 0; } #if 0 TRACE("Exiting, Item %p state is now %d...\n", wineItem, wineItem->state); #endif } /* Hit-Testing **********************************************************/ static TREEVIEW_ITEM * TREEVIEW_HitTestPoint(TREEVIEW_INFO *infoPtr, POINT pt) { TREEVIEW_ITEM *wineItem; LONG row; if (!infoPtr->firstVisible) return NULL; row = pt.y / infoPtr->uItemHeight + infoPtr->firstVisible->visibleOrder; for (wineItem = infoPtr->firstVisible; wineItem != NULL; wineItem = TREEVIEW_GetNextListItem(infoPtr, wineItem)) { if (row >= wineItem->visibleOrder && row < wineItem->visibleOrder + wineItem->iIntegral) break; } return wineItem; } static LRESULT TREEVIEW_HitTest(TREEVIEW_INFO *infoPtr, LPTVHITTESTINFO lpht) { TREEVIEW_ITEM *wineItem; RECT rect; UINT status; LONG x, y; lpht->hItem = 0; GetClientRect(infoPtr->hwnd, &rect); status = 0; x = lpht->pt.x; y = lpht->pt.y; if (x < rect.left) { status |= TVHT_TOLEFT; } else if (x > rect.right) { status |= TVHT_TORIGHT; } if (y < rect.top) { status |= TVHT_ABOVE; } else if (y > rect.bottom) { status |= TVHT_BELOW; } if (status) { lpht->flags = status; return (LRESULT)(HTREEITEM)NULL; } wineItem = TREEVIEW_HitTestPoint(infoPtr, lpht->pt); if (!wineItem) { lpht->flags = TVHT_NOWHERE; return (LRESULT)(HTREEITEM)NULL; } if (x >= wineItem->textOffset + wineItem->textWidth) { lpht->flags = TVHT_ONITEMRIGHT; } else if (x >= wineItem->textOffset) { lpht->flags = TVHT_ONITEMLABEL; } else if (x >= wineItem->imageOffset) { lpht->flags = TVHT_ONITEMICON; } else if (x >= wineItem->stateOffset) { lpht->flags = TVHT_ONITEMSTATEICON; } else if (x >= wineItem->linesOffset && infoPtr->dwStyle & TVS_HASBUTTONS) { lpht->flags = TVHT_ONITEMBUTTON; } else { lpht->flags = TVHT_ONITEMINDENT; } lpht->hItem = wineItem; TRACE("(%ld,%ld):result %x\n", lpht->pt.x, lpht->pt.y, lpht->flags); return (LRESULT)wineItem; } /* Item Label Editing ***************************************************/ static LRESULT TREEVIEW_GetEditControl(TREEVIEW_INFO *infoPtr) { return infoPtr->hwndEdit; } static LRESULT CALLBACK TREEVIEW_Edit_SubclassProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr; BOOL bCancel = FALSE; switch (uMsg) { case WM_PAINT: { LRESULT rc; TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(GetParent(hwnd)); TRACE("WM_PAINT start\n"); rc = CallWindowProcA(infoPtr->wpEditOrig, hwnd, uMsg, wParam, lParam); TRACE("WM_PAINT done\n"); return rc; } case WM_KILLFOCUS: { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(GetParent(hwnd)); if (infoPtr->bIgnoreEditKillFocus) return TRUE; break; } case WM_GETDLGCODE: return DLGC_WANTARROWS | DLGC_WANTALLKEYS; case WM_KEYDOWN: if (wParam == (WPARAM)VK_ESCAPE) { bCancel = TRUE; break; } else if (wParam == (WPARAM)VK_RETURN) { break; } /* fall through */ default: { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(GetParent(hwnd)); return CallWindowProcA(infoPtr->wpEditOrig, hwnd, uMsg, wParam, lParam); } } /* Processing TVN_ENDLABELEDIT message could kill the focus */ /* eg. Using a messagebox */ infoPtr = TREEVIEW_GetInfoPtr(GetParent(hwnd)); infoPtr->bIgnoreEditKillFocus = TRUE; TREEVIEW_EndEditLabelNow(infoPtr, bCancel || !infoPtr->bLabelChanged); infoPtr->bIgnoreEditKillFocus = FALSE; return 0; } /* should handle edit control messages here */ static LRESULT TREEVIEW_Command(TREEVIEW_INFO *infoPtr, WPARAM wParam, LPARAM lParam) { TRACE("%x %ld\n", wParam, lParam); switch (HIWORD(wParam)) { case EN_UPDATE: { /* * Adjust the edit window size */ char buffer[1024]; TREEVIEW_ITEM *editItem = infoPtr->selectedItem; HDC hdc = GetDC(infoPtr->hwndEdit); SIZE sz; int len; HFONT hFont, hOldFont = 0; infoPtr->bLabelChanged = TRUE; len = GetWindowTextA(infoPtr->hwndEdit, buffer, sizeof(buffer)); /* Select font to get the right dimension of the string */ hFont = SendMessageA(infoPtr->hwndEdit, WM_GETFONT, 0, 0); if (hFont != 0) { hOldFont = SelectObject(hdc, hFont); } if (GetTextExtentPoint32A(hdc, buffer, strlen(buffer), &sz)) { TEXTMETRICA textMetric; /* Add Extra spacing for the next character */ GetTextMetricsA(hdc, &textMetric); sz.cx += (textMetric.tmMaxCharWidth * 2); sz.cx = max(sz.cx, textMetric.tmMaxCharWidth * 3); sz.cx = min(sz.cx, infoPtr->clientWidth - editItem->textOffset + 2); SetWindowPos(infoPtr->hwndEdit, HWND_TOP, 0, 0, sz.cx, editItem->rect.bottom - editItem->rect.top + 3, SWP_NOMOVE | SWP_DRAWFRAME); } if (hFont != 0) { SelectObject(hdc, hOldFont); } ReleaseDC(infoPtr->hwnd, hdc); break; } default: return SendMessageA(GetParent(infoPtr->hwnd), WM_COMMAND, wParam, lParam); } return 0; } static HWND TREEVIEW_EditLabelA(TREEVIEW_INFO *infoPtr, HTREEITEM hItem) { HWND hwnd = infoPtr->hwnd; HWND hwndEdit; SIZE sz; TREEVIEW_ITEM *editItem = hItem; HINSTANCE hinst = GetWindowLongA(hwnd, GWL_HINSTANCE); HDC hdc; HFONT hOldFont=0; TEXTMETRICA textMetric; TRACE("%x %p\n", (unsigned)hwnd, hItem); if (!TREEVIEW_ValidItem(infoPtr, editItem)) return (HWND)NULL; if (infoPtr->hwndEdit) return infoPtr->hwndEdit; infoPtr->bLabelChanged = FALSE; /* Make sure that edit item is selected */ TREEVIEW_DoSelectItem(infoPtr, TVGN_CARET, hItem, TVC_UNKNOWN); TREEVIEW_EnsureVisible(infoPtr, hItem, TRUE); TREEVIEW_UpdateDispInfo(infoPtr, editItem, TVIF_TEXT); hdc = GetDC(hwnd); /* Select the font to get appropriate metric dimensions */ if (infoPtr->hFont != 0) { hOldFont = SelectObject(hdc, infoPtr->hFont); } /*Get String Lenght in pixels */ GetTextExtentPoint32A(hdc, editItem->pszText, strlen(editItem->pszText), &sz); /*Add Extra spacing for the next character */ GetTextMetricsA(hdc, &textMetric); sz.cx += (textMetric.tmMaxCharWidth * 2); sz.cx = max(sz.cx, textMetric.tmMaxCharWidth * 3); sz.cx = min(sz.cx, infoPtr->clientWidth - editItem->textOffset + 2); if (infoPtr->hFont != 0) { SelectObject(hdc, hOldFont); } ReleaseDC(hwnd, hdc); hwndEdit = CreateWindowExA(WS_EX_LEFT, "EDIT", 0, WS_CHILD | WS_BORDER | ES_AUTOHSCROLL | WS_CLIPSIBLINGS | ES_WANTRETURN | ES_LEFT, editItem->textOffset - 2, editItem->rect.top - 1, sz.cx + 3, editItem->rect.bottom - editItem->rect.top + 3, hwnd, 0, hinst, 0); /* FIXME: (HMENU)IDTVEDIT,pcs->hInstance,0); */ infoPtr->hwndEdit = hwndEdit; /* Get a 2D border. */ SetWindowLongA(hwndEdit, GWL_EXSTYLE, GetWindowLongA(hwndEdit, GWL_EXSTYLE) & ~WS_EX_CLIENTEDGE); SetWindowLongA(hwndEdit, GWL_STYLE, GetWindowLongA(hwndEdit, GWL_STYLE) | WS_BORDER); SendMessageA(hwndEdit, WM_SETFONT, TREEVIEW_FontForItem(infoPtr, editItem), FALSE); infoPtr->wpEditOrig = (WNDPROC)SetWindowLongA(hwndEdit, GWL_WNDPROC, (DWORD) TREEVIEW_Edit_SubclassProc); if (TREEVIEW_BeginLabelEditNotify(infoPtr, editItem)) { DestroyWindow(hwndEdit); infoPtr->hwndEdit = 0; return (HWND)NULL; } infoPtr->selectedItem = hItem; SetWindowTextA(hwndEdit, editItem->pszText); SetFocus(hwndEdit); SendMessageA(hwndEdit, EM_SETSEL, 0, -1); ShowWindow(hwndEdit, SW_SHOW); return hwndEdit; } static LRESULT TREEVIEW_EndEditLabelNow(TREEVIEW_INFO *infoPtr, BOOL bCancel) { HWND hwnd = infoPtr->hwnd; TREEVIEW_ITEM *editedItem = infoPtr->selectedItem; NMTVDISPINFOA tvdi; BOOL bCommit; char tmpText[1024] = { '\0' }; int iLength = 0; if (!infoPtr->hwndEdit) return FALSE; tvdi.hdr.hwndFrom = hwnd; tvdi.hdr.idFrom = GetWindowLongA(hwnd, GWL_ID); tvdi.hdr.code = TVN_ENDLABELEDITA; tvdi.item.mask = 0; tvdi.item.hItem = editedItem; tvdi.item.state = editedItem->state; tvdi.item.lParam = editedItem->lParam; if (!bCancel) { iLength = GetWindowTextA(infoPtr->hwndEdit, tmpText, 1023); if (iLength >= 1023) { ERR("Insuficient space to retrieve new item label."); } tvdi.item.pszText = tmpText; tvdi.item.cchTextMax = iLength + 1; } else { tvdi.item.pszText = NULL; tvdi.item.cchTextMax = 0; } bCommit = (BOOL)SendMessageA(GetParent(hwnd), WM_NOTIFY, (WPARAM)tvdi.hdr.idFrom, (LPARAM)&tvdi); if (!bCancel && bCommit) /* Apply the changes */ { if (strcmp(tmpText, editedItem->pszText) != 0) { if (NULL == COMCTL32_ReAlloc(editedItem->pszText, iLength + 1)) { ERR("OutOfMemory, cannot allocate space for label"); DestroyWindow(infoPtr->hwndEdit); infoPtr->hwndEdit = 0; return FALSE; } else { editedItem->cchTextMax = iLength + 1; lstrcpyA(editedItem->pszText, tmpText); } } } ShowWindow(infoPtr->hwndEdit, SW_HIDE); DestroyWindow(infoPtr->hwndEdit); infoPtr->hwndEdit = 0; return TRUE; } static LRESULT TREEVIEW_HandleTimer(TREEVIEW_INFO *infoPtr, WPARAM wParam) { if (wParam != TV_EDIT_TIMER) { ERR("got unknown timer\n"); return 1; } KillTimer(infoPtr->hwnd, TV_EDIT_TIMER); infoPtr->Timer &= ~TV_EDIT_TIMER_SET; TREEVIEW_EditLabelA(infoPtr, infoPtr->selectedItem); return 0; } /* Mouse Tracking/Drag **************************************************/ /*************************************************************************** * This is quite unusual piece of code, but that's how it's implemented in * Windows. */ static LRESULT TREEVIEW_TrackMouse(TREEVIEW_INFO *infoPtr, POINT pt) { INT cxDrag = GetSystemMetrics(SM_CXDRAG); INT cyDrag = GetSystemMetrics(SM_CYDRAG); RECT r; MSG msg; r.top = pt.y - cyDrag; r.left = pt.x - cxDrag; r.bottom = pt.y + cyDrag; r.right = pt.x + cxDrag; SetCapture(infoPtr->hwnd); while (1) { if (PeekMessageA(&msg, 0, 0, 0, PM_REMOVE | PM_NOYIELD)) { if (msg.message == WM_MOUSEMOVE) { pt.x = SLOWORD(msg.lParam); pt.y = SHIWORD(msg.lParam); if (PtInRect(&r, pt)) continue; else { ReleaseCapture(); return 1; } } else if (msg.message >= WM_LBUTTONDOWN && msg.message <= WM_RBUTTONDBLCLK) { if (msg.message == WM_RBUTTONUP) TREEVIEW_RButtonUp(infoPtr, &pt); break; } DispatchMessageA(&msg); } if (GetCapture() != infoPtr->hwnd) return 0; } ReleaseCapture(); return 0; } static LRESULT TREEVIEW_LButtonDoubleClick(TREEVIEW_INFO *infoPtr, LPARAM lParam) { TREEVIEW_ITEM *wineItem; TVHITTESTINFO hit; TRACE("\n"); SetFocus(infoPtr->hwnd); if (infoPtr->Timer & TV_EDIT_TIMER_SET) { /* If there is pending 'edit label' event - kill it now */ KillTimer(infoPtr->hwnd, TV_EDIT_TIMER); } hit.pt.x = SLOWORD(lParam); hit.pt.y = SHIWORD(lParam); wineItem = (TREEVIEW_ITEM *)TREEVIEW_HitTest(infoPtr, &hit); if (!wineItem) return 0; TRACE("item %d \n", TREEVIEW_GetItemIndex(infoPtr, wineItem)); if (TREEVIEW_SendSimpleNotify(infoPtr, NM_DBLCLK) == FALSE) { /* FIXME! */ switch (hit.flags) { case TVHT_ONITEMRIGHT: /* FIXME: we should not have send NM_DBLCLK in this case. */ break; case TVHT_ONITEMINDENT: if (!(infoPtr->dwStyle & TVS_HASLINES)) { break; } else { int level = hit.pt.x / infoPtr->uIndent; if (!(infoPtr->dwStyle & TVS_LINESATROOT)) level++; while (wineItem->iLevel > level) { wineItem = wineItem->parent; } /* fall through */ } case TVHT_ONITEMLABEL: case TVHT_ONITEMICON: case TVHT_ONITEMBUTTON: TREEVIEW_Toggle(infoPtr, wineItem, TRUE); break; case TVHT_ONITEMSTATEICON: if (infoPtr->dwStyle & TVS_CHECKBOXES) TREEVIEW_ToggleItemState(infoPtr, wineItem); else TREEVIEW_Toggle(infoPtr, wineItem, TRUE); break; } } return TRUE; } static LRESULT TREEVIEW_LButtonDown(TREEVIEW_INFO *infoPtr, LPARAM lParam) { HWND hwnd = infoPtr->hwnd; TVHITTESTINFO ht; BOOL bTrack; HTREEITEM tempItem; /* If Edit control is active - kill it and return. * The best way to do it is to set focus to itself. * Edit control subclassed procedure will automatically call * EndEditLabelNow. */ if (infoPtr->hwndEdit) { SetFocus(hwnd); return 0; } ht.pt.x = SLOWORD(lParam); ht.pt.y = SHIWORD(lParam); TREEVIEW_HitTest(infoPtr, &ht); TRACE("item %d \n", TREEVIEW_GetItemIndex(infoPtr, ht.hItem)); /* update focusedItem and redraw both items */ if(ht.hItem && (ht.flags & TVHT_ONITEM)) { infoPtr->focusedItem = ht.hItem; InvalidateRect(hwnd, &(((HTREEITEM)(ht.hItem))->rect), TRUE); if(infoPtr->selectedItem) InvalidateRect(hwnd, &(infoPtr->selectedItem->rect), TRUE); } bTrack = (ht.flags & TVHT_ONITEM) && !(infoPtr->dwStyle & TVS_DISABLEDRAGDROP); /* Send NM_CLICK right away */ if (!bTrack) if (TREEVIEW_SendSimpleNotify(infoPtr, NM_CLICK)) goto setfocus; if (ht.flags & TVHT_ONITEMBUTTON) { TREEVIEW_Toggle(infoPtr, ht.hItem, TRUE); goto setfocus; } else if (bTrack) { /* if TREEVIEW_TrackMouse == 1 dragging occured and the cursor left the dragged item's rectangle */ if (TREEVIEW_TrackMouse(infoPtr, ht.pt)) { TREEVIEW_SendTreeviewDnDNotify(infoPtr, TVN_BEGINDRAGA, ht.hItem, ht.pt); infoPtr->dropItem = ht.hItem; /* clean up focuedItem as we dragged and won't select this item */ if(infoPtr->focusedItem) { /* refresh the item that was focused */ tempItem = infoPtr->focusedItem; infoPtr->focusedItem = 0; InvalidateRect(infoPtr->hwnd, &tempItem->rect, TRUE); /* refresh the selected item to return the filled background */ InvalidateRect(infoPtr->hwnd, &(infoPtr->selectedItem->rect), TRUE); } return 0; } } if (TREEVIEW_SendSimpleNotify(infoPtr, NM_CLICK)) goto setfocus; /* * If the style allow editing and the node is already selected * and the click occured on the item label... */ if ((infoPtr->dwStyle & TVS_EDITLABELS) && (ht.flags & TVHT_ONITEMLABEL) && (infoPtr->selectedItem == ht.hItem)) { if (infoPtr->Timer & TV_EDIT_TIMER_SET) KillTimer(hwnd, TV_EDIT_TIMER); SetTimer(hwnd, TV_EDIT_TIMER, GetDoubleClickTime(), 0); infoPtr->Timer |= TV_EDIT_TIMER_SET; } else if (ht.flags & TVHT_ONITEM) /* select the item if the hit was inside of the icon or text */ { /* * if we are TVS_SINGLEEXPAND then we want this single click to * do a bunch of things. */ if((infoPtr->dwStyle & TVS_SINGLEEXPAND) && (infoPtr->hwndEdit == 0)) { TREEVIEW_ITEM *SelItem; /* * Send the notification */ TREEVIEW_SendTreeviewNotify(infoPtr, TVN_SINGLEEXPAND, TVIF_HANDLE | TVIF_PARAM, 0, ht.hItem, 0); /* * Close the previous selection all the way to the root * as long as the new selection is not a child */ if((infoPtr->selectedItem) && (infoPtr->selectedItem != ht.hItem)) { BOOL closeit = TRUE; SelItem = ht.hItem; /* determine of the hitItem is a child of the currently selected item */ while(closeit && SelItem && TREEVIEW_ValidItem(infoPtr, SelItem) && (SelItem != infoPtr->root)) { closeit = (SelItem != infoPtr->selectedItem); SelItem = SelItem->parent; } if(closeit) { if(TREEVIEW_ValidItem(infoPtr, infoPtr->selectedItem)) SelItem = infoPtr->selectedItem; while(SelItem && (SelItem != ht.hItem) && TREEVIEW_ValidItem(infoPtr, SelItem) && (SelItem != infoPtr->root)) { TREEVIEW_Collapse(infoPtr, SelItem, FALSE, FALSE); SelItem = SelItem->parent; } } } /* * Expand the current item */ TREEVIEW_Expand(infoPtr, ht.hItem, TVE_TOGGLE, FALSE); } /* Select the current item */ TREEVIEW_DoSelectItem(infoPtr, TVGN_CARET, ht.hItem, TVC_BYMOUSE); } else if (ht.flags & TVHT_ONITEMSTATEICON) { /* TVS_CHECKBOXES requires us to toggle the current state */ if (infoPtr->dwStyle & TVS_CHECKBOXES) TREEVIEW_ToggleItemState(infoPtr, ht.hItem); } setfocus: SetFocus(hwnd); return 0; } static LRESULT TREEVIEW_RButtonDown(TREEVIEW_INFO *infoPtr, LPARAM lParam) { TVHITTESTINFO ht; if (infoPtr->hwndEdit) { SetFocus(infoPtr->hwnd); return 0; } ht.pt.x = SLOWORD(lParam); ht.pt.y = SHIWORD(lParam); TREEVIEW_HitTest(infoPtr, &ht); if (TREEVIEW_TrackMouse(infoPtr, ht.pt)) { if (ht.hItem) { TREEVIEW_SendTreeviewDnDNotify(infoPtr, TVN_BEGINRDRAGA, ht.hItem, ht.pt); infoPtr->dropItem = ht.hItem; } } else { SetFocus(infoPtr->hwnd); TREEVIEW_SendSimpleNotify(infoPtr, NM_RCLICK); } return 0; } static LRESULT TREEVIEW_RButtonUp(TREEVIEW_INFO *infoPtr, LPPOINT pPt) { HWND hwnd = infoPtr->hwnd; POINT pt = *pPt; /* Change to screen coordinate for WM_CONTEXTMENU */ ClientToScreen(hwnd, &pt); SendMessageA(hwnd, WM_CONTEXTMENU, (WPARAM)hwnd, MAKELPARAM(pt.x, pt.y)); return 0; } static LRESULT TREEVIEW_CreateDragImage(TREEVIEW_INFO *infoPtr, WPARAM wParam, LPARAM lParam) { TREEVIEW_ITEM *dragItem = (HTREEITEM)lParam; INT cx, cy; HDC hdc, htopdc; HWND hwtop; HBITMAP hbmp, hOldbmp; SIZE size; RECT rc; HFONT hOldFont; TRACE("\n"); if (!(infoPtr->himlNormal)) return 0; if (!dragItem || !TREEVIEW_ValidItem(infoPtr, dragItem)) return 0; TREEVIEW_UpdateDispInfo(infoPtr, dragItem, TVIF_TEXT); hwtop = GetDesktopWindow(); htopdc = GetDC(hwtop); hdc = CreateCompatibleDC(htopdc); hOldFont = SelectObject(hdc, infoPtr->hFont); GetTextExtentPoint32A(hdc, dragItem->pszText, lstrlenA(dragItem->pszText), &size); TRACE("%ld %ld %s %d\n", size.cx, size.cy, dragItem->pszText, lstrlenA(dragItem->pszText)); hbmp = CreateCompatibleBitmap(htopdc, size.cx, size.cy); hOldbmp = SelectObject(hdc, hbmp); ImageList_GetIconSize(infoPtr->himlNormal, &cx, &cy); size.cx += cx; if (cy > size.cy) size.cy = cy; infoPtr->dragList = ImageList_Create(size.cx, size.cy, ILC_COLOR, 10, 10); ImageList_Draw(infoPtr->himlNormal, dragItem->iImage, hdc, 0, 0, ILD_NORMAL); /* ImageList_GetImageInfo (infoPtr->himlNormal, dragItem->hItem, &iminfo); ImageList_AddMasked (infoPtr->dragList, iminfo.hbmImage, CLR_DEFAULT); */ /* draw item text */ SetRect(&rc, cx, 0, size.cx, size.cy); DrawTextA(hdc, dragItem->pszText, lstrlenA(dragItem->pszText), &rc, DT_LEFT); SelectObject(hdc, hOldFont); SelectObject(hdc, hOldbmp); ImageList_Add(infoPtr->dragList, hbmp, 0); DeleteDC(hdc); DeleteObject(hbmp); ReleaseDC(hwtop, htopdc); return (LRESULT)infoPtr->dragList; } /* Selection ************************************************************/ static LRESULT TREEVIEW_DoSelectItem(TREEVIEW_INFO *infoPtr, INT action, HTREEITEM newSelect, INT cause) { TREEVIEW_ITEM *prevSelect; RECT rcFocused; assert(newSelect == NULL || TREEVIEW_ValidItem(infoPtr, newSelect)); TRACE("Entering item %p (%s), flag %x, cause %x, state %d\n", newSelect, TREEVIEW_ItemName(newSelect), action, cause, newSelect ? newSelect->state : 0); /* reset and redraw focusedItem if focusedItem was set so we don't */ /* have to worry about the previously focused item when we set a new one */ if(infoPtr->focusedItem) { rcFocused = (infoPtr->focusedItem)->rect; infoPtr->focusedItem = 0; InvalidateRect(infoPtr->hwnd, &rcFocused, TRUE); } switch (action) { case TVGN_CARET: prevSelect = infoPtr->selectedItem; if (prevSelect == newSelect) return FALSE; if (TREEVIEW_SendTreeviewNotify(infoPtr, TVN_SELCHANGINGA, cause, TVIF_HANDLE | TVIF_STATE | TVIF_PARAM, prevSelect, newSelect)) return FALSE; if (prevSelect) prevSelect->state &= ~TVIS_SELECTED; if (newSelect) newSelect->state |= TVIS_SELECTED; infoPtr->selectedItem = newSelect; TREEVIEW_EnsureVisible(infoPtr, infoPtr->selectedItem, FALSE); TREEVIEW_SendTreeviewNotify(infoPtr, TVN_SELCHANGEDA, cause, TVIF_HANDLE | TVIF_STATE | TVIF_PARAM, prevSelect, newSelect); TREEVIEW_QueueItemRefresh(infoPtr, prevSelect); TREEVIEW_QueueItemRefresh(infoPtr, newSelect); break; case TVGN_DROPHILITE: prevSelect = infoPtr->dropItem; if (prevSelect) prevSelect->state &= ~TVIS_DROPHILITED; infoPtr->dropItem = newSelect; if (newSelect) newSelect->state |= TVIS_DROPHILITED; TREEVIEW_QueueItemRefresh(infoPtr, prevSelect); TREEVIEW_QueueItemRefresh(infoPtr, newSelect); break; case TVGN_FIRSTVISIBLE: TREEVIEW_EnsureVisible(infoPtr, newSelect, FALSE); TREEVIEW_SetFirstVisible(infoPtr, newSelect, TRUE); TREEVIEW_QueueRefresh(infoPtr); break; } TRACE("Leaving state %d\n", newSelect ? newSelect->state : 0); return TRUE; } /* FIXME: handle NM_KILLFOCUS etc */ static LRESULT TREEVIEW_SelectItem(TREEVIEW_INFO *infoPtr, INT wParam, HTREEITEM item) { if (item != NULL && !TREEVIEW_ValidItem(infoPtr, item)) return FALSE; TRACE("%p (%s) %d\n", item, TREEVIEW_ItemName(item), wParam); if (!TREEVIEW_DoSelectItem(infoPtr, wParam, item, TVC_UNKNOWN)) return FALSE; return TRUE; } /* Scrolling ************************************************************/ static LRESULT TREEVIEW_EnsureVisible(TREEVIEW_INFO *infoPtr, HTREEITEM item, BOOL bHScroll) { HTREEITEM newFirstVisible = NULL; int visible_pos; if (!TREEVIEW_ValidItem(infoPtr, item)) return FALSE; if (!ISVISIBLE(item)) { /* Expand parents as necessary. */ HTREEITEM parent; /* see if we are trying to ensure that root is vislble */ if((item != infoPtr->root) && TREEVIEW_ValidItem(infoPtr, item)) parent = item->parent; else parent = item; /* this item is the topmost item */ while (parent != infoPtr->root) { if (!(parent->state & TVIS_EXPANDED)) TREEVIEW_Expand(infoPtr, parent, FALSE, FALSE); parent = parent->parent; } } TRACE("%p (%s) %ld - %ld\n", item, TREEVIEW_ItemName(item), item->visibleOrder, infoPtr->firstVisible->visibleOrder); visible_pos = item->visibleOrder - infoPtr->firstVisible->visibleOrder; if (visible_pos < 0) { /* item is before the start of the list: put it at the top. */ newFirstVisible = item; } else if (visible_pos >= TREEVIEW_GetVisibleCount(infoPtr) /* Sometimes, before we are displayed, GVC is 0, causing us to * spuriously scroll up. */ && visible_pos > 0) { /* item is past the end of the list. */ int scroll = visible_pos - TREEVIEW_GetVisibleCount(infoPtr); newFirstVisible = TREEVIEW_GetListItem(infoPtr, infoPtr->firstVisible, scroll + 1); } if (bHScroll) { /* Scroll window so item's text is visible as much as possible */ /* Calculation of amount of extra space is taken from EditLabel code */ INT pos, x; TEXTMETRICA textMetric; HDC hdc = GetWindowDC(infoPtr->hwnd); x = item->textWidth; GetTextMetricsA(hdc, &textMetric); ReleaseDC(infoPtr->hwnd, hdc); x += (textMetric.tmMaxCharWidth * 2); x = max(x, textMetric.tmMaxCharWidth * 3); if (item->textOffset < 0) pos = item->textOffset; else if (item->textOffset + x > infoPtr->clientWidth) { if (x > infoPtr->clientWidth) pos = item->textOffset; else pos = item->textOffset + x - infoPtr->clientWidth; } else pos = 0; TREEVIEW_HScroll(infoPtr, MAKEWPARAM(SB_THUMBPOSITION, infoPtr->scrollX + pos)); } if (newFirstVisible != NULL && newFirstVisible != infoPtr->firstVisible) { TREEVIEW_SetFirstVisible(infoPtr, newFirstVisible, TRUE); return TRUE; } return FALSE; } static VOID TREEVIEW_SetFirstVisible(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *newFirstVisible, BOOL bUpdateScrollPos) { int gap_size; TRACE("%p: %s\n", newFirstVisible, TREEVIEW_ItemName(newFirstVisible)); if (newFirstVisible != NULL) { /* Prevent an empty gap from appearing at the bottom... */ gap_size = TREEVIEW_GetVisibleCount(infoPtr) - infoPtr->maxVisibleOrder + newFirstVisible->visibleOrder; if (gap_size > 0) { newFirstVisible = TREEVIEW_GetListItem(infoPtr, newFirstVisible, -gap_size); /* ... unless we just don't have enough items. */ if (newFirstVisible == NULL) newFirstVisible = infoPtr->root->firstChild; } } if (infoPtr->firstVisible != newFirstVisible) { if (infoPtr->firstVisible == NULL || newFirstVisible == NULL) { infoPtr->firstVisible = newFirstVisible; TREEVIEW_QueueRefresh(infoPtr); } else { TREEVIEW_ITEM *item; int scroll = infoPtr->uItemHeight * (infoPtr->firstVisible->visibleOrder - newFirstVisible->visibleOrder); infoPtr->firstVisible = newFirstVisible; for (item = infoPtr->root->firstChild; item != NULL; item = TREEVIEW_GetNextListItem(infoPtr, item)) { item->rect.top += scroll; item->rect.bottom += scroll; } if (bUpdateScrollPos) SetScrollPos(infoPtr->hwnd, SB_VERT, newFirstVisible->visibleOrder, TRUE); ScrollWindow(infoPtr->hwnd, 0, scroll, NULL, NULL); UpdateWindow(infoPtr->hwnd); } } } /************************************************************************ * VScroll is always in units of visible items. i.e. we always have a * visible item aligned to the top of the control. (Unless we have no * items at all.) */ static LRESULT TREEVIEW_VScroll(TREEVIEW_INFO *infoPtr, WPARAM wParam) { TREEVIEW_ITEM *oldFirstVisible = infoPtr->firstVisible; TREEVIEW_ITEM *newFirstVisible = NULL; int nScrollCode = LOWORD(wParam); TRACE("wp %x\n", wParam); if (!(infoPtr->uInternalStatus & TV_VSCROLL)) return 0; if (infoPtr->hwndEdit) SetFocus(infoPtr->hwnd); if (!oldFirstVisible) { assert(infoPtr->root->firstChild == NULL); return 0; } switch (nScrollCode) { case SB_TOP: newFirstVisible = infoPtr->root->firstChild; break; case SB_BOTTOM: newFirstVisible = TREEVIEW_GetLastListItem(infoPtr, infoPtr->root); break; case SB_LINEUP: newFirstVisible = TREEVIEW_GetPrevListItem(infoPtr, oldFirstVisible); break; case SB_LINEDOWN: newFirstVisible = TREEVIEW_GetNextListItem(infoPtr, oldFirstVisible); break; case SB_PAGEUP: newFirstVisible = TREEVIEW_GetListItem(infoPtr, oldFirstVisible, -max(1, TREEVIEW_GetVisibleCount(infoPtr))); break; case SB_PAGEDOWN: newFirstVisible = TREEVIEW_GetListItem(infoPtr, oldFirstVisible, max(1, TREEVIEW_GetVisibleCount(infoPtr))); break; case SB_THUMBTRACK: case SB_THUMBPOSITION: newFirstVisible = TREEVIEW_GetListItem(infoPtr, infoPtr->root->firstChild, (LONG)(SHORT)HIWORD(wParam)); break; case SB_ENDSCROLL: return 0; } if (newFirstVisible != NULL) { if (newFirstVisible != oldFirstVisible) TREEVIEW_SetFirstVisible(infoPtr, newFirstVisible, nScrollCode != SB_THUMBTRACK); else if (nScrollCode == SB_THUMBPOSITION) SetScrollPos(infoPtr->hwnd, SB_VERT, newFirstVisible->visibleOrder, TRUE); } return 0; } static LRESULT TREEVIEW_HScroll(TREEVIEW_INFO *infoPtr, WPARAM wParam) { int maxWidth; int scrollX = infoPtr->scrollX; int nScrollCode = LOWORD(wParam); TRACE("wp %x\n", wParam); if (!(infoPtr->uInternalStatus & TV_HSCROLL)) return FALSE; if (infoPtr->hwndEdit) SetFocus(infoPtr->hwnd); maxWidth = infoPtr->treeWidth - infoPtr->clientWidth; /* shall never occure */ if (maxWidth <= 0) { scrollX = 0; goto scroll; } switch (nScrollCode) { case SB_LINELEFT: scrollX -= infoPtr->uItemHeight; break; case SB_LINERIGHT: scrollX += infoPtr->uItemHeight; break; case SB_PAGELEFT: scrollX -= infoPtr->clientWidth; break; case SB_PAGERIGHT: scrollX += infoPtr->clientWidth; break; case SB_THUMBTRACK: case SB_THUMBPOSITION: scrollX = (int)(SHORT)HIWORD(wParam); break; case SB_ENDSCROLL: return 0; } if (scrollX > maxWidth) scrollX = maxWidth; else if (scrollX < 0) scrollX = 0; scroll: if (scrollX != infoPtr->scrollX) { TREEVIEW_ITEM *item; LONG scroll_pixels = infoPtr->scrollX - scrollX; for (item = infoPtr->root->firstChild; item != NULL; item = TREEVIEW_GetNextListItem(infoPtr, item)) { item->linesOffset += scroll_pixels; item->stateOffset += scroll_pixels; item->imageOffset += scroll_pixels; item->textOffset += scroll_pixels; } ScrollWindow(infoPtr->hwnd, scroll_pixels, 0, NULL, NULL); infoPtr->scrollX = scrollX; UpdateWindow(infoPtr->hwnd); } if (nScrollCode != SB_THUMBTRACK) SetScrollPos(infoPtr->hwnd, SB_HORZ, scrollX, TRUE); return 0; } static LRESULT TREEVIEW_MouseWheel(TREEVIEW_INFO *infoPtr, WPARAM wParam) { short gcWheelDelta; UINT pulScrollLines = 3; if (infoPtr->firstVisible == NULL) return TRUE; SystemParametersInfoW(SPI_GETWHEELSCROLLLINES, 0, &pulScrollLines, 0); gcWheelDelta = -(short)HIWORD(wParam); pulScrollLines *= (gcWheelDelta / WHEEL_DELTA); if (abs(gcWheelDelta) >= WHEEL_DELTA && pulScrollLines) { int newDy = infoPtr->firstVisible->visibleOrder + pulScrollLines; int maxDy = infoPtr->maxVisibleOrder; if (newDy > maxDy) newDy = maxDy; if (newDy < 0) newDy = 0; TREEVIEW_VScroll(infoPtr, MAKEWPARAM(SB_THUMBPOSITION, newDy)); } return TRUE; } /* Create/Destroy *******************************************************/ static LRESULT TREEVIEW_Create(HWND hwnd) { RECT rcClient; TREEVIEW_INFO *infoPtr; TRACE("wnd %x, style %lx\n", hwnd, GetWindowLongA(hwnd, GWL_STYLE)); infoPtr = (TREEVIEW_INFO *)COMCTL32_Alloc(sizeof(TREEVIEW_INFO)); if (infoPtr == NULL) { ERR("could not allocate info memory!\n"); return 0; } SetWindowLongA(hwnd, 0, (DWORD)infoPtr); infoPtr->hwnd = hwnd; infoPtr->dwStyle = GetWindowLongA(hwnd, GWL_STYLE); infoPtr->uInternalStatus = 0; infoPtr->Timer = 0; infoPtr->uNumItems = 0; infoPtr->cdmode = 0; infoPtr->uScrollTime = 300; /* milliseconds */ infoPtr->bRedraw = TRUE; GetClientRect(hwnd, &rcClient); /* No scroll bars yet. */ infoPtr->clientWidth = rcClient.right; infoPtr->clientHeight = rcClient.bottom; infoPtr->treeWidth = 0; infoPtr->treeHeight = 0; infoPtr->uIndent = 19; infoPtr->selectedItem = 0; infoPtr->focusedItem = 0; /* hotItem? */ infoPtr->firstVisible = 0; infoPtr->maxVisibleOrder = 0; infoPtr->dropItem = 0; infoPtr->insertMarkItem = 0; infoPtr->insertBeforeorAfter = 0; /* dragList */ infoPtr->scrollX = 0; infoPtr->clrBk = GetSysColor(COLOR_WINDOW); infoPtr->clrText = -1; /* use system color */ infoPtr->clrLine = RGB(128, 128, 128); infoPtr->clrInsertMark = GetSysColor(COLOR_BTNTEXT); /* hwndToolTip */ infoPtr->hwndEdit = 0; infoPtr->wpEditOrig = NULL; infoPtr->bIgnoreEditKillFocus = FALSE; infoPtr->bLabelChanged = FALSE; infoPtr->himlNormal = NULL; infoPtr->himlState = NULL; infoPtr->normalImageWidth = 0; infoPtr->normalImageHeight = 0; infoPtr->stateImageWidth = 0; infoPtr->stateImageHeight = 0; infoPtr->items = DPA_Create(16); infoPtr->hFont = GetStockObject(DEFAULT_GUI_FONT); infoPtr->hBoldFont = TREEVIEW_CreateBoldFont(infoPtr->hFont); infoPtr->uItemHeight = TREEVIEW_NaturalHeight(infoPtr); infoPtr->root = TREEVIEW_AllocateItem(infoPtr); infoPtr->root->state = TVIS_EXPANDED; infoPtr->root->iLevel = -1; infoPtr->root->visibleOrder = -1; #if 0 infoPtr->hwndNotify = GetParent32 (hwnd); infoPtr->bTransparent = ( GetWindowLongA( hwnd, GWL_STYLE) & TBSTYLE_FLAT); #endif infoPtr->hwndToolTip = 0; if (!(infoPtr->dwStyle & TVS_NOTOOLTIPS)) infoPtr->hwndToolTip = COMCTL32_CreateToolTip(hwnd); if (infoPtr->dwStyle & TVS_CHECKBOXES) { RECT rc; HBITMAP hbm, hbmOld; HDC hdc; int nIndex; infoPtr->himlState = ImageList_Create(16, 16, ILC_COLOR | ILC_MASK, 3, 0); hdc = CreateCompatibleDC(0); hbm = CreateCompatibleBitmap(hdc, 48, 16); hbmOld = SelectObject(hdc, hbm); rc.left = 0; rc.top = 0; rc.right = 48; rc.bottom = 16; FillRect(hdc, &rc, (HBRUSH)(COLOR_WINDOW+1)); rc.left = 18; rc.top = 2; rc.right = 30; rc.bottom = 14; DrawFrameControl(hdc, &rc, DFC_BUTTON, DFCS_BUTTONCHECK|DFCS_FLAT); rc.left = 34; rc.right = 46; DrawFrameControl(hdc, &rc, DFC_BUTTON, DFCS_BUTTONCHECK|DFCS_FLAT|DFCS_CHECKED); nIndex = ImageList_AddMasked(infoPtr->himlState, hbm, GetSysColor(COLOR_WINDOW)); TRACE("chckbox index %d\n", nIndex); SelectObject(hdc, hbmOld); DeleteObject(hbm); DeleteDC(hdc); infoPtr->stateImageWidth = 16; infoPtr->stateImageHeight = 16; } return 0; } static LRESULT TREEVIEW_Destroy(TREEVIEW_INFO *infoPtr) { TRACE("\n"); TREEVIEW_RemoveTree(infoPtr); /* tool tip is automatically destroyed: we are its owner */ /* Restore original windproc. */ if (infoPtr->hwndEdit) SetWindowLongA(infoPtr->hwndEdit, GWL_WNDPROC, (LONG)infoPtr->wpEditOrig); /* Deassociate treeview from the window before doing anything drastic. */ SetWindowLongA(infoPtr->hwnd, 0, (LONG)NULL); DeleteObject(infoPtr->hBoldFont); COMCTL32_Free(infoPtr); return 0; } /* Miscellaneous Messages ***********************************************/ static LRESULT TREEVIEW_ScrollKeyDown(TREEVIEW_INFO *infoPtr, WPARAM key) { static const struct { unsigned char code; } scroll[] = { #define SCROLL_ENTRY(dir, code) { ((dir) << 7) | (code) } SCROLL_ENTRY(SB_VERT, SB_PAGEUP), /* VK_PRIOR */ SCROLL_ENTRY(SB_VERT, SB_PAGEDOWN), /* VK_NEXT */ SCROLL_ENTRY(SB_VERT, SB_BOTTOM), /* VK_END */ SCROLL_ENTRY(SB_VERT, SB_TOP), /* VK_HOME */ SCROLL_ENTRY(SB_HORZ, SB_LINEUP), /* VK_LEFT */ SCROLL_ENTRY(SB_VERT, SB_LINEUP), /* VK_UP */ SCROLL_ENTRY(SB_HORZ, SB_LINEDOWN), /* VK_RIGHT */ SCROLL_ENTRY(SB_VERT, SB_LINEDOWN) /* VK_DOWN */ #undef SCROLL_ENTRY }; if (key >= VK_PRIOR && key <= VK_DOWN) { unsigned char code = scroll[key - VK_PRIOR].code; (((code & (1 << 7)) == (SB_HORZ << 7)) ? TREEVIEW_HScroll : TREEVIEW_VScroll)(infoPtr, code & 0x7F); } return 0; } /************************************************************************ * TREEVIEW_KeyDown * * VK_UP Move selection to the previous non-hidden item. * VK_DOWN Move selection to the next non-hidden item. * VK_HOME Move selection to the first item. * VK_END Move selection to the last item. * VK_LEFT If expanded then collapse, otherwise move to parent. * VK_RIGHT If collapsed then expand, otherwise move to first child. * VK_ADD Expand. * VK_SUBTRACT Collapse. * VK_MULTIPLY Expand all. * VK_PRIOR Move up GetVisibleCount items. * VK_NEXT Move down GetVisibleCount items. * VK_BACK Move to parent. * CTRL-Left,Right,Up,Down,PgUp,PgDown,Home,End: Scroll without changing selection */ static LRESULT TREEVIEW_KeyDown(TREEVIEW_INFO *infoPtr, WPARAM wParam) { /* If it is non-NULL and different, it will be selected and visible. */ TREEVIEW_ITEM *newSelection = NULL; TREEVIEW_ITEM *prevItem = infoPtr->selectedItem; TRACE("%x\n", wParam); if (prevItem == NULL) return FALSE; if (GetAsyncKeyState(VK_CONTROL) & 0x8000) return TREEVIEW_ScrollKeyDown(infoPtr, wParam); switch (wParam) { case VK_UP: newSelection = TREEVIEW_GetPrevListItem(infoPtr, prevItem); if (!newSelection) newSelection = infoPtr->root->firstChild; break; case VK_DOWN: newSelection = TREEVIEW_GetNextListItem(infoPtr, prevItem); break; case VK_HOME: newSelection = infoPtr->root->firstChild; break; case VK_END: newSelection = TREEVIEW_GetLastListItem(infoPtr, infoPtr->root); break; case VK_LEFT: if (prevItem->state & TVIS_EXPANDED) { TREEVIEW_Collapse(infoPtr, prevItem, FALSE, TRUE); } else if (prevItem->parent != infoPtr->root) { newSelection = prevItem->parent; } break; case VK_RIGHT: if (TREEVIEW_HasChildren(infoPtr, prevItem)) { if (!(prevItem->state & TVIS_EXPANDED)) TREEVIEW_Expand(infoPtr, prevItem, FALSE, TRUE); else { newSelection = prevItem->firstChild; } } break; case VK_MULTIPLY: TREEVIEW_ExpandAll(infoPtr, prevItem); break; case VK_ADD: if (!(prevItem->state & TVIS_EXPANDED)) TREEVIEW_Expand(infoPtr, prevItem, FALSE, TRUE); break; case VK_SUBTRACT: if (prevItem->state & TVIS_EXPANDED) TREEVIEW_Collapse(infoPtr, prevItem, FALSE, TRUE); break; case VK_PRIOR: newSelection = TREEVIEW_GetListItem(infoPtr, prevItem, -TREEVIEW_GetVisibleCount(infoPtr)); break; case VK_NEXT: newSelection = TREEVIEW_GetListItem(infoPtr, prevItem, TREEVIEW_GetVisibleCount(infoPtr)); break; case VK_BACK: newSelection = prevItem->parent; if (newSelection == infoPtr->root) newSelection = NULL; break; case VK_SPACE: if (infoPtr->dwStyle & TVS_CHECKBOXES) TREEVIEW_ToggleItemState(infoPtr, prevItem); break; } if (newSelection && newSelection != prevItem) { if (TREEVIEW_DoSelectItem(infoPtr, TVGN_CARET, newSelection, TVC_BYKEYBOARD)) { TREEVIEW_EnsureVisible(infoPtr, newSelection, FALSE); } } return FALSE; } static LRESULT TREEVIEW_Size(TREEVIEW_INFO *infoPtr, WPARAM wParam, LPARAM lParam) { if (wParam == SIZE_RESTORED) { infoPtr->clientWidth = SLOWORD(lParam); infoPtr->clientHeight = SHIWORD(lParam); TREEVIEW_RecalculateVisibleOrder(infoPtr, NULL); TREEVIEW_SetFirstVisible(infoPtr, infoPtr->firstVisible, TRUE); TREEVIEW_UpdateScrollBars(infoPtr); } else { FIXME("WM_SIZE flag %x %lx not handled\n", wParam, lParam); } TREEVIEW_QueueRefresh(infoPtr); return 0; } static LRESULT TREEVIEW_StyleChanged(TREEVIEW_INFO *infoPtr, WPARAM wParam, LPARAM lParam) { TRACE("(%x %lx)\n", wParam, lParam); if (wParam == GWL_STYLE) { DWORD dwNewStyle = ((LPSTYLESTRUCT)lParam)->styleNew; /* we have to take special care about tooltips */ if ((infoPtr->dwStyle ^ dwNewStyle) & TVS_NOTOOLTIPS) { if (infoPtr->dwStyle & TVS_NOTOOLTIPS) { infoPtr->hwndToolTip = COMCTL32_CreateToolTip(infoPtr->hwnd); TRACE("\n"); } else { DestroyWindow(infoPtr->hwndToolTip); infoPtr->hwndToolTip = 0; } } infoPtr->dwStyle = dwNewStyle; } TREEVIEW_UpdateSubTree(infoPtr, infoPtr->root); TREEVIEW_UpdateScrollBars(infoPtr); TREEVIEW_QueueRefresh(infoPtr); return 0; } static LRESULT TREEVIEW_SetFocus(TREEVIEW_INFO *infoPtr) { TRACE("\n"); if (!infoPtr->selectedItem) { TREEVIEW_DoSelectItem(infoPtr, TVGN_CARET, infoPtr->firstVisible, TVC_UNKNOWN); } TREEVIEW_SendSimpleNotify(infoPtr, NM_SETFOCUS); TREEVIEW_QueueItemRefresh(infoPtr, infoPtr->selectedItem); return 0; } static LRESULT TREEVIEW_KillFocus(TREEVIEW_INFO *infoPtr) { TRACE("\n"); TREEVIEW_SendSimpleNotify(infoPtr, NM_KILLFOCUS); TREEVIEW_QueueItemRefresh(infoPtr, infoPtr->selectedItem); return 0; } static LRESULT WINAPI TREEVIEW_WindowProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { TREEVIEW_INFO *infoPtr = TREEVIEW_GetInfoPtr(hwnd); if (infoPtr) TREEVIEW_VerifyTree(infoPtr); else { if (uMsg == WM_CREATE) TREEVIEW_Create(hwnd); else goto def; } switch (uMsg) { case TVM_CREATEDRAGIMAGE: return TREEVIEW_CreateDragImage(infoPtr, wParam, lParam); case TVM_DELETEITEM: return TREEVIEW_DeleteItem(infoPtr, (HTREEITEM)lParam); case TVM_EDITLABELA: return TREEVIEW_EditLabelA(infoPtr, (HTREEITEM)lParam); case TVM_EDITLABELW: FIXME("Unimplemented msg TVM_EDITLABELW\n"); return 0; case TVM_ENDEDITLABELNOW: return TREEVIEW_EndEditLabelNow(infoPtr, (BOOL)wParam); case TVM_ENSUREVISIBLE: return TREEVIEW_EnsureVisible(infoPtr, (HTREEITEM)lParam, TRUE); case TVM_EXPAND: return TREEVIEW_ExpandMsg(infoPtr, (UINT)wParam, (HTREEITEM)lParam); case TVM_GETBKCOLOR: return TREEVIEW_GetBkColor(infoPtr); case TVM_GETCOUNT: return TREEVIEW_GetCount(infoPtr); case TVM_GETEDITCONTROL: return TREEVIEW_GetEditControl(infoPtr); case TVM_GETIMAGELIST: return TREEVIEW_GetImageList(infoPtr, wParam); case TVM_GETINDENT: return TREEVIEW_GetIndent(infoPtr); case TVM_GETINSERTMARKCOLOR: return TREEVIEW_GetInsertMarkColor(infoPtr); case TVM_GETISEARCHSTRINGA: FIXME("Unimplemented msg TVM_GETISEARCHSTRINGA\n"); return 0; case TVM_GETISEARCHSTRINGW: FIXME("Unimplemented msg TVM_GETISEARCHSTRINGW\n"); return 0; case TVM_GETITEMA: return TREEVIEW_GetItemA(infoPtr, (LPTVITEMEXA)lParam); case TVM_GETITEMW: return TREEVIEW_GetItemW(infoPtr, (LPTVITEMEXA)lParam); case TVM_GETITEMHEIGHT: return TREEVIEW_GetItemHeight(infoPtr); case TVM_GETITEMRECT: return TREEVIEW_GetItemRect(infoPtr, (BOOL)wParam, (LPRECT)lParam); case TVM_GETITEMSTATE: return TREEVIEW_GetItemState(infoPtr, (HTREEITEM)wParam, (UINT)lParam); case TVM_GETLINECOLOR: return TREEVIEW_GetLineColor(infoPtr); case TVM_GETNEXTITEM: return TREEVIEW_GetNextItem(infoPtr, (UINT)wParam, (HTREEITEM)lParam); case TVM_GETSCROLLTIME: return TREEVIEW_GetScrollTime(infoPtr); case TVM_GETTEXTCOLOR: return TREEVIEW_GetTextColor(infoPtr); case TVM_GETTOOLTIPS: return TREEVIEW_GetToolTips(infoPtr); case TVM_GETUNICODEFORMAT: FIXME("Unimplemented msg TVM_GETUNICODEFORMAT\n"); return 0; case TVM_GETVISIBLECOUNT: return TREEVIEW_GetVisibleCount(infoPtr); case TVM_HITTEST: return TREEVIEW_HitTest(infoPtr, (LPTVHITTESTINFO)lParam); case TVM_INSERTITEMA: return TREEVIEW_InsertItemA(infoPtr, lParam); case TVM_INSERTITEMW: return TREEVIEW_InsertItemW(infoPtr, lParam); case TVM_SELECTITEM: return TREEVIEW_SelectItem(infoPtr, (INT)wParam, (HTREEITEM)lParam); case TVM_SETBKCOLOR: return TREEVIEW_SetBkColor(infoPtr, (COLORREF)lParam); case TVM_SETIMAGELIST: return TREEVIEW_SetImageList(infoPtr, wParam, (HIMAGELIST)lParam); case TVM_SETINDENT: return TREEVIEW_SetIndent(infoPtr, (UINT)wParam); case TVM_SETINSERTMARK: return TREEVIEW_SetInsertMark(infoPtr, (BOOL)wParam, (HTREEITEM)lParam); case TVM_SETINSERTMARKCOLOR: return TREEVIEW_SetInsertMarkColor(infoPtr, (COLORREF)lParam); case TVM_SETITEMA: return TREEVIEW_SetItemA(infoPtr, (LPTVITEMEXA)lParam); case TVM_SETITEMW: FIXME("Unimplemented msg TVM_SETITEMW\n"); return 0; case TVM_SETLINECOLOR: return TREEVIEW_SetLineColor(infoPtr, (COLORREF)lParam); case TVM_SETITEMHEIGHT: return TREEVIEW_SetItemHeight(infoPtr, (INT)(SHORT)wParam); case TVM_SETSCROLLTIME: return TREEVIEW_SetScrollTime(infoPtr, (UINT)wParam); case TVM_SETTEXTCOLOR: return TREEVIEW_SetTextColor(infoPtr, (COLORREF)lParam); case TVM_SETTOOLTIPS: return TREEVIEW_SetToolTips(infoPtr, (HWND)wParam); case TVM_SETUNICODEFORMAT: FIXME("Unimplemented msg TVM_SETUNICODEFORMAT\n"); return 0; case TVM_SORTCHILDREN: return TREEVIEW_SortChildren(infoPtr, wParam, lParam); case TVM_SORTCHILDRENCB: return TREEVIEW_SortChildrenCB(infoPtr, wParam, (LPTVSORTCB)lParam); /* WM_CHAR */ case WM_COMMAND: return TREEVIEW_Command(infoPtr, wParam, lParam); case WM_DESTROY: return TREEVIEW_Destroy(infoPtr); /* WM_ENABLE */ case WM_ERASEBKGND: return TREEVIEW_EraseBackground(infoPtr, (HDC)wParam); case WM_GETDLGCODE: return DLGC_WANTARROWS | DLGC_WANTCHARS; case WM_GETFONT: return TREEVIEW_GetFont(infoPtr); case WM_HSCROLL: return TREEVIEW_HScroll(infoPtr, wParam); case WM_KEYDOWN: return TREEVIEW_KeyDown(infoPtr, wParam); case WM_KILLFOCUS: return TREEVIEW_KillFocus(infoPtr); case WM_LBUTTONDBLCLK: return TREEVIEW_LButtonDoubleClick(infoPtr, lParam); case WM_LBUTTONDOWN: return TREEVIEW_LButtonDown(infoPtr, lParam); /* WM_MBUTTONDOWN */ /* WM_MOUSEMOVE */ /* WM_NOTIFY */ /* WM_NOTIFYFORMAT */ case WM_PAINT: return TREEVIEW_Paint(infoPtr, wParam); /* WM_PRINTCLIENT */ case WM_RBUTTONDOWN: return TREEVIEW_RButtonDown(infoPtr, lParam); case WM_SETFOCUS: return TREEVIEW_SetFocus(infoPtr); case WM_SETFONT: return TREEVIEW_SetFont(infoPtr, (HFONT)wParam, (BOOL)lParam); case WM_SETREDRAW: return TREEVIEW_SetRedraw(infoPtr, wParam, lParam); case WM_SIZE: return TREEVIEW_Size(infoPtr, wParam, lParam); case WM_STYLECHANGED: return TREEVIEW_StyleChanged(infoPtr, wParam, lParam); /* WM_SYSCOLORCHANGE */ /* WM_SYSKEYDOWN */ case WM_TIMER: return TREEVIEW_HandleTimer(infoPtr, wParam); case WM_VSCROLL: return TREEVIEW_VScroll(infoPtr, wParam); /* WM_WININICHANGE */ case WM_MOUSEWHEEL: if (wParam & (MK_SHIFT | MK_CONTROL)) goto def; return TREEVIEW_MouseWheel(infoPtr, wParam); case WM_DRAWITEM: TRACE("drawItem\n"); goto def; default: /* This mostly catches MFC and Delphi messages. :( */ if (uMsg >= WM_USER) TRACE("Unknown msg %04x wp=%08x lp=%08lx\n", uMsg, wParam, lParam); def: return DefWindowProcA(hwnd, uMsg, wParam, lParam); } return 0; } /* Class Registration ***************************************************/ VOID TREEVIEW_Register(void) { WNDCLASSA wndClass; TRACE("\n"); ZeroMemory(&wndClass, sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS; wndClass.lpfnWndProc = (WNDPROC)TREEVIEW_WindowProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(TREEVIEW_INFO *); wndClass.hCursor = LoadCursorA(0, IDC_ARROWA); wndClass.hbrBackground = 0; wndClass.lpszClassName = WC_TREEVIEWA; RegisterClassA(&wndClass); } VOID TREEVIEW_Unregister(void) { UnregisterClassA(WC_TREEVIEWA, (HINSTANCE) NULL); } /* Tree Verification ****************************************************/ #ifndef NDEBUG static inline void TREEVIEW_VerifyChildren(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item); static inline void TREEVIEW_VerifyItemCommon(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item) { assert(infoPtr != NULL); assert(item != NULL); /* both NULL, or both non-null */ assert((item->firstChild == NULL) == (item->lastChild == NULL)); assert(item->firstChild != item); assert(item->lastChild != item); if (item->firstChild) { assert(item->firstChild->parent == item); assert(item->firstChild->prevSibling == NULL); } if (item->lastChild) { assert(item->lastChild->parent == item); assert(item->lastChild->nextSibling == NULL); } assert(item->nextSibling != item); if (item->nextSibling) { assert(item->nextSibling->parent == item->parent); assert(item->nextSibling->prevSibling == item); } assert(item->prevSibling != item); if (item->prevSibling) { assert(item->prevSibling->parent == item->parent); assert(item->prevSibling->nextSibling == item); } } static inline void TREEVIEW_VerifyItem(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item) { assert(item != NULL); assert(item->parent != NULL); assert(item->parent != item); assert(item->iLevel == item->parent->iLevel + 1); assert(DPA_GetPtrIndex(infoPtr->items, item) != -1); TREEVIEW_VerifyItemCommon(infoPtr, item); TREEVIEW_VerifyChildren(infoPtr, item); } static inline void TREEVIEW_VerifyChildren(TREEVIEW_INFO *infoPtr, TREEVIEW_ITEM *item) { TREEVIEW_ITEM *child; assert(item != NULL); for (child = item->firstChild; child != NULL; child = child->nextSibling) TREEVIEW_VerifyItem(infoPtr, child); } static inline void TREEVIEW_VerifyRoot(TREEVIEW_INFO *infoPtr) { TREEVIEW_ITEM *root = infoPtr->root; assert(root != NULL); assert(root->iLevel == -1); assert(root->parent == NULL); assert(root->prevSibling == NULL); TREEVIEW_VerifyItemCommon(infoPtr, root); TREEVIEW_VerifyChildren(infoPtr, root); } static void TREEVIEW_VerifyTree(TREEVIEW_INFO *infoPtr) { assert(infoPtr != NULL); TREEVIEW_VerifyRoot(infoPtr); } #endif