/* $Id: listbox.cpp,v 1.30 2002-08-07 17:12:40 sandervl Exp $ */ /* * Listbox controls * * Copyright 1996 Alexandre Julliard * Copyright 1999 Christoph Bratschi (ported from WINE) * * Corel version: 20000513 * (WINE version: 991212) * * Status: ??? * Version: ??? */ #include #include #include #include #include "controls.h" #include "winerror.h" #include "combo.h" #include #include "heapstring.h" #define DBG_LOCALLOG DBG_listbox #include "dbglocal.h" /* bugs: - LBS_NOSEL - LBS_USETABSTOPS - Locale handling - OS/2 default font bug: Odin about dialog -> LISTBOX_UpdateSize - WS_EX_NOPARENTNOTIFY - VK_LINEDOWN -> bottom most item not always visible - performance not optimized - first item selection mark not redrawn on new selection - LISTBOX_HandleLButtonDownCombo fails, bug in GetWindowRect or ClientToScreen! I clicked on the vertical scrollbar, this happens: t1: SendInternalMessageA WM_LBUTTONDOWN for 68000009 1 1d00c6 t1: GetClientRect of 68000009 returned (0,0) (191,110) t1: USER32: GetCapture returned 68000009 t1: GetWindowRect 68000009 (450,130) (657,242) t1: ClientToScreen 68000009 (198,29) -> (424,108) mouse position is ok, but screen point is outside window rect!!! the new point is left-top and not on the right!!! */ //CB: drive funtions (… la wine drive.c) #define MAX_DOS_DRIVES 26 //a..z BOOL DRIVE_IsValid( int drive ) { if ((drive < 0) || (drive >= MAX_DOS_DRIVES)) return 0; return (GetLogicalDrives() & (1 << drive)); } /* Items array granularity */ #define LB_ARRAY_GRANULARITY 16 /* Scrolling timeout in ms */ #define LB_SCROLL_TIMEOUT 50 /* Listbox system timer id */ #define LB_TIMER_ID 2 /* Item structure */ typedef struct { LPSTR str; /* Item text */ BOOL selected; /* Is item selected? */ UINT height; /* Item height (only for OWNERDRAWVARIABLE) */ DWORD data; /* User data */ } LB_ITEMDATA; /* Listbox structure */ typedef struct { HANDLE heap; /* Heap for this listbox */ HWND owner; /* Owner window to send notifications to */ UINT style; /* Window style */ INT width; /* Window width */ INT height; /* Window height */ LB_ITEMDATA *items; /* Array of items */ INT nb_items; /* Number of items */ INT top_item; /* Top visible item */ INT selected_item; /* Selected item */ INT focus_item; /* Item that has the focus */ INT anchor_item; /* Anchor item for extended selection */ INT item_height; /* Default item height */ INT page_size; /* Items per listbox page */ INT column_width; /* Column width for multi-column listboxes */ INT horz_extent; /* Horizontal extent (0 if no hscroll) */ INT horz_pos; /* Horizontal position */ INT nb_tabs; /* Number of tabs in array */ INT *tabs; /* Array of tabs */ BOOL caret_on; /* Is caret on? */ BOOL captured; /* Is mouse captured? */ BOOL in_focus; HFONT font; /* Current font */ LCID locale; /* Current locale for string comparisons */ LPHEADCOMBO lphc; /* ComboLBox */ } LB_DESCR; #define IS_OWNERDRAW(descr) \ ((descr)->style & (LBS_OWNERDRAWFIXED | LBS_OWNERDRAWVARIABLE)) #define HAS_STRINGS(descr) \ (!IS_OWNERDRAW(descr) || ((descr)->style & LBS_HASSTRINGS)) #define HAS_NODATA(descr) \ ((descr)->style & LBS_NODATA) #define IS_MULTISELECT(descr) \ ((descr)->style & LBS_MULTIPLESEL || ((descr)->style & LBS_EXTENDEDSEL)) #define SEND_NOTIFICATION(hwnd,descr,code) \ (SendMessageA( (descr)->owner, WM_COMMAND, \ MAKEWPARAM(GetWindowLongA(hwnd,GWL_ID), (code)), hwnd )) /* Current timer status */ typedef enum { LB_TIMER_NONE, LB_TIMER_UP, LB_TIMER_LEFT, LB_TIMER_DOWN, LB_TIMER_RIGHT } TIMER_DIRECTION; static TIMER_DIRECTION LISTBOX_Timer = LB_TIMER_NONE; /*********************************************************************** * LISTBOX_GetCurrentPageSize * * Return the current page size */ static INT LISTBOX_GetCurrentPageSize( HWND hwnd, LB_DESCR *descr ) { INT i, height; if (!(descr->style & LBS_OWNERDRAWVARIABLE)) return descr->page_size; for (i = descr->top_item, height = 0; i < descr->nb_items; i++) { if ((height += descr->items[i].height) > descr->height) break; } if (i == descr->top_item) return 1; else return i - descr->top_item; } /*********************************************************************** * LISTBOX_GetMaxTopIndex * * Return the maximum possible index for the top of the listbox. */ static INT LISTBOX_GetMaxTopIndex( HWND hwnd, LB_DESCR *descr ) { INT max, page; if (descr->style & LBS_OWNERDRAWVARIABLE) { page = descr->height; for (max = descr->nb_items - 1; max >= 0; max--) if ((page -= descr->items[max].height) < 0) break; if (max < descr->nb_items - 1) max++; } else if (descr->style & LBS_MULTICOLUMN) { if ((page = descr->width / descr->column_width) < 1) page = 1; max = (descr->nb_items + descr->page_size - 1) / descr->page_size; max = (max - page) * descr->page_size; } else { max = descr->nb_items - descr->page_size; } if (max < 0) max = 0; return max; } /*********************************************************************** * LISTBOX_UpdateScroll * * Update the scrollbars. Should be called whenever the content * of the listbox changes. */ static void LISTBOX_UpdateScroll( HWND hwnd, LB_DESCR *descr ) { SCROLLINFO info; /* Check the listbox scroll bar flags individually before we call SetScrollInfo otherwise when the listbox style is WS_HSCROLL and no WS_VSCROLL, we end up with an uninitialized, visible horizontal scroll bar when we do not need one. if (!(descr->style & WS_VSCROLL)) return; */ /* It is important that we check descr->style, and not wnd->dwStyle, for WS_VSCROLL, as the former is exactly the one passed in argument to CreateWindow. In Windows (and from now on in Wine :) a listbox created with such a style (no WS_SCROLL) does not update the scrollbar with listbox-related data, thus letting the programmer use it for his/her own purposes. */ if (descr->style & LBS_NOREDRAW) return; info.cbSize = sizeof(info); if (descr->style & LBS_MULTICOLUMN) { info.nMin = 0; info.nMax = (descr->nb_items - 1) / descr->page_size; info.nPos = descr->top_item / descr->page_size; info.nPage = descr->width / descr->column_width; if (info.nPage < 1) info.nPage = 1; info.fMask = SIF_RANGE | SIF_POS | SIF_PAGE; if (descr->style & LBS_DISABLENOSCROLL) info.fMask |= SIF_DISABLENOSCROLL; if (descr->style & WS_HSCROLL) SetScrollInfo( hwnd, SB_HORZ, &info, TRUE ); info.nMax = 0; info.fMask = SIF_RANGE; if (descr->style & WS_VSCROLL) SetScrollInfo( hwnd, SB_VERT, &info, TRUE ); } else { info.nMin = 0; info.nMax = descr->nb_items - 1; info.nPos = descr->top_item; info.nPage = LISTBOX_GetCurrentPageSize( hwnd, descr ); info.fMask = SIF_RANGE | SIF_POS | SIF_PAGE; if (descr->style & LBS_DISABLENOSCROLL) info.fMask |= SIF_DISABLENOSCROLL; if (descr->style & WS_VSCROLL) SetScrollInfo( hwnd, SB_VERT, &info, TRUE ); if (descr->horz_extent) { info.nMin = 0; info.nMax = descr->horz_extent - 1; info.nPos = descr->horz_pos; info.nPage = descr->width; info.fMask = SIF_RANGE | SIF_POS | SIF_PAGE; if (descr->style & LBS_DISABLENOSCROLL) info.fMask |= SIF_DISABLENOSCROLL; if (descr->style & WS_HSCROLL) SetScrollInfo( hwnd, SB_HORZ, &info, TRUE ); } } } /*********************************************************************** * LISTBOX_SetTopItem * * Set the top item of the listbox, scrolling up or down if necessary. */ static LRESULT LISTBOX_SetTopItem( HWND hwnd, LB_DESCR *descr, INT index, BOOL scroll ) { INT max = LISTBOX_GetMaxTopIndex( hwnd, descr ); if (index > max) index = max; if (index < 0) index = 0; if (descr->style & LBS_MULTICOLUMN) index -= index % descr->page_size; if (descr->top_item == index) return LB_OKAY; if (descr->style & LBS_MULTICOLUMN) { INT diff = (descr->top_item - index) / descr->page_size * descr->column_width; if (scroll && (abs(diff) < descr->width)) ScrollWindowEx( hwnd, diff, 0, NULL, NULL, 0, NULL, SW_INVALIDATE | SW_ERASE | SW_SCROLLCHILDREN ); else scroll = FALSE; } else if (scroll) { INT diff; if (descr->style & LBS_OWNERDRAWVARIABLE) { INT i; diff = 0; if (index > descr->top_item) { for (i = index - 1; i >= descr->top_item; i--) diff -= descr->items[i].height; } else { for (i = index; i < descr->top_item; i++) diff += descr->items[i].height; } } else diff = (descr->top_item - index) * descr->item_height; if (abs(diff) < descr->height) ScrollWindowEx( hwnd, 0, diff, NULL, NULL, 0, NULL, SW_INVALIDATE | SW_ERASE | SW_SCROLLCHILDREN ); else scroll = FALSE; } if (!scroll) InvalidateRect( hwnd, NULL, TRUE ); descr->top_item = index; LISTBOX_UpdateScroll( hwnd, descr ); return LB_OKAY; } /*********************************************************************** * LISTBOX_UpdatePage * * Update the page size. Should be called when the size of * the client area or the item height changes. */ static void LISTBOX_UpdatePage( HWND hwnd, LB_DESCR *descr ) { INT page_size; if ((descr->item_height == 0) || (page_size = descr->height / descr->item_height) < 1) page_size = 1; if (page_size == descr->page_size) return; descr->page_size = page_size; if (descr->style & LBS_MULTICOLUMN) InvalidateRect( hwnd, NULL, TRUE ); LISTBOX_SetTopItem( hwnd, descr, descr->top_item, FALSE ); } /*********************************************************************** * LISTBOX_UpdateSize * * Update the size of the listbox. Should be called when the size of * the client area changes. */ static void LISTBOX_UpdateSize( HWND hwnd, LB_DESCR *descr ) { RECT rect, rectWindow; GetWindowRect( hwnd, &rectWindow ); GetClientRect( hwnd, &rect ); //CB: todo: doesn't works in ShellAbout dialog descr->width = rect.right - rect.left; descr->height = rect.bottom - rect.top; if (!(descr->style & LBS_NOINTEGRALHEIGHT) && !(descr->style & LBS_OWNERDRAWVARIABLE)) { if ((descr->height > descr->item_height) && (descr->height % descr->item_height)) { dprintf(("LISTBOX: [%04x]: changing height %d -> %d\n", hwnd, descr->height, descr->height - descr->height%descr->item_height)); SetWindowPos( hwnd, 0, 0, 0, rectWindow.right - rectWindow.left, rectWindow.bottom - rectWindow.top - (descr->height % descr->item_height), SWP_NOZORDER | SWP_NOACTIVATE | SWP_NOMOVE ); return; } } //TRACE("[%04x]: new size = %d,%d\n", // wnd->hwndSelf, descr->width, descr->height ); LISTBOX_UpdatePage( hwnd, descr ); LISTBOX_UpdateScroll( hwnd, descr ); } /*********************************************************************** * LISTBOX_GetItemRect * * Get the rectangle enclosing an item, in listbox client coordinates. * Return 1 if the rectangle is (partially) visible, 0 if hidden, -1 on error. */ static LRESULT LISTBOX_GetItemRect( HWND hwnd, LB_DESCR *descr, INT index, RECT *rect ) { /* Index <= 0 is legal even on empty listboxes */ if (index && (index >= descr->nb_items)) return -1; SetRect( rect, 0, 0, descr->width, descr->height ); if (descr->style & LBS_MULTICOLUMN) { INT col = (index / descr->page_size) - (descr->top_item / descr->page_size); rect->left += col * descr->column_width; rect->right = rect->left + descr->column_width; rect->top += (index % descr->page_size) * descr->item_height; rect->bottom = rect->top + descr->item_height; } else if (descr->style & LBS_OWNERDRAWVARIABLE) { INT i; rect->right += descr->horz_pos; if ((index >= 0) && (index < descr->nb_items)) { if (index < descr->top_item) { for (i = descr->top_item-1; i >= index; i--) rect->top -= descr->items[i].height; } else { for (i = descr->top_item; i < index; i++) rect->top += descr->items[i].height; } rect->bottom = rect->top + descr->items[index].height; } } else { rect->top += (index - descr->top_item) * descr->item_height; rect->bottom = rect->top + descr->item_height; rect->right += descr->horz_pos; } return ((rect->left < descr->width) && (rect->right > 0) && (rect->top < descr->height) && (rect->bottom > 0)); } /*********************************************************************** * LISTBOX_GetItemFromPoint * * Return the item nearest from point (x,y) (in client coordinates). */ static INT LISTBOX_GetItemFromPoint( HWND hwnd, LB_DESCR *descr, INT x, INT y ) { INT index = descr->top_item; if (!descr->nb_items) return -1; /* No items */ if (descr->style & LBS_OWNERDRAWVARIABLE) { INT pos = 0; if (y >= 0) { while (index < descr->nb_items) { if ((pos += descr->items[index].height) > y) break; index++; } } else { while (index > 0) { index--; if ((pos -= descr->items[index].height) <= y) break; } } } else if (descr->style & LBS_MULTICOLUMN) { if (y >= descr->item_height * descr->page_size) return -1; if (y >= 0) index += y / descr->item_height; if (x >= 0) index += (x / descr->column_width) * descr->page_size; else index -= (((x + 1) / descr->column_width) - 1) * descr->page_size; } else { index += (y / descr->item_height); } if (index < 0) return 0; if (index >= descr->nb_items) return -1; return index; } /*********************************************************************** * LISTBOX_DrawItem * * Draw an item. */ static void LISTBOX_DrawItem( HWND hwnd, LB_DESCR *descr, HDC hdc, const RECT *rect, INT index, UINT action ) { LB_ITEMDATA *item = NULL; DWORD dwStyle = GetWindowLongA(hwnd,GWL_STYLE); if (index < descr->nb_items) item = &descr->items[index]; if (IS_OWNERDRAW(descr)) { DRAWITEMSTRUCT dis; UINT id = GetWindowLongA(hwnd,GWL_ID); if (!item) { if (action == ODA_FOCUS) DrawFocusRect( hdc, rect ); //else // FIXME("called with an out of bounds index %d(%d) in owner draw, Not good.\n",index,descr->nb_items); return; } dis.CtlType = ODT_LISTBOX; dis.CtlID = id; dis.hwndItem = hwnd; dis.itemAction = action; dis.hDC = hdc; dis.itemID = index; dis.itemState = 0; if (item && item->selected) dis.itemState |= ODS_SELECTED; if ((descr->focus_item == index) && (descr->caret_on) && (descr->in_focus)) dis.itemState |= ODS_FOCUS; if (dwStyle & WS_DISABLED) dis.itemState |= ODS_DISABLED; dis.itemData = item ? item->data : 0; dis.rcItem = *rect; dprintf2(("[%04x]: drawitem %d (%s) action=%02x " "state=%02x rect=%d,%d-%d,%d\n", hwnd, index, item ? item->str : "", action, dis.itemState, rect->left, rect->top, rect->right, rect->bottom )); SendMessageA(descr->owner, WM_DRAWITEM, id, (LPARAM)&dis); } else { COLORREF oldText = 0, oldBk = 0; if (action == ODA_FOCUS) { DrawFocusRect( hdc, rect ); return; } if (item && item->selected) { oldBk = SetBkColor( hdc, GetSysColor( COLOR_HIGHLIGHT ) ); oldText = SetTextColor( hdc, GetSysColor(COLOR_HIGHLIGHTTEXT)); } //TRACE("[%04x]: painting %d (%s) action=%02x " // "rect=%d,%d-%d,%d\n", // wnd->hwndSelf, index, item ? item->str : "", action, // rect->left, rect->top, rect->right, rect->bottom ); if (!item) ExtTextOutA( hdc, rect->left + 1, rect->top, ETO_OPAQUE | ETO_CLIPPED, rect, NULL, 0, NULL ); else if (!(descr->style & LBS_USETABSTOPS)) ExtTextOutA( hdc, rect->left + 1, rect->top, ETO_OPAQUE | ETO_CLIPPED, rect, item->str, strlen(item->str), NULL ); else { /* Output empty string to paint background in the full width. */ ExtTextOutA( hdc, rect->left + 1, rect->top, ETO_OPAQUE | ETO_CLIPPED, rect, NULL, 0, NULL ); TabbedTextOutA( hdc, rect->left + 1 , rect->top, item->str, strlen(item->str), descr->nb_tabs, descr->tabs, 0); } if (item && item->selected) { SetBkColor( hdc, oldBk ); SetTextColor( hdc, oldText ); } if ((descr->focus_item == index) && (descr->caret_on) && (descr->in_focus)) DrawFocusRect( hdc, rect ); } } /*********************************************************************** * LISTBOX_SetRedraw * * Change the redraw flag. */ static LRESULT LISTBOX_SetRedraw( HWND hwnd, LB_DESCR *descr, BOOL on ) { if (on) { if (!(descr->style & LBS_NOREDRAW)) return 0; descr->style &= ~LBS_NOREDRAW; LISTBOX_UpdateScroll( hwnd, descr ); } else descr->style |= LBS_NOREDRAW; return 0; } /*********************************************************************** * LISTBOX_RepaintItem * * Repaint a single item synchronously. */ static void LISTBOX_RepaintItem( HWND hwnd, LB_DESCR *descr, INT index, UINT action ) { HDC hdc; RECT rect; HFONT oldFont = 0; HBRUSH hbrush, oldBrush = 0; DWORD dwStyle = GetWindowLongA(hwnd,GWL_STYLE); /* Do not repaint the item if the item is not visible */ if ((descr->style & LBS_NOREDRAW) || !IsWindowVisible(hwnd)) return; if (LISTBOX_GetItemRect( hwnd, descr, index, &rect ) != 1) return; if (!(hdc = GetDCEx( hwnd, 0, DCX_CACHE ))) return; if (descr->font) oldFont = SelectObject( hdc, descr->font ); hbrush = SendMessageA( descr->owner, WM_CTLCOLORLISTBOX, hdc, (LPARAM)hwnd ); if (hbrush) oldBrush = SelectObject( hdc, hbrush ); if (dwStyle & WS_DISABLED) SetTextColor( hdc, GetSysColor( COLOR_GRAYTEXT ) ); SetWindowOrgEx( hdc, descr->horz_pos, 0, NULL ); LISTBOX_DrawItem( hwnd, descr, hdc, &rect, index, action ); if (oldFont) SelectObject( hdc, oldFont ); if (oldBrush) SelectObject( hdc, oldBrush ); ReleaseDC( hwnd, hdc ); } /*********************************************************************** * LISTBOX_InitStorage */ static LRESULT LISTBOX_InitStorage( HWND hwnd, LB_DESCR *descr, INT nb_items, DWORD bytes ) { LB_ITEMDATA *item; nb_items += LB_ARRAY_GRANULARITY - 1; nb_items -= (nb_items % LB_ARRAY_GRANULARITY); if (descr->items) nb_items += HeapSize( descr->heap, 0, descr->items ) / sizeof(*item); if (!(item = (LB_ITEMDATA*)HeapReAlloc( descr->heap, 0, descr->items, nb_items * sizeof(LB_ITEMDATA) ))) { SEND_NOTIFICATION( hwnd, descr, LBN_ERRSPACE ); return LB_ERRSPACE; } descr->items = item; return LB_OKAY; } /*********************************************************************** * LISTBOX_SetTabStops */ static BOOL LISTBOX_SetTabStops( HWND hwnd, LB_DESCR *descr, INT count, LPINT tabs, BOOL short_ints ) { if (!(descr->style & LBS_USETABSTOPS)) return TRUE; if (descr->tabs) HeapFree( descr->heap, 0, descr->tabs ); if (!(descr->nb_tabs = count)) { descr->tabs = NULL; return TRUE; } /* FIXME: count = 1 */ if (!(descr->tabs = (INT *)HeapAlloc( descr->heap, 0, descr->nb_tabs * sizeof(INT) ))) return FALSE; if (short_ints) { INT i; LPINT16 p = (LPINT16)tabs; for (i = 0; i < descr->nb_tabs; i++) { descr->tabs[i] = *p++<<1; /* FIXME */ //if(TRACE_ON(listbox)) // dsprintf(listbox, "%hd ", descr->tabs[i]); } //TRACE("[%04x]: settabstops %s\n", // wnd->hwndSelf, dbg_str(listbox)); } else memcpy( descr->tabs, tabs, descr->nb_tabs * sizeof(INT) ); /* FIXME: repaint the window? */ return TRUE; } /*********************************************************************** * LISTBOX_GetText */ static LRESULT LISTBOX_GetText( HWND hwnd, LB_DESCR *descr, INT index, LPSTR buffer ) { if ((index < 0) || (index >= descr->nb_items)) return LB_ERR; if (HAS_STRINGS(descr)) { if (!buffer) return strlen(descr->items[index].str); lstrcpyA( buffer, descr->items[index].str ); return strlen(buffer); } else { if (buffer) *((LPDWORD)buffer)=*(LPDWORD)(&descr->items[index].data); return sizeof(DWORD); } } /*********************************************************************** * LISTBOX_FindStringPos * * Find the nearest string located before a given string in sort order. * If 'exact' is TRUE, return an error if we don't get an exact match. */ static INT LISTBOX_FindStringPos( HWND hwnd, LB_DESCR *descr, LPCSTR str, BOOL exact ) { INT index, min, max, res = -1; if (!(descr->style & LBS_SORT)) return -1; /* Add it at the end */ min = 0; max = descr->nb_items; while (min != max) { index = (min + max) / 2; if (HAS_STRINGS(descr)) res = lstrcmpiA( descr->items[index].str, str ); else { COMPAREITEMSTRUCT cis; UINT id = GetWindowLongA(hwnd,GWL_ID); cis.CtlType = ODT_LISTBOX; cis.CtlID = id; cis.hwndItem = hwnd; cis.itemID1 = index; cis.itemData1 = descr->items[index].data; cis.itemID2 = -1; cis.itemData2 = (DWORD)str; cis.dwLocaleId = descr->locale; res = SendMessageA( descr->owner, WM_COMPAREITEM, id, (LPARAM)&cis ); } if (!res) return index; if (res > 0) max = index; else min = index + 1; } return exact ? -1 : max; } /*********************************************************************** * LISTBOX_FindFileStrPos * * Find the nearest string located before a given string in directory * sort order (i.e. first files, then directories, then drives). */ static INT LISTBOX_FindFileStrPos( HWND hwnd, LB_DESCR *descr, LPCSTR str ) { INT min, max, res = -1; if (!HAS_STRINGS(descr)) return LISTBOX_FindStringPos( hwnd, descr, str, FALSE ); min = 0; max = descr->nb_items; while (min != max) { INT index = (min + max) / 2; const char *p = descr->items[index].str; if (*p == '[') /* drive or directory */ { if (*str != '[') res = -1; else if (p[1] == '-') /* drive */ { if (str[1] == '-') res = str[2] - p[2]; else res = -1; } else /* directory */ { if (str[1] == '-') res = 1; else res = lstrcmpiA( str, p ); } } else /* filename */ { if (*str == '[') res = 1; else res = lstrcmpiA( str, p ); } if (!res) return index; if (res < 0) max = index; else min = index + 1; } return max; } /*********************************************************************** * LISTBOX_FindString * * Find the item beginning with a given string. */ static INT LISTBOX_FindString( HWND hwnd, LB_DESCR *descr, INT start, LPCSTR str, BOOL exact ) { INT i; LB_ITEMDATA *item; if (start >= descr->nb_items) start = -1; item = descr->items + start + 1; if (HAS_STRINGS(descr)) { if (!str || !str[0]) return LB_ERR; if (exact) { for (i = start + 1; i < descr->nb_items; i++, item++) if (!lstrcmpiA( str, item->str )) return i; for (i = 0, item = descr->items; i <= start; i++, item++) if (!lstrcmpiA( str, item->str )) return i; } else { /* Special case for drives and directories: ignore prefix */ #define CHECK_DRIVE(item) \ if ((item)->str[0] == '[') \ { \ if (!lstrcmpiA( str, (item)->str+1)) return i; \ if (((item)->str[1] == '-') && !lstrcmpiA(str,(item)->str+2)) \ return i; \ } INT len = strlen(str); for (i = start + 1; i < descr->nb_items; i++, item++) { if (!lstrncmpiA( str, item->str, len )) return i; CHECK_DRIVE(item); } for (i = 0, item = descr->items; i <= start; i++, item++) { if (!lstrncmpiA( str, item->str, len )) return i; CHECK_DRIVE(item); } #undef CHECK_DRIVE } } else { if (exact && (descr->style & LBS_SORT)) /* If sorted, use a WM_COMPAREITEM binary search */ return LISTBOX_FindStringPos( hwnd, descr, str, TRUE ); /* Otherwise use a linear search */ for (i = start + 1; i < descr->nb_items; i++, item++) if (item->data == (DWORD)str) return i; for (i = 0, item = descr->items; i <= start; i++, item++) if (item->data == (DWORD)str) return i; } return LB_ERR; } /*********************************************************************** * LISTBOX_GetSelCount */ static LRESULT LISTBOX_GetSelCount( HWND hwnd, LB_DESCR *descr ) { INT i, count; LB_ITEMDATA *item = descr->items; if (!(descr->style & LBS_MULTIPLESEL)) return LB_ERR; for (i = count = 0; i < descr->nb_items; i++, item++) if (item->selected) count++; return count; } /*********************************************************************** * LISTBOX_GetSelItems32 */ static LRESULT LISTBOX_GetSelItems( HWND hwnd, LB_DESCR *descr, INT max, LPINT array ) { INT i, count; LB_ITEMDATA *item = descr->items; if (!(descr->style & LBS_MULTIPLESEL)) return LB_ERR; for (i = count = 0; (i < descr->nb_items) && (count < max); i++, item++) if (item->selected) array[count++] = i; return count; } /*********************************************************************** * LISTBOX_Draw */ static LRESULT LISTBOX_Draw( HWND hwnd, LB_DESCR *descr, HDC hdc ) { INT i, col_pos = descr->page_size - 1; RECT rect; RECT focusRect = {-1, -1, -1, -1}; HFONT oldFont = 0; HBRUSH hbrush, oldBrush = 0; DWORD dwStyle = GetWindowLongA(hwnd,GWL_STYLE); INT focusItem; if (descr->style & LBS_NOREDRAW) return 0; SetRect( &rect, 0, 0, descr->width, descr->height ); if (descr->style & LBS_MULTICOLUMN) rect.right = rect.left + descr->column_width; else if (descr->horz_pos) { SetWindowOrgEx( hdc, descr->horz_pos, 0, NULL ); rect.right += descr->horz_pos; } if (descr->font) oldFont = SelectObject( hdc, descr->font ); hbrush = SendMessageA( descr->owner, WM_CTLCOLORLISTBOX, hdc, (LPARAM)hwnd ); if (hbrush) oldBrush = SelectObject( hdc, hbrush ); if (dwStyle & WS_DISABLED) SetTextColor( hdc, GetSysColor( COLOR_GRAYTEXT ) ); if (!descr->nb_items && (descr->focus_item != -1) && descr->caret_on && (descr->in_focus)) { /* Special case for empty listbox: paint focus rect */ rect.bottom = rect.top + descr->item_height; LISTBOX_DrawItem( hwnd, descr, hdc, &rect, descr->focus_item, ODA_FOCUS ); rect.top = rect.bottom; } /* Paint all the item, regarding the selection Focus state will be painted after */ focusItem = descr->focus_item; descr->focus_item = -1; for (i = descr->top_item; i < descr->nb_items; i++) { if (!(descr->style & LBS_OWNERDRAWVARIABLE)) rect.bottom = rect.top + descr->item_height; else rect.bottom = rect.top + descr->items[i].height; if (i == focusItem) { /* keep the focus rect, to paint the focus item after */ focusRect.left = rect.left; focusRect.right = rect.right; focusRect.top = rect.top; focusRect.bottom = rect.bottom; } LISTBOX_DrawItem( hwnd, descr, hdc, &rect, i, ODA_DRAWENTIRE ); rect.top = rect.bottom; if ((descr->style & LBS_MULTICOLUMN) && !col_pos) { if (!IS_OWNERDRAW(descr)) { /* Clear the bottom of the column */ SetBkColor( hdc, GetSysColor( COLOR_WINDOW ) ); if (rect.top < descr->height) { rect.bottom = descr->height; ExtTextOutA( hdc, 0, 0, ETO_OPAQUE | ETO_CLIPPED, &rect, NULL, 0, NULL ); } } /* Go to the next column */ rect.left += descr->column_width; rect.right += descr->column_width; rect.top = 0; col_pos = descr->page_size - 1; } else { col_pos--; if (rect.top >= descr->height) break; } } /* Paint the focus item now */ descr->focus_item = focusItem; if (focusRect.top != focusRect.bottom && descr->caret_on) LISTBOX_DrawItem( hwnd, descr, hdc, &focusRect, descr->focus_item, ODA_FOCUS ); if (!IS_OWNERDRAW(descr)) { /* Clear the remainder of the client area */ SetBkColor( hdc, GetSysColor( COLOR_WINDOW ) ); if (rect.top < descr->height) { rect.bottom = descr->height; ExtTextOutA( hdc, 0, 0, ETO_OPAQUE | ETO_CLIPPED, &rect, NULL, 0, NULL ); } if (rect.right < descr->width) { rect.left = rect.right; rect.right = descr->width; rect.top = 0; rect.bottom = descr->height; ExtTextOutA( hdc, 0, 0, ETO_OPAQUE | ETO_CLIPPED, &rect, NULL, 0, NULL ); } } if (oldFont) SelectObject( hdc, oldFont ); if (oldBrush) SelectObject( hdc, oldBrush ); return 0; } /*********************************************************************** * LISTBOX_InvalidateItems * * Invalidate all items from a given item. If the specified item is not * visible, nothing happens. */ static void LISTBOX_InvalidateItems( HWND hwnd, LB_DESCR *descr, INT index ) { RECT rect; if (descr->style & LBS_NOREDRAW) return; if (LISTBOX_GetItemRect( hwnd, descr, index, &rect ) == 1) { rect.bottom = descr->height; InvalidateRect( hwnd, &rect, TRUE ); if (descr->style & LBS_MULTICOLUMN) { /* Repaint the other columns */ rect.left = rect.right; rect.right = descr->width; rect.top = 0; InvalidateRect( hwnd, &rect, TRUE ); } } } /*********************************************************************** * LISTBOX_GetItemHeight */ static LRESULT LISTBOX_GetItemHeight( HWND hwnd, LB_DESCR *descr, INT index ) { if (descr->style & LBS_OWNERDRAWVARIABLE) { if ((index < 0) || (index >= descr->nb_items)) return LB_ERR; return descr->items[index].height; } else return descr->item_height; } /*********************************************************************** * LISTBOX_SetItemHeight */ static LRESULT LISTBOX_SetItemHeight( HWND hwnd, LB_DESCR *descr, INT index, UINT height ) { if (!height) height = 1; if (descr->style & LBS_OWNERDRAWVARIABLE) { if ((index < 0) || (index >= descr->nb_items)) return LB_ERR; //TRACE("[%04x]: item %d height = %d\n", // wnd->hwndSelf, index, height ); descr->items[index].height = height; LISTBOX_UpdateScroll( hwnd, descr ); LISTBOX_InvalidateItems( hwnd, descr, index ); } else if (height != descr->item_height) { //TRACE("[%04x]: new height = %d\n", // wnd->hwndSelf, height ); descr->item_height = height; LISTBOX_UpdatePage( hwnd, descr ); LISTBOX_UpdateScroll( hwnd, descr ); InvalidateRect( hwnd, 0, TRUE ); } return LB_OKAY; } /*********************************************************************** * LISTBOX_SetHorizontalPos */ static void LISTBOX_SetHorizontalPos( HWND hwnd, LB_DESCR *descr, INT pos ) { INT diff; if (pos > descr->horz_extent - descr->width) pos = descr->horz_extent - descr->width; if (pos < 0) pos = 0; if (!(diff = descr->horz_pos - pos)) return; //TRACE("[%04x]: new horz pos = %d\n", // wnd->hwndSelf, pos ); descr->horz_pos = pos; LISTBOX_UpdateScroll( hwnd, descr ); if (abs(diff) < descr->width) ScrollWindowEx( hwnd, diff, 0, NULL, NULL, 0, NULL, SW_INVALIDATE | SW_ERASE | SW_SCROLLCHILDREN ); else InvalidateRect( hwnd, NULL, TRUE ); } /*********************************************************************** * LISTBOX_SetHorizontalExtent */ static LRESULT LISTBOX_SetHorizontalExtent( HWND hwnd, LB_DESCR *descr, UINT extent ) { if (!descr->horz_extent || (descr->style & LBS_MULTICOLUMN)) return LB_OKAY; if (extent <= 0) extent = 1; if (extent == descr->horz_extent) return LB_OKAY; //TRACE("[%04x]: new horz extent = %d\n", // wnd->hwndSelf, extent ); descr->horz_extent = extent; if (descr->horz_pos > extent - descr->width) LISTBOX_SetHorizontalPos( hwnd, descr, extent - descr->width ); else LISTBOX_UpdateScroll( hwnd, descr ); return LB_OKAY; } /*********************************************************************** * LISTBOX_SetColumnWidth */ static LRESULT LISTBOX_SetColumnWidth( HWND hwnd, LB_DESCR *descr, UINT width) { if (width == descr->column_width) return LB_OKAY; //TRACE("[%04x]: new column width = %d\n", // wnd->hwndSelf, width ); descr->column_width = width; LISTBOX_UpdatePage( hwnd, descr ); return LB_OKAY; } /*********************************************************************** * LISTBOX_SetFont * * Returns the item height. */ static LRESULT LISTBOX_SetFont(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { HDC hdc; HFONT oldFont = 0; TEXTMETRICA tm; descr->font = (HFONT)wParam; if (!(hdc = GetDCEx( hwnd, 0, DCX_CACHE ))) { //ERR("unable to get DC.\n" ); descr->item_height = 16; return 0; } if (descr->font) oldFont = SelectObject(hdc,descr->font); GetTextMetricsA( hdc, &tm ); if (oldFont) SelectObject( hdc, oldFont ); ReleaseDC( hwnd, hdc ); if (!IS_OWNERDRAW(descr)) LISTBOX_SetItemHeight( hwnd, descr, 0, tm.tmHeight ); descr->item_height = tm.tmHeight; if (lParam) InvalidateRect( hwnd, 0, TRUE ); return 0; } /*********************************************************************** * LISTBOX_MakeItemVisible * * Make sure that a given item is partially or fully visible. */ static void LISTBOX_MakeItemVisible( HWND hwnd, LB_DESCR *descr, INT index, BOOL fully ) { INT top; if (index <= descr->top_item) top = index; else if (descr->style & LBS_MULTICOLUMN) { INT cols = descr->width; if (!fully) cols += descr->column_width - 1; if (cols >= descr->column_width) cols /= descr->column_width; else cols = 1; if (index < descr->top_item + (descr->page_size * cols)) return; top = index - descr->page_size * (cols - 1); } else if (descr->style & LBS_OWNERDRAWVARIABLE) { INT height = fully ? descr->items[index].height : 1; for (top = index; top > descr->top_item; top--) if ((height += descr->items[top-1].height) > descr->height) break; } else { if (index < descr->top_item + descr->page_size) return; if (!fully && (index == descr->top_item + descr->page_size) && (descr->height > (descr->page_size * descr->item_height))) return; top = index - descr->page_size + 1; } LISTBOX_SetTopItem( hwnd, descr, top, TRUE ); } /*********************************************************************** * LISTBOX_SelectItemRange * * Select a range of items. Should only be used on a MULTIPLESEL listbox. */ static LRESULT LISTBOX_SelectItemRange( HWND hwnd, LB_DESCR *descr, INT first, INT last, BOOL on ) { INT i; /* A few sanity checks */ if ((last == -1) && (descr->nb_items == 0)) return LB_OKAY; if (!(descr->style & LBS_MULTIPLESEL)) return LB_ERR; if (last == -1) last = descr->nb_items - 1; if ((first < 0) || (first >= descr->nb_items)) return LB_ERR; if ((last < 0) || (last >= descr->nb_items)) return LB_ERR; /* selected_item reflects last selected/unselected item on multiple sel */ descr->selected_item = last; if (on) /* Turn selection on */ { for (i = first; i <= last; i++) { if (descr->items[i].selected) continue; descr->items[i].selected = TRUE; LISTBOX_RepaintItem( hwnd, descr, i, ODA_SELECT ); } } else /* Turn selection off */ { for (i = first; i <= last; i++) { if (!descr->items[i].selected) continue; descr->items[i].selected = FALSE; LISTBOX_RepaintItem( hwnd, descr, i, ODA_SELECT ); } } return LB_OKAY; } /*********************************************************************** * LISTBOX_SetCaretIndex * * NOTES * index must be between 0 and descr->nb_items-1, or LB_ERR is returned. * */ static LRESULT LISTBOX_SetCaretIndex( HWND hwnd, LB_DESCR *descr, INT index, BOOL fully_visible ) { INT oldfocus = descr->focus_item; if ((index < 0) || (index >= descr->nb_items)) return LB_ERR; if (index == oldfocus) return LB_OKAY; descr->focus_item = index; if ((oldfocus != -1) && descr->caret_on && (descr->in_focus)) LISTBOX_RepaintItem( hwnd, descr, oldfocus, ODA_FOCUS ); LISTBOX_MakeItemVisible( hwnd, descr, index, fully_visible ); if (descr->caret_on && (descr->in_focus)) LISTBOX_RepaintItem( hwnd, descr, index, ODA_FOCUS ); return LB_OKAY; } /*********************************************************************** * LISTBOX_SetSelection */ static LRESULT LISTBOX_SetSelection( HWND hwnd, LB_DESCR *descr, INT index, BOOL on, BOOL send_notify ) { if ((index < -1) || (index >= descr->nb_items)) return LB_ERR; if (descr->style & LBS_MULTIPLESEL) { if (index == -1) /* Select all items */ return LISTBOX_SelectItemRange( hwnd, descr, 0, -1, on ); else /* Only one item */ return LISTBOX_SelectItemRange( hwnd, descr, index, index, on ); } else { INT oldsel = descr->selected_item; if (index != oldsel) { if (oldsel != -1) descr->items[oldsel].selected = FALSE; if (index != -1) descr->items[index].selected = TRUE; descr->selected_item = index; if (oldsel != -1) LISTBOX_RepaintItem( hwnd, descr, oldsel, ODA_SELECT); if (index != -1) LISTBOX_RepaintItem( hwnd, descr, index, ODA_SELECT ); if (send_notify && descr->nb_items) SEND_NOTIFICATION( hwnd, descr, (index != -1) ? LBN_SELCHANGE : LBN_SELCANCEL ); else if( descr->lphc ) /* set selection change flag for parent combo */ descr->lphc->wState |= CBF_SELCHANGE; } } /* "If the index parameter is -1, the return value is LB_ERR even though * no error occurred." (At least for single selection boxes.) */ return (index == -1) ? LB_ERR : LB_OKAY; } /*********************************************************************** * LISTBOX_MoveCaret * * Change the caret position and extend the selection to the new caret. */ static void LISTBOX_MoveCaret( HWND hwnd, LB_DESCR *descr, INT index, BOOL fully_visible ) { INT oldfocus = descr->focus_item; if ((index < 0) || (index >= descr->nb_items) || (oldfocus == index)) return; /* Important, repaint need ot be done in this order if you want to mimic Windows behavior: 1. Remove the focus and paint the item 2. Remove the selection and paint the item(s) 3. Set the selection and repaint the item(s) 4. Set the focus to 'index' and repaint the item */ /* 1. remove the focus and repaint the item */ descr->focus_item = -1; if ((oldfocus != -1) && descr->caret_on && (descr->in_focus)) LISTBOX_RepaintItem( hwnd, descr, oldfocus, ODA_FOCUS ); /* 2. then turn off the previous selection */ /* 3. repaint the new selected item */ if (descr->style & LBS_EXTENDEDSEL) { if (descr->anchor_item != -1) { INT first = MIN( index, descr->anchor_item ); INT last = MAX( index, descr->anchor_item ); if (first > 0) LISTBOX_SelectItemRange( hwnd, descr, 0, first - 1, FALSE ); LISTBOX_SelectItemRange( hwnd, descr, last + 1, -1, FALSE ); LISTBOX_SelectItemRange( hwnd, descr, first, last, TRUE ); } } else if (!(descr->style & LBS_MULTIPLESEL)) { /* Set selection to new caret item */ LISTBOX_SetSelection( hwnd, descr, index, TRUE, FALSE ); } /* 4. repaint the new item with the focus */ descr->focus_item = index; LISTBOX_MakeItemVisible( hwnd, descr, index, fully_visible ); if (descr->caret_on && (descr->in_focus)) LISTBOX_RepaintItem( hwnd, descr, index, ODA_FOCUS ); } /*********************************************************************** * LISTBOX_InsertItem */ static LRESULT LISTBOX_InsertItem( HWND hwnd, LB_DESCR *descr, INT index, LPSTR str, DWORD data ) { LB_ITEMDATA *item; INT max_items; INT oldfocus = descr->focus_item; if (index == -1) index = descr->nb_items; else if ((index < 0) || (index > descr->nb_items)) return LB_ERR; if (!descr->items) max_items = 0; else max_items = HeapSize( descr->heap, 0, descr->items ) / sizeof(*item); if (descr->nb_items == max_items) { /* We need to grow the array */ max_items += LB_ARRAY_GRANULARITY; if (!(item = (LB_ITEMDATA*)HeapReAlloc( descr->heap, 0, descr->items, max_items * sizeof(LB_ITEMDATA) ))) { SEND_NOTIFICATION( hwnd, descr, LBN_ERRSPACE ); return LB_ERRSPACE; } descr->items = item; } /* Insert the item structure */ item = &descr->items[index]; if (index < descr->nb_items) RtlMoveMemory( item + 1, item, (descr->nb_items - index) * sizeof(LB_ITEMDATA) ); item->str = str; item->data = data; item->height = 0; item->selected = FALSE; descr->nb_items++; /* Get item height */ if (descr->style & LBS_OWNERDRAWVARIABLE) { MEASUREITEMSTRUCT mis; UINT id = GetWindowLongA(hwnd,GWL_ID); mis.CtlType = ODT_LISTBOX; mis.CtlID = id; mis.itemID = index; mis.itemData = descr->items[index].data; mis.itemHeight = descr->item_height; SendMessageA( descr->owner, WM_MEASUREITEM, id, (LPARAM)&mis ); item->height = mis.itemHeight ? mis.itemHeight : 1; //TRACE("[%04x]: measure item %d (%s) = %d\n", // wnd->hwndSelf, index, str ? str : "", item->height ); } /* Repaint the items */ LISTBOX_UpdateScroll( hwnd, descr ); LISTBOX_InvalidateItems( hwnd, descr, index ); /* Move selection and focused item */ /* If listbox was empty, set focus to the first item */ if (descr->nb_items == 1) LISTBOX_SetCaretIndex( hwnd, descr, 0, FALSE ); /* single select don't change selection index in win31 */ else { if (index <= descr->selected_item) { descr->selected_item++; descr->focus_item = oldfocus; /* focus not changed */ } } return LB_OKAY; } /*********************************************************************** * LISTBOX_InsertString */ static LRESULT LISTBOX_InsertString( HWND hwnd, LB_DESCR *descr, INT index, LPCSTR str ) { LPSTR new_str = NULL; DWORD data = 0; LRESULT ret; if (HAS_STRINGS(descr)) { if (!str) str=""; if (!(new_str = HEAP_strdupA( descr->heap, 0, str ))) { SEND_NOTIFICATION( hwnd, descr, LBN_ERRSPACE ); return LB_ERRSPACE; } } else data = (DWORD)str; if (index == -1) index = descr->nb_items; if ((ret = LISTBOX_InsertItem( hwnd, descr, index, new_str, data )) != 0) { if (new_str) HeapFree( descr->heap, 0, new_str ); return ret; } //TRACE("[%04x]: added item %d '%s'\n", // wnd->hwndSelf, index, HAS_STRINGS(descr) ? new_str : "" ); return index; } static LRESULT LISTBOX_AddString(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { wParam = LISTBOX_FindStringPos( hwnd, descr, (LPCSTR)lParam, FALSE ); return LISTBOX_InsertString( hwnd, descr, wParam, (LPCSTR)lParam ); } static LRESULT LISTBOX_AddFile(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { wParam = LISTBOX_FindFileStrPos( hwnd, descr, (LPCSTR)lParam ); return LISTBOX_InsertString( hwnd, descr, wParam, (LPCSTR)lParam ); } /*********************************************************************** * LISTBOX_DeleteItem * * Delete the content of an item. 'index' must be a valid index. */ static void LISTBOX_DeleteItem( HWND hwnd, LB_DESCR *descr, INT index ) { /* Note: Win 3.1 only sends DELETEITEM on owner-draw items, * while Win95 sends it for all items with user data. * It's probably better to send it too often than not * often enough, so this is what we do here. */ if (IS_OWNERDRAW(descr) || descr->items[index].data) { DELETEITEMSTRUCT dis; UINT id = GetWindowLongA(hwnd,GWL_ID); dis.CtlType = ODT_LISTBOX; dis.CtlID = id; dis.itemID = index; dis.hwndItem = hwnd; dis.itemData = descr->items[index].data; SendMessageA( descr->owner, WM_DELETEITEM, id, (LPARAM)&dis ); } if (HAS_STRINGS(descr) && descr->items[index].str) HeapFree( descr->heap, 0, descr->items[index].str ); } /*********************************************************************** * LISTBOX_RemoveItem * * Remove an item from the listbox and delete its content. */ static LRESULT LISTBOX_RemoveItem( HWND hwnd, LB_DESCR *descr, INT index ) { LB_ITEMDATA *item; INT max_items; if (index == -1) index = descr->nb_items - 1; else if ((index < 0) || (index >= descr->nb_items)) return LB_ERR; /* We need to Invalidate the original rect intead of the updated one. */ LISTBOX_InvalidateItems( hwnd, descr, index ); LISTBOX_DeleteItem( hwnd, descr, index ); /* Remove the item */ item = &descr->items[index]; if (index < descr->nb_items-1) RtlMoveMemory( item, item + 1, (descr->nb_items - index - 1) * sizeof(LB_ITEMDATA) ); descr->nb_items--; if (descr->anchor_item == descr->nb_items) descr->anchor_item--; /* Shrink the item array if possible */ max_items = HeapSize( descr->heap, 0, descr->items ) / sizeof(LB_ITEMDATA); if (descr->nb_items < max_items - 2*LB_ARRAY_GRANULARITY) { max_items -= LB_ARRAY_GRANULARITY; item = (LB_ITEMDATA*)HeapReAlloc( descr->heap, 0, descr->items, max_items * sizeof(LB_ITEMDATA) ); if (item) descr->items = item; } /* Repaint the items */ LISTBOX_UpdateScroll( hwnd, descr ); /* if we removed the scrollbar, reset the top of the list (correct for owner-drawn ???) */ if (descr->nb_items == descr->page_size) LISTBOX_SetTopItem( hwnd, descr, 0, TRUE ); /* Move selection and focused item */ if (!IS_MULTISELECT(descr)) { if (index == descr->selected_item) descr->selected_item = -1; else if (index < descr->selected_item) { descr->selected_item--; } } if (descr->focus_item >= descr->nb_items) { descr->focus_item = descr->nb_items - 1; if (descr->focus_item < 0) descr->focus_item = 0; } return LB_OKAY; } static LRESULT LISTBOX_DeleteString(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if (LISTBOX_RemoveItem( hwnd, descr, wParam) != LB_ERR) return descr->nb_items; else return LB_ERR; } /*********************************************************************** * LISTBOX_ResetContent */ static LRESULT LISTBOX_ResetContent( HWND hwnd, LB_DESCR *descr,BOOL refresh) { INT i; for (i = 0; i < descr->nb_items; i++) LISTBOX_DeleteItem( hwnd, descr, i ); if (descr->items) HeapFree( descr->heap, 0, descr->items ); descr->nb_items = 0; descr->top_item = 0; descr->selected_item = -1; descr->focus_item = 0; descr->anchor_item = -1; descr->items = NULL; if (refresh) { LISTBOX_UpdateScroll( hwnd, descr ); InvalidateRect( hwnd, NULL, TRUE ); } return 0; } /*********************************************************************** * LISTBOX_SetCount */ static LRESULT LISTBOX_SetCount( HWND hwnd, LB_DESCR *descr, INT count ) { LRESULT ret; INT oldcount = descr->nb_items; if (HAS_STRINGS(descr) || !HAS_NODATA(descr)) return LB_ERR; if (count > descr->nb_items) { LB_ITEMDATA *item; INT max_items,index; UINT id = (descr->lphc) ? ID_CB_LISTBOX:GetWindowLongA(hwnd,GWL_ID); max_items = count+LB_ARRAY_GRANULARITY-(count % LB_ARRAY_GRANULARITY); if (!(item = (LB_ITEMDATA*)HeapReAlloc(descr->heap,0,descr->items,max_items*sizeof(LB_ITEMDATA)))) { SEND_NOTIFICATION( hwnd, descr, LBN_ERRSPACE ); return LB_ERRSPACE; } descr->items = item; /* Insert the item structure */ index = descr->nb_items-1; while (count > descr->nb_items) { index++; item = &descr->items[index]; item->str = ""; item->data = 0; item->height = 0; item->selected = FALSE; descr->nb_items++; /* Get item height */ if (descr->style & LBS_OWNERDRAWVARIABLE) { MEASUREITEMSTRUCT mis; mis.CtlType = ODT_LISTBOX; mis.CtlID = id; mis.itemID = index; mis.itemData = descr->items[index].data; mis.itemHeight = descr->item_height; SendMessageA( descr->owner, WM_MEASUREITEM, id, (LPARAM)&mis ); item->height = mis.itemHeight ? mis.itemHeight : 1; } } } else if (count < descr->nb_items) { descr->nb_items = count; if (descr->selected_item >= count) descr->selected_item = count-1; if (descr->focus_item >= count) descr-> focus_item = count-1; } /* Repaint the items */ LISTBOX_UpdateScroll( hwnd, descr ); InvalidateRect(hwnd,NULL,TRUE); /* Move selection and focused item */ /* If listbox was empty, set focus to the first item */ if (oldcount == 0) LISTBOX_SetCaretIndex( hwnd, descr, 0, FALSE ); return LB_OKAY; } /*********************************************************************** * LISTBOX_Directory */ static LRESULT LISTBOX_Directory( HWND hwnd, LB_DESCR *descr, UINT attrib, LPCSTR filespec, BOOL long_names ) { HANDLE handle; LRESULT ret = LB_OKAY; WIN32_FIND_DATAA entry; int pos; if ((handle = FindFirstFileA(filespec,&entry)) == INVALID_HANDLE_VALUE) { if (GetLastError() != ERROR_NO_MORE_FILES) return LB_ERR; } else { do { char buffer[270]; if (entry.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) { if (!(attrib & DDL_DIRECTORY) || !strcmp( entry.cAlternateFileName, "." )) continue; if (long_names) sprintf( buffer, "[%s]", entry.cFileName ); else sprintf( buffer, "[%s]", entry.cAlternateFileName ); } else /* not a directory */ { #ifdef __WIN32OS2__ #define ATTRIBS (FILE_ATTRIBUTE_READONLY | FILE_ATTRIBUTE_HIDDEN | \ FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_ARCHIVE | FILE_ATTRIBUTE_NORMAL) #else #define ATTRIBS (FILE_ATTRIBUTE_READONLY | FILE_ATTRIBUTE_HIDDEN | \ FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_ARCHIVE ) #endif if ((attrib & DDL_EXCLUSIVE) && ((attrib & ATTRIBS) != (entry.dwFileAttributes & ATTRIBS))) continue; #undef ATTRIBS if (long_names) strcpy( buffer, entry.cFileName ); else strcpy( buffer, entry.cAlternateFileName ); } if (!long_names) CharLowerA( buffer ); pos = LISTBOX_FindFileStrPos( hwnd, descr, buffer ); if ((ret = LISTBOX_InsertString( hwnd, descr, pos, buffer )) < 0) break; } while (FindNextFileA( handle, &entry )); FindClose( handle ); } if ((ret >= 0) && (attrib & DDL_DRIVES)) { char buffer[] = "[-a-]"; int drive; for (drive = 0; drive < MAX_DOS_DRIVES; drive++, buffer[2]++) { if (!DRIVE_IsValid(drive)) continue; if ((ret = LISTBOX_InsertString( hwnd, descr, -1, buffer )) < 0) break; } } return ret; } /*********************************************************************** * LISTBOX_HandleVScroll */ static LRESULT LISTBOX_HandleVScroll( HWND hwnd, LB_DESCR *descr, WPARAM wParam, LPARAM lParam ) { SCROLLINFO info; if (descr->style & LBS_MULTICOLUMN) return 0; dprintf(("We are handling scroll")); switch(LOWORD(wParam)) { case SB_LINEUP: LISTBOX_SetTopItem( hwnd, descr, descr->top_item - 1, TRUE ); break; case SB_LINEDOWN: LISTBOX_SetTopItem( hwnd, descr, descr->top_item + 1, TRUE ); break; case SB_PAGEUP: LISTBOX_SetTopItem( hwnd, descr, descr->top_item - LISTBOX_GetCurrentPageSize( hwnd, descr ), TRUE ); break; case SB_PAGEDOWN: LISTBOX_SetTopItem( hwnd, descr, descr->top_item + LISTBOX_GetCurrentPageSize( hwnd, descr ), TRUE ); break; case SB_THUMBPOSITION: LISTBOX_SetTopItem( hwnd, descr, HIWORD(wParam), TRUE ); break; case SB_THUMBTRACK: info.cbSize = sizeof(info); info.fMask = SIF_TRACKPOS; GetScrollInfo( hwnd, SB_VERT, &info ); LISTBOX_SetTopItem( hwnd, descr, info.nTrackPos, TRUE ); break; case SB_TOP: LISTBOX_SetTopItem( hwnd, descr, 0, TRUE ); break; case SB_BOTTOM: LISTBOX_SetTopItem( hwnd, descr, descr->nb_items, TRUE ); break; } return 0; } /*********************************************************************** * LISTBOX_HandleHScroll */ static LRESULT LISTBOX_HandleHScroll( HWND hwnd, LB_DESCR *descr, WPARAM wParam, LPARAM lParam ) { SCROLLINFO info; INT page; if (descr->style & LBS_MULTICOLUMN) { switch(LOWORD(wParam)) { case SB_LINELEFT: LISTBOX_SetTopItem( hwnd, descr, descr->top_item-descr->page_size, TRUE ); break; case SB_LINERIGHT: LISTBOX_SetTopItem( hwnd, descr, descr->top_item+descr->page_size, TRUE ); break; case SB_PAGELEFT: page = descr->width / descr->column_width; if (page < 1) page = 1; LISTBOX_SetTopItem( hwnd, descr, descr->top_item - page * descr->page_size, TRUE ); break; case SB_PAGERIGHT: page = descr->width / descr->column_width; if (page < 1) page = 1; LISTBOX_SetTopItem( hwnd, descr, descr->top_item + page * descr->page_size, TRUE ); break; case SB_THUMBPOSITION: LISTBOX_SetTopItem( hwnd, descr, HIWORD(wParam)*descr->page_size, TRUE ); break; case SB_THUMBTRACK: info.cbSize = sizeof(info); info.fMask = SIF_TRACKPOS; GetScrollInfo( hwnd, SB_VERT, &info ); LISTBOX_SetTopItem( hwnd, descr, info.nTrackPos*descr->page_size, TRUE ); break; case SB_LEFT: LISTBOX_SetTopItem( hwnd, descr, 0, TRUE ); break; case SB_RIGHT: LISTBOX_SetTopItem( hwnd, descr, descr->nb_items, TRUE ); break; } } else if (descr->horz_extent) { switch(LOWORD(wParam)) { case SB_LINELEFT: LISTBOX_SetHorizontalPos( hwnd, descr, descr->horz_pos - 1 ); break; case SB_LINERIGHT: LISTBOX_SetHorizontalPos( hwnd, descr, descr->horz_pos + 1 ); break; case SB_PAGELEFT: LISTBOX_SetHorizontalPos( hwnd, descr, descr->horz_pos - descr->width ); break; case SB_PAGERIGHT: LISTBOX_SetHorizontalPos( hwnd, descr, descr->horz_pos + descr->width ); break; case SB_THUMBPOSITION: LISTBOX_SetHorizontalPos( hwnd, descr, HIWORD(wParam) ); break; case SB_THUMBTRACK: info.cbSize = sizeof(info); info.fMask = SIF_TRACKPOS; GetScrollInfo( hwnd, SB_HORZ, &info ); LISTBOX_SetHorizontalPos( hwnd, descr, info.nTrackPos ); break; case SB_LEFT: LISTBOX_SetHorizontalPos( hwnd, descr, 0 ); break; case SB_RIGHT: LISTBOX_SetHorizontalPos( hwnd, descr, descr->horz_extent - descr->width ); break; } } return 0; } static LRESULT LISTBOX_HandleMouseWheel(HWND hwnd, LB_DESCR *descr,WPARAM wParam, LPARAM lParam ) { short gcWheelDelta = 0; UINT pulScrollLines = 3; if (wParam & (MK_SHIFT | MK_CONTROL)) return DefWindowProcA(hwnd,WM_MOUSEWHEEL,wParam,lParam); SystemParametersInfoW(SPI_GETWHEELSCROLLLINES,0, &pulScrollLines, 0); gcWheelDelta -= (short) HIWORD(wParam); if (abs(gcWheelDelta) >= WHEEL_DELTA && pulScrollLines) { int cLineScroll = (int) min((UINT) descr->page_size, pulScrollLines); cLineScroll *= (gcWheelDelta / WHEEL_DELTA); LISTBOX_SetTopItem( hwnd, descr, descr->top_item + cLineScroll, TRUE ); } return 0; } /*********************************************************************** * LISTBOX_HandleLButtonDown */ static LRESULT LISTBOX_HandleLButtonDown( HWND hwnd, LB_DESCR *descr, WPARAM wParam, INT x, INT y ) { INT index = LISTBOX_GetItemFromPoint( hwnd, descr, x, y ); //TRACE("[%04x]: lbuttondown %d,%d item %d\n", // wnd->hwndSelf, x, y, index ); if (!descr->caret_on && (descr->in_focus)) return 0; if (index != -1) { if (descr->style & LBS_EXTENDEDSEL) { if (!(wParam & MK_SHIFT)) descr->anchor_item = index; if (wParam & MK_CONTROL) { LISTBOX_SetCaretIndex( hwnd, descr, index, FALSE ); LISTBOX_SetSelection( hwnd, descr, index, !descr->items[index].selected, (descr->style & LBS_NOTIFY) != 0 ); } else LISTBOX_MoveCaret( hwnd, descr, index, FALSE ); } else { LISTBOX_MoveCaret( hwnd, descr, index, FALSE ); LISTBOX_SetSelection( hwnd, descr, index, (!(descr->style & LBS_MULTIPLESEL) || !descr->items[index].selected), (descr->style & LBS_NOTIFY) != 0 ); } } if (!descr->in_focus) { if( !descr->lphc ) SetFocus( hwnd ); else SetFocus( (descr->lphc->hWndEdit) ? descr->lphc->hWndEdit : descr->lphc->hwndself ) ; } descr->captured = TRUE; SetCapture( hwnd ); if (index != -1 && !descr->lphc) { if (descr->style & LBS_NOTIFY ) SendMessageA( descr->owner, WM_LBTRACKPOINT, index, MAKELPARAM( x, y ) ); if (GetWindowLongA(hwnd,GWL_EXSTYLE) & WS_EX_DRAGDETECT) { POINT pt; pt.x = x; pt.y = y; if (DragDetect( hwnd, pt )) SendMessageA( descr->owner, WM_BEGINDRAG, 0, 0 ); } } return 0; } /************************************************************************* * LISTBOX_HandleLButtonDownCombo [Internal] * * Process LButtonDown message for the ComboListBox * * PARAMS * pWnd [I] The windows internal structure * pDescr [I] The ListBox internal structure * wParam [I] Key Flag (WM_LBUTTONDOWN doc for more info) * x [I] X Mouse Coordinate * y [I] Y Mouse Coordinate * * RETURNS * 0 since we are processing the WM_LBUTTONDOWN Message * * NOTES * This function is only to be used when a ListBox is a ComboListBox */ static LRESULT LISTBOX_HandleLButtonDownCombo( HWND hwnd, LB_DESCR *pDescr, UINT msg,WPARAM wParam, INT x, INT y) { RECT clientRect, screenRect; POINT mousePos; mousePos.x = x; mousePos.y = y; GetClientRect(hwnd, &clientRect); if(PtInRect(&clientRect, mousePos)) { /* MousePos is in client, resume normal processing */ if (msg == WM_LBUTTONDOWN) { pDescr->lphc->droppedIndex = pDescr->nb_items ? pDescr->selected_item : -1; return LISTBOX_HandleLButtonDown( hwnd, pDescr, wParam, x, y); } else if (pDescr->style & LBS_NOTIFY) SEND_NOTIFICATION( hwnd, pDescr, LBN_DBLCLK ); return 0; } else { POINT screenMousePos; RECT screenRect; HWND hWndOldCapture; //CB: read buglist /* Check the Non-Client Area */ screenMousePos = mousePos; hWndOldCapture = GetCapture(); GetWindowRect(hwnd,&screenRect); ClientToScreen(hwnd,&screenMousePos); if (!PtInRect(&screenRect,screenMousePos)) { dprintf(("Scrollbar hittest - plain branch")); ReleaseCapture(); LISTBOX_SetCaretIndex( hwnd, pDescr, pDescr->lphc->droppedIndex, FALSE ); LISTBOX_SetSelection( hwnd, pDescr, pDescr->lphc->droppedIndex, FALSE, FALSE ); #ifdef __WIN32OS2__ COMBO_RollupListbox(pDescr->lphc); /* @@PF Previous code is all wrong here. Here we are supposed to close and only close dropdown, instead flip, flips it. This happens because previous code did not pay attention to the fact that combobox can be closed with SendMessage by application, as MFC apps do COMBO_FlipListbox( pDescr->lphc, FALSE, FALSE ); */ #else COMBO_FlipListbox( pDescr->lphc, FALSE, FALSE ); #endif return 0; } else { INT nHitTestType=0; LONG style = GetWindowLongA( hwnd, GWL_STYLE ); /* Check Vertical scroll bar */ if (style & WS_VSCROLL) { clientRect.right += GetSystemMetrics(SM_CXVSCROLL); if (PtInRect( &clientRect, mousePos )) { nHitTestType = HTVSCROLL; } } /* Check horizontal scroll bar */ if (style & WS_HSCROLL) { clientRect.bottom += GetSystemMetrics(SM_CYHSCROLL); if (PtInRect( &clientRect, mousePos )) { nHitTestType = HTHSCROLL; } } /* Windows sends this message when a scrollbar is clicked */ if(nHitTestType != 0) { SendMessageW(hwnd, WM_NCLBUTTONDOWN, nHitTestType, MAKELONG(screenMousePos.x, screenMousePos.y)); } /* Resume the Capture after scrolling is complete */ if(hWndOldCapture != 0) { SetCapture(hWndOldCapture); } } } return 0; } /*********************************************************************** * LISTBOX_HandleLButtonUp */ static LRESULT LISTBOX_HandleLButtonUp( HWND hwnd, LB_DESCR *descr ) { if (LISTBOX_Timer != LB_TIMER_NONE) KillSystemTimer( hwnd, LB_TIMER_ID ); LISTBOX_Timer = LB_TIMER_NONE; if (descr->captured) { descr->captured = FALSE; if (GetCapture() == hwnd) ReleaseCapture(); if ((descr->style & LBS_NOTIFY) && descr->nb_items) SEND_NOTIFICATION( hwnd, descr, LBN_SELCHANGE ); } return 0; } /*********************************************************************** * LISTBOX_HandleTimer * * Handle scrolling upon a timer event. * Return TRUE if scrolling should continue. */ static LRESULT LISTBOX_HandleTimer( HWND hwnd, LB_DESCR *descr, INT index, TIMER_DIRECTION dir ) { switch(dir) { case LB_TIMER_UP: if (descr->top_item) index = descr->top_item - 1; else index = 0; break; case LB_TIMER_LEFT: if (descr->top_item) index -= descr->page_size; break; case LB_TIMER_DOWN: index = descr->top_item + LISTBOX_GetCurrentPageSize( hwnd, descr ); if (index == descr->focus_item) index++; if (index >= descr->nb_items) index = descr->nb_items - 1; break; case LB_TIMER_RIGHT: if (index + descr->page_size < descr->nb_items) index += descr->page_size; break; case LB_TIMER_NONE: break; } if (index == descr->focus_item) return FALSE; LISTBOX_MoveCaret( hwnd, descr, index, FALSE ); return TRUE; } /*********************************************************************** * LISTBOX_HandleSystemTimer * * WM_SYSTIMER handler. */ static LRESULT LISTBOX_HandleSystemTimer( HWND hwnd, LB_DESCR *descr ) { if (!LISTBOX_HandleTimer( hwnd, descr, descr->focus_item, LISTBOX_Timer )) { KillSystemTimer( hwnd, LB_TIMER_ID ); LISTBOX_Timer = LB_TIMER_NONE; } return 0; } /*********************************************************************** * LISTBOX_HandleMouseMove * * WM_MOUSEMOVE handler. */ static LRESULT LISTBOX_HandleMouseMove( HWND hwnd, LB_DESCR *descr, INT x, INT y ) { INT index; TIMER_DIRECTION dir = LB_TIMER_NONE; if (GetCapture() != hwnd) return 0; if (!descr->captured) return 0; if (descr->style & LBS_MULTICOLUMN) { if (y < 0) y = 0; else if (y >= descr->item_height * descr->page_size) y = descr->item_height * descr->page_size - 1; if (x < 0) { dir = LB_TIMER_LEFT; x = 0; } else if (x >= descr->width) { dir = LB_TIMER_RIGHT; x = descr->width - 1; } } else { if (y < 0) dir = LB_TIMER_UP; /* above */ else if (y >= descr->height) dir = LB_TIMER_DOWN; /* below */ } index = LISTBOX_GetItemFromPoint( hwnd, descr, x, y ); if (index == -1) index = descr->focus_item; if (!LISTBOX_HandleTimer( hwnd, descr, index, dir )) dir = LB_TIMER_NONE; /* Start/stop the system timer */ if (dir != LB_TIMER_NONE) SetSystemTimer( hwnd, LB_TIMER_ID, LB_SCROLL_TIMEOUT, NULL); else if (LISTBOX_Timer != LB_TIMER_NONE) KillSystemTimer( hwnd, LB_TIMER_ID ); LISTBOX_Timer = dir; return 0; } /*********************************************************************** * LISTBOX_HandleKeyDown */ static LRESULT LISTBOX_HandleKeyDown( HWND hwnd, LB_DESCR *descr, WPARAM wParam ) { INT caret = -1; BOOL bForceSelection = TRUE; /* select item pointed to by focus_item */ if ((IS_MULTISELECT(descr)) || (descr->selected_item == descr->focus_item)) bForceSelection = FALSE; /* only for single select list */ if (descr->style & LBS_WANTKEYBOARDINPUT) { caret = SendMessageA( descr->owner, WM_VKEYTOITEM, MAKEWPARAM(LOWORD(wParam), descr->focus_item), hwnd ); if (caret == -2) return 0; } if (caret == -1) switch(wParam) { case VK_LEFT: if (descr->style & LBS_MULTICOLUMN) { bForceSelection = FALSE; if (descr->focus_item >= descr->page_size) caret = descr->focus_item - descr->page_size; break; } /* fall through */ case VK_UP: caret = descr->focus_item - 1; if (caret < 0) caret = 0; break; case VK_RIGHT: if (descr->style & LBS_MULTICOLUMN) { bForceSelection = FALSE; if (descr->focus_item + descr->page_size < descr->nb_items) caret = descr->focus_item + descr->page_size; break; } /* fall through */ case VK_DOWN: caret = descr->focus_item + 1; if (caret >= descr->nb_items) caret = descr->nb_items - 1; break; case VK_PRIOR: if (descr->style & LBS_MULTICOLUMN) { INT page = descr->width / descr->column_width; if (page < 1) page = 1; caret = descr->focus_item - (page * descr->page_size) + 1; } else caret = descr->focus_item-LISTBOX_GetCurrentPageSize(hwnd,descr)+1; if (caret < 0) caret = 0; break; case VK_NEXT: if (descr->style & LBS_MULTICOLUMN) { INT page = descr->width / descr->column_width; if (page < 1) page = 1; caret = descr->focus_item + (page * descr->page_size) - 1; } else caret = descr->focus_item+LISTBOX_GetCurrentPageSize(hwnd,descr)-1; if (caret >= descr->nb_items) caret = descr->nb_items - 1; break; case VK_HOME: caret = 0; break; case VK_END: caret = descr->nb_items - 1; break; case VK_SPACE: if (descr->style & LBS_EXTENDEDSEL) caret = descr->focus_item; else if (descr->style & LBS_MULTIPLESEL) { LISTBOX_SetSelection( hwnd, descr, descr->focus_item, !descr->items[descr->focus_item].selected, (descr->style & LBS_NOTIFY) != 0 ); } break; default: bForceSelection = FALSE; } if (bForceSelection) /* focused item is used instead of key */ caret = descr->focus_item; if (caret >= 0) { if ((descr->style & LBS_EXTENDEDSEL) && !(GetKeyState( VK_SHIFT ) & 0x8000)) descr->anchor_item = caret; LISTBOX_MoveCaret( hwnd, descr, caret, TRUE ); LISTBOX_SetSelection( hwnd, descr, caret, TRUE, FALSE); if (descr->style & LBS_NOTIFY) { if( descr->lphc && CB_GETTYPE(descr->lphc) != CBS_SIMPLE ) { /* make sure that combo parent doesn't hide us */ descr->lphc->wState |= CBF_NOROLLUP; } if (descr->nb_items) SEND_NOTIFICATION( hwnd, descr, LBN_SELCHANGE ); } } return 0; } /*********************************************************************** * LISTBOX_HandleChar */ static LRESULT LISTBOX_HandleChar( HWND hwnd, LB_DESCR *descr, WPARAM wParam ) { INT caret = -1; char str[2]; str[0] = wParam & 0xff; str[1] = '\0'; if (descr->style & LBS_WANTKEYBOARDINPUT) { caret = SendMessageA( descr->owner, WM_CHARTOITEM, MAKEWPARAM(LOWORD(wParam), descr->focus_item), hwnd ); if (caret == -2) return 0; } if (caret == -1) caret = LISTBOX_FindString( hwnd, descr, descr->focus_item, str, FALSE); if (caret != -1) { if ((!IS_MULTISELECT(descr)) && descr->selected_item == -1) LISTBOX_SetSelection( hwnd, descr, caret, TRUE, FALSE); LISTBOX_MoveCaret( hwnd, descr, caret, TRUE ); if ((descr->style & LBS_NOTIFY) && descr->nb_items) SEND_NOTIFICATION( hwnd, descr, LBN_SELCHANGE ); } return 0; } /*********************************************************************** * LISTBOX_Create */ static LRESULT LISTBOX_Create( HWND hwnd, LPHEADCOMBO lphc ) { LB_DESCR *descr; MEASUREITEMSTRUCT mis; RECT rect; if (!(descr = (LB_DESCR*)HeapAlloc( GetProcessHeap(), 0, sizeof(*descr) ))) return -1; if (!(descr->heap = HeapCreate( 0, 0x10000, 0 ))) { HeapFree( GetProcessHeap(), 0, descr ); return -1; } GetClientRect( hwnd, &rect ); descr->owner = GetParent( hwnd ); descr->style = GetWindowLongA(hwnd,GWL_STYLE); descr->width = rect.right - rect.left; descr->height = rect.bottom - rect.top; descr->items = NULL; descr->nb_items = 0; descr->top_item = 0; descr->selected_item = -1; descr->focus_item = 0; descr->anchor_item = -1; descr->item_height = 1; descr->page_size = 1; descr->column_width = 150; descr->horz_extent = (descr->style & WS_HSCROLL) ? 1 : 0; descr->horz_pos = 0; descr->nb_tabs = 0; descr->tabs = NULL; descr->caret_on = lphc ? FALSE:TRUE; descr->in_focus = FALSE; descr->captured = FALSE; descr->font = 0; descr->locale = 0; /* FIXME */ descr->lphc = lphc; if( lphc ) { //TRACE_(combo)("[%04x]: resetting owner %04x -> %04x\n", // wnd->hwndSelf, descr->owner, lphc->self->hwndSelf ); descr->owner = lphc->hwndself; } SetInfoPtr(hwnd,(DWORD)descr); /* if (wnd->dwExStyle & WS_EX_NOPARENTNOTIFY) descr->style &= ~LBS_NOTIFY; */ if (descr->style & LBS_EXTENDEDSEL) descr->style |= LBS_MULTIPLESEL; if (descr->style & LBS_MULTICOLUMN) descr->style &= ~LBS_OWNERDRAWVARIABLE; if (descr->style & LBS_OWNERDRAWVARIABLE) descr->style |= LBS_NOINTEGRALHEIGHT; LISTBOX_SetFont(hwnd,descr,0,(LPARAM)FALSE); if (descr->style & LBS_OWNERDRAWFIXED) { if( descr->lphc && (descr->lphc->dwStyle & CBS_DROPDOWN)) { /* WinWord gets VERY unhappy if we send WM_MEASUREITEM from here */ descr->item_height = lphc->fixedOwnerDrawHeight; } else { UINT id = GetWindowLongA(hwnd,GWL_ID); mis.CtlType = ODT_LISTBOX; mis.CtlID = id; mis.itemID = -1; mis.itemWidth = 0; mis.itemData = 0; mis.itemHeight = descr->item_height; SendMessageA( descr->owner, WM_MEASUREITEM, id, (LPARAM)&mis ); descr->item_height = mis.itemHeight ? mis.itemHeight : 1; } } return 0; } static LRESULT LISTBOX_NCCreate(HWND hwnd,WPARAM wParam,LPARAM lParam) { DWORD dwStyle = GetWindowLongA(hwnd,GWL_STYLE); /* * When a listbox is not in a combobox and the look * is win95, the WS_BORDER style is replaced with * the WS_EX_CLIENTEDGE style. */ if (dwStyle & WS_BORDER) { SetWindowLongA(hwnd,GWL_EXSTYLE,GetWindowLongA(hwnd,GWL_EXSTYLE) | WS_EX_CLIENTEDGE); SetWindowLongA(hwnd,GWL_STYLE,GetWindowLongA(hwnd,GWL_STYLE) & ~ WS_BORDER); } return DefWindowProcA(hwnd,WM_NCCREATE,wParam,lParam); } /*********************************************************************** * LISTBOX_Destroy */ static BOOL LISTBOX_Destroy( HWND hwnd, LB_DESCR *descr ) { LISTBOX_ResetContent(hwnd,descr,FALSE); HeapDestroy( descr->heap ); HeapFree( GetProcessHeap(), 0, descr ); SetInfoPtr(hwnd,0); return TRUE; } static LRESULT LISTBOX_GetItemData(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if (((INT)wParam < 0) || ((INT)wParam >= descr->nb_items)) return LB_ERR; return descr->items[wParam].data; } static LRESULT LISTBOX_SetItemData(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if (((INT)wParam < 0) || ((INT)wParam >= descr->nb_items)) return LB_ERR; descr->items[wParam].data = (DWORD)lParam; return LB_OKAY; } static LRESULT LISTBOX_GetCount(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { return descr->nb_items; } static LRESULT LISTBOX_GetTextLen(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if (wParam >= descr->nb_items) return LB_ERR; return (HAS_STRINGS(descr) ? strlen(descr->items[wParam].str) : sizeof(DWORD)); } static LRESULT LISTBOX_GetCurSel(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if (descr->nb_items==0) return LB_ERR; if (!IS_MULTISELECT(descr)) return descr->selected_item; /* else */ if (descr->selected_item!=-1) return descr->selected_item; /* else */ return descr->focus_item; /* otherwise, if the user tries to move the selection with the */ /* arrow keys, we will give the application something to choke on */ } static LRESULT LISTBOX_GetTopIndex(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { return descr->top_item; } static LRESULT LISTBOX_ItemFromPoint(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { POINT pt; RECT rect; pt.x = LOWORD(lParam); pt.y = HIWORD(lParam); rect.left = 0; rect.top = 0; rect.right = descr->width; rect.bottom = descr->height; return MAKELONG( LISTBOX_GetItemFromPoint(hwnd, descr, pt.x, pt.y), !PtInRect( &rect, pt ) ); } static LRESULT LISTBOX_HandleSetCaretIndex(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if ((!IS_MULTISELECT(descr)) && (descr->selected_item != -1)) return LB_ERR; if (LISTBOX_SetCaretIndex( hwnd, descr, wParam, !lParam ) == LB_ERR) return LB_ERR; else return LB_OKAY; } static LRESULT LISTBOX_GetCaretIndex(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { return descr->focus_item; } static LRESULT LISTBOX_SelectString(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { INT index = LISTBOX_FindString( hwnd, descr, wParam, (LPCSTR)lParam, FALSE ); if (index == LB_ERR) return LB_ERR; LISTBOX_SetSelection( hwnd, descr, index, TRUE, FALSE ); return index; } static LRESULT LISTBOX_GetSel(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if (((INT)wParam < 0) || ((INT)wParam >= descr->nb_items)) return LB_ERR; return descr->items[wParam].selected; } static LRESULT LISTBOX_SetCurSel(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if (IS_MULTISELECT(descr)) return LB_ERR; LISTBOX_SetCaretIndex( hwnd, descr, wParam, TRUE ); return LISTBOX_SetSelection( hwnd, descr, wParam, TRUE, FALSE ); } static LRESULT LISTBOX_SelItemRange(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if (LOWORD(lParam) <= HIWORD(lParam)) return LISTBOX_SelectItemRange( hwnd, descr, LOWORD(lParam), HIWORD(lParam), wParam ); else return LISTBOX_SelectItemRange( hwnd, descr, HIWORD(lParam), LOWORD(lParam), wParam ); } static LRESULT LISTBOX_SelItemRangeEx(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if ((INT)lParam >= (INT)wParam) return LISTBOX_SelectItemRange( hwnd, descr, wParam, lParam, TRUE ); else return LISTBOX_SelectItemRange( hwnd, descr, lParam, wParam, FALSE); } static LRESULT LISTBOX_GetHorizontalExtent(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { return descr->horz_extent; } static LRESULT LISTBOX_GetAnchorIndex(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { return descr->anchor_item; } static LRESULT LISTBOX_SetAnchorIndex(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if (((INT)wParam < -1) || ((INT)wParam >= descr->nb_items)) return LB_ERR; descr->anchor_item = (INT)wParam; return LB_OKAY; } static LRESULT LISTBOX_GetLocale(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { return descr->locale; } static LRESULT LISTBOX_SetLocale(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { descr->locale = (LCID)wParam; /* FIXME: should check for valid lcid */ return LB_OKAY; } static LRESULT LISTBOX_CaretOn(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if (descr->caret_on) return LB_OKAY; descr->caret_on = TRUE; if ((descr->focus_item != -1) && (descr->in_focus)) LISTBOX_RepaintItem( hwnd, descr, descr->focus_item, ODA_FOCUS ); return LB_OKAY; } static LRESULT LISTBOX_CaretOff(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if (!descr->caret_on) return LB_OKAY; descr->caret_on = FALSE; if ((descr->focus_item != -1) && (descr->in_focus)) LISTBOX_RepaintItem( hwnd, descr, descr->focus_item, ODA_FOCUS ); return LB_OKAY; } static LRESULT LISTBOX_Enable(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { InvalidateRect( hwnd, NULL, TRUE ); return 0; } static LRESULT LISTBOX_GetDlgCode(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { return DLGC_WANTARROWS | DLGC_WANTCHARS; } static LRESULT LISTBOX_Paint(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { PAINTSTRUCT ps; HDC hdc = ( wParam ) ? ((HDC)wParam) : BeginPaint( hwnd, &ps ); LRESULT ret; ret = LISTBOX_Draw( hwnd, descr, hdc ); if( !wParam ) EndPaint( hwnd, &ps ); return ret; } static LRESULT LISTBOX_Size(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { LISTBOX_UpdateSize( hwnd, descr ); return 0; } static LRESULT LISTBOX_GetFont(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { return descr->font; } static LRESULT LISTBOX_SetFocus(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { descr->in_focus = TRUE; descr->caret_on = TRUE; if (descr->focus_item != -1) LISTBOX_RepaintItem( hwnd, descr, descr->focus_item, ODA_FOCUS ); SEND_NOTIFICATION( hwnd, descr, LBN_SETFOCUS ); return 0; } static LRESULT LISTBOX_KillFocus(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { descr->in_focus = FALSE; if ((descr->focus_item != -1) && descr->caret_on) LISTBOX_RepaintItem( hwnd, descr, descr->focus_item, ODA_FOCUS ); SEND_NOTIFICATION( hwnd, descr, LBN_KILLFOCUS ); return 0; } static LRESULT LISTBOX_MouseActivate(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { return MA_NOACTIVATE; } static LRESULT LISTBOX_LButtonDblClk(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if (descr->style & LBS_NOTIFY) SEND_NOTIFICATION( hwnd, descr, LBN_DBLCLK ); return 0; } static LRESULT LISTBOX_EraseBackground(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if (IS_OWNERDRAW(descr)) { RECT rect; HBRUSH hbrush = SendMessageA( descr->owner, WM_CTLCOLORLISTBOX, wParam, (LPARAM)hwnd ); GetClientRect(hwnd, &rect); if (hbrush) FillRect( (HDC)wParam, &rect, hbrush ); } return 1; } static LRESULT LISTBOX_DropFiles(HWND hwnd,LB_DESCR *descr,WPARAM wParam,LPARAM lParam) { if ( !descr->lphc ) return SendMessageA( descr->owner, WM_DROPFILES, wParam, lParam ); return 0; } static LRESULT LISTBOX_HandleDragDrop(HWND hwnd,LB_DESCR *descr,UINT msg,WPARAM wParam,LPARAM lParam) { if( !descr->lphc ) { LPDRAGINFO dragInfo = (LPDRAGINFO)lParam; dragInfo->l = LISTBOX_GetItemFromPoint( hwnd, descr, dragInfo->pt.x, dragInfo->pt.y ); return SendMessageA( descr->owner, msg, wParam, lParam ); } return 0; } /*********************************************************************** * ListBoxWndProc */ LRESULT WINAPI ListBoxWndProc( HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam ) { LB_DESCR *descr; if (!(descr = (LB_DESCR*)GetInfoPtr(hwnd))) { switch (msg) { case WM_CREATE: return LISTBOX_Create(hwnd,NULL); case WM_NCCREATE: return LISTBOX_NCCreate(hwnd,wParam,lParam); } /* Ignore all other messages before we get a WM_CREATE */ return DefWindowProcA( hwnd, msg, wParam, lParam ); } switch(msg) { case LB_RESETCONTENT: return LISTBOX_ResetContent(hwnd,descr,TRUE); case LB_ADDSTRING: return LISTBOX_AddString(hwnd,descr,wParam,lParam); case LB_INSERTSTRING: return LISTBOX_InsertString( hwnd, descr, wParam, (LPCSTR)lParam ); case LB_ADDFILE: return LISTBOX_AddFile(hwnd,descr,wParam,lParam); case LB_DELETESTRING: return LISTBOX_DeleteString(hwnd,descr,wParam,lParam); case LB_GETITEMDATA: return LISTBOX_GetItemData(hwnd,descr,wParam,lParam); case LB_SETITEMDATA: return LISTBOX_SetItemData(hwnd,descr,wParam,lParam); case LB_GETCOUNT: return LISTBOX_GetCount(hwnd,descr,wParam,lParam); case LB_GETTEXT: return LISTBOX_GetText( hwnd, descr, wParam, (LPSTR)lParam ); case LB_GETTEXTLEN: return LISTBOX_GetTextLen(hwnd,descr,wParam,lParam); case LB_GETCURSEL: return LISTBOX_GetCurSel(hwnd,descr,wParam,lParam); case LB_GETTOPINDEX: return LISTBOX_GetTopIndex(hwnd,descr,wParam,lParam); case LB_GETITEMHEIGHT: return LISTBOX_GetItemHeight( hwnd, descr, wParam ); case LB_SETITEMHEIGHT: return LISTBOX_SetItemHeight( hwnd, descr, wParam, lParam ); case LB_ITEMFROMPOINT: return LISTBOX_ItemFromPoint(hwnd,descr,wParam,lParam); case LB_SETCARETINDEX: return LISTBOX_HandleSetCaretIndex(hwnd,descr,wParam,lParam); case LB_GETCARETINDEX: return LISTBOX_GetCaretIndex(hwnd,descr,wParam,lParam); case LB_SETTOPINDEX: return LISTBOX_SetTopItem( hwnd, descr, wParam, TRUE ); case LB_SETCOLUMNWIDTH: return LISTBOX_SetColumnWidth( hwnd, descr, wParam ); case LB_GETITEMRECT: return LISTBOX_GetItemRect( hwnd, descr, wParam, (RECT *)lParam ); case LB_FINDSTRING: return LISTBOX_FindString( hwnd, descr, wParam, (LPCSTR)lParam, FALSE ); case LB_FINDSTRINGEXACT: return LISTBOX_FindString( hwnd, descr, wParam, (LPCSTR)lParam, TRUE ); case LB_SELECTSTRING: return LISTBOX_SelectString(hwnd,descr,wParam,lParam); case LB_GETSEL: return LISTBOX_GetSel(hwnd,descr,wParam,lParam); case LB_SETSEL: return LISTBOX_SetSelection( hwnd, descr, lParam, wParam, FALSE ); case LB_SETCURSEL: return LISTBOX_SetCurSel(hwnd,descr,wParam,lParam); case LB_GETSELCOUNT: return LISTBOX_GetSelCount( hwnd, descr ); case LB_GETSELITEMS: return LISTBOX_GetSelItems( hwnd, descr, wParam, (LPINT)lParam ); case LB_SELITEMRANGE: return LISTBOX_SelItemRange(hwnd,descr,wParam,lParam); case LB_SELITEMRANGEEX: return LISTBOX_SelItemRangeEx(hwnd,descr,wParam,lParam); case LB_GETHORIZONTALEXTENT: return LISTBOX_GetHorizontalExtent(hwnd,descr,wParam,lParam); case LB_SETHORIZONTALEXTENT: return LISTBOX_SetHorizontalExtent( hwnd, descr, wParam ); case LB_GETANCHORINDEX: return LISTBOX_GetAnchorIndex(hwnd,descr,wParam,lParam); case LB_SETANCHORINDEX: return LISTBOX_SetAnchorIndex(hwnd,descr,wParam,lParam); case LB_DIR: return LISTBOX_Directory( hwnd, descr, wParam, (LPCSTR)lParam, TRUE ); case LB_GETLOCALE: return LISTBOX_GetLocale(hwnd,descr,wParam,lParam); case LB_SETLOCALE: return LISTBOX_SetLocale(hwnd,descr,wParam,lParam); case LB_INITSTORAGE: return LISTBOX_InitStorage( hwnd, descr, wParam, (DWORD)lParam ); case LB_SETCOUNT: return LISTBOX_SetCount( hwnd, descr, (INT)wParam ); case LB_SETTABSTOPS: return LISTBOX_SetTabStops( hwnd, descr, wParam, (LPINT)lParam, FALSE ); case LB_CARETON: return LISTBOX_CaretOn(hwnd,descr,wParam,lParam); case LB_CARETOFF: return LISTBOX_CaretOff(hwnd,descr,wParam,lParam); case WM_DESTROY: return LISTBOX_Destroy( hwnd, descr ); case WM_ENABLE: return LISTBOX_Enable(hwnd,descr,wParam,lParam); case WM_SETREDRAW: return LISTBOX_SetRedraw( hwnd, descr, wParam != 0 ); case WM_GETDLGCODE: return LISTBOX_GetDlgCode(hwnd,descr,wParam,lParam); case WM_PAINT: return LISTBOX_Paint(hwnd,descr,wParam,lParam); case WM_SIZE: return LISTBOX_Size(hwnd,descr,wParam,lParam); case WM_GETFONT: return LISTBOX_GetFont(hwnd,descr,wParam,lParam); case WM_SETFONT: return LISTBOX_SetFont(hwnd,descr,wParam,lParam); case WM_SETFOCUS: return LISTBOX_SetFocus(hwnd,descr,wParam,lParam); case WM_KILLFOCUS: return LISTBOX_KillFocus(hwnd,descr,wParam,lParam); case WM_HSCROLL: return LISTBOX_HandleHScroll( hwnd, descr, wParam, lParam ); case WM_VSCROLL: return LISTBOX_HandleVScroll( hwnd, descr, wParam, lParam ); case WM_MOUSEACTIVATE: return LISTBOX_MouseActivate(hwnd,descr,wParam,lParam); case WM_MOUSEWHEEL: return LISTBOX_HandleMouseWheel( hwnd, descr, wParam, lParam ); case WM_LBUTTONDOWN: return LISTBOX_HandleLButtonDown( hwnd, descr, wParam, (INT16)LOWORD(lParam), (INT16)HIWORD(lParam) ); case WM_LBUTTONDBLCLK: return LISTBOX_LButtonDblClk(hwnd,descr,wParam,lParam); case WM_MOUSEMOVE: return LISTBOX_HandleMouseMove( hwnd, descr, (INT16)LOWORD(lParam), (INT16)HIWORD(lParam) ); case WM_LBUTTONUP: return LISTBOX_HandleLButtonUp( hwnd, descr ); case WM_KEYDOWN: return LISTBOX_HandleKeyDown( hwnd, descr, wParam ); case WM_CHAR: return LISTBOX_HandleChar( hwnd, descr, wParam ); case WM_SYSTIMER: return LISTBOX_HandleSystemTimer( hwnd, descr ); case WM_ERASEBKGND: return LISTBOX_EraseBackground(hwnd,descr,wParam,lParam); case WM_DROPFILES: return LISTBOX_DropFiles(hwnd,descr,wParam,lParam); case WM_DROPOBJECT: case WM_QUERYDROPOBJECT: case WM_DRAGSELECT: case WM_DRAGMOVE: return LISTBOX_HandleDragDrop(hwnd,descr,msg,wParam,lParam); default: //if ((msg >= WM_USER) && (msg < 0xc000)) // WARN("[%04x]: unknown msg %04x wp %08x lp %08lx\n", // hwnd, msg, wParam, lParam ); return DefWindowProcA( hwnd, msg, wParam, lParam ); } return 0; } /*********************************************************************** * COMBO_Directory */ LRESULT COMBO_Directory( LPHEADCOMBO lphc, UINT attrib, LPSTR dir, BOOL bLong) { LB_DESCR *descr = (LB_DESCR*)GetInfoPtr(lphc->hWndLBox); if( descr ) { #ifdef __WIN32OS2__ //bugfix LRESULT lRet = LISTBOX_Directory( lphc->hWndLBox, descr, attrib, dir, bLong ); #else LRESULT lRet = LISTBOX_Directory( lphc->hwndself, descr, attrib, dir, bLong ); #endif RedrawWindow( lphc->hwndself, NULL, 0, RDW_INVALIDATE | RDW_ERASE | RDW_UPDATENOW ); return lRet; } return CB_ERR; } /*********************************************************************** * ComboLBWndProc * * The combo listbox wndproc */ LRESULT WINAPI ComboLBWndProc( HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam ) { LRESULT lRet = 0; LB_DESCR *descr = (LB_DESCR*)GetInfoPtr(hwnd); //TRACE_(combo)("[%04x]: msg %s wp %08x lp %08lx\n", // wnd->hwndSelf, SPY_GetMsgName(msg), wParam, lParam ); if( descr || msg == WM_CREATE ) { LPHEADCOMBO lphc = (descr) ? descr->lphc : NULL; switch( msg ) { case WM_CREATE: #define lpcs ((LPCREATESTRUCTA)lParam) //TRACE_(combo)("\tpassed parent handle = 0x%08x\n", // (UINT)lpcs->lpCreateParams); lphc = (LPHEADCOMBO)(lpcs->lpCreateParams); #undef lpcs return LISTBOX_Create( hwnd, lphc ); case WM_MOUSEMOVE: if (lphc && (CB_GETTYPE(lphc) != CBS_SIMPLE)) { POINT mousePos; BOOL captured; RECT clientRect; mousePos.x = (INT16)LOWORD(lParam); mousePos.y = (INT16)HIWORD(lParam); /* * If we are in a dropdown combobox, we simulate that * the mouse is captured to show the tracking of the item. */ GetClientRect(hwnd, &clientRect); if (PtInRect( &clientRect, mousePos )) { captured = descr->captured; descr->captured = TRUE; LISTBOX_HandleMouseMove( hwnd, descr, mousePos.x, mousePos.y); descr->captured = captured; } else { LISTBOX_HandleMouseMove( hwnd, descr, mousePos.x, mousePos.y); } return 0; } else { /* * If we are in Win3.1 look, go with the default behavior. */ return ListBoxWndProc( hwnd, msg, wParam, lParam ); } case WM_LBUTTONUP: if (lphc) { POINT mousePos; RECT clientRect; /* * If the mouse button "up" is not in the listbox, * we make sure there is no selection by re-selecting the * item that was selected when the listbox was made visible. */ mousePos.x = (INT16)LOWORD(lParam); mousePos.y = (INT16)HIWORD(lParam); GetClientRect(hwnd, &clientRect); /* * When the user clicks outside the combobox and the focus * is lost, the owning combobox will send a fake buttonup with * 0xFFFFFFF as the mouse location, we must also revert the * selection to the original selection. */ if ( (lParam == 0xFFFFFFFF) || (!PtInRect( &clientRect, mousePos )) ) { LISTBOX_MoveCaret( hwnd, descr, lphc->droppedIndex, FALSE ); } return LISTBOX_HandleLButtonUp( hwnd, descr ); } case WM_LBUTTONDOWN: case WM_LBUTTONDBLCLK: return LISTBOX_HandleLButtonDownCombo( hwnd, descr,msg, wParam, (INT16)LOWORD(lParam), (INT16)HIWORD(lParam)); case WM_MOUSEACTIVATE: return MA_NOACTIVATE; case WM_NCACTIVATE: return FALSE; case WM_KEYDOWN: if(lphc && (CB_GETTYPE(lphc) != CBS_SIMPLE)) { /* for some reason(?) Windows makes it possible to * show/hide ComboLBox by sending it WM_KEYDOWNs */ if( (!(lphc->wState & CBF_EUI) && wParam == VK_F4) || ( (lphc->wState & CBF_EUI) && !(lphc->wState & CBF_DROPPED) && (wParam == VK_DOWN || wParam == VK_UP)) ) { COMBO_FlipListbox( lphc, FALSE, FALSE ); return 0; } } return LISTBOX_HandleKeyDown( hwnd, descr, wParam ); case LB_SETCURSEL: lRet = ListBoxWndProc( hwnd, msg, wParam, lParam ); lRet =(lRet == LB_ERR) ? lRet : descr->selected_item; return lRet; case WM_NCDESTROY: if(lphc && (CB_GETTYPE(lphc) != CBS_SIMPLE)) lphc->hWndLBox = 0; /* fall through */ default: return ListBoxWndProc( hwnd, msg, wParam, lParam ); } } lRet = DefWindowProcA( hwnd, msg, wParam, lParam ); //TRACE_(combo)("\t default on msg [%04x]\n", (UINT16)msg ); return lRet; } BOOL LISTBOX_Register() { WNDCLASSA wndClass; //SvL: Don't check this now // if (GlobalFindAtomA(LISTBOXCLASSNAME)) return FALSE; ZeroMemory(&wndClass,sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS; wndClass.lpfnWndProc = (WNDPROC)ListBoxWndProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(VOID*); wndClass.hCursor = LoadCursorA(0,IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)0; wndClass.lpszClassName = LISTBOXCLASSNAME; return RegisterClassA(&wndClass); } BOOL LISTBOX_Unregister() { if (GlobalFindAtomA(LISTBOXCLASSNAME)) return UnregisterClassA(LISTBOXCLASSNAME,(HINSTANCE)NULL); else return FALSE; } BOOL COMBOLBOX_Register() { WNDCLASSA wndClass; //SvL: Don't check this now // if (GlobalFindAtomA(COMBOLBOXCLASSNAME)) return FALSE; ZeroMemory(&wndClass,sizeof(WNDCLASSA)); wndClass.style = CS_GLOBALCLASS | CS_DBLCLKS | CS_SAVEBITS; wndClass.lpfnWndProc = (WNDPROC)ComboLBWndProc; wndClass.cbClsExtra = 0; wndClass.cbWndExtra = sizeof(VOID*); wndClass.hCursor = LoadCursorA(0,IDC_ARROWA); wndClass.hbrBackground = (HBRUSH)0; wndClass.lpszClassName = COMBOLBOXCLASSNAME; return RegisterClassA(&wndClass); } BOOL COMBOLBOX_Unregister() { if (GlobalFindAtomA(COMBOLBOXCLASSNAME)) return UnregisterClassA(COMBOLBOXCLASSNAME,(HINSTANCE)NULL); else return FALSE; }