dlls/comctl32/draglist.c

   1 /*
   2  * Drag List control
   3  *
   4  * Copyright 1999 Eric Kohl
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  *
  20  * NOTES
  21  *   This is just a dummy control. An author is needed! Any volunteers?
  22  *     Eric <ekohl@abo.rhein-zeitung.de>
  23  *
  24  * TODO:
  25  *   - Everything.
  26  */
  27
  28 #include <stdarg.h>
  29
  30 #include "windef.h"
  31 #include "winbase.h"
  32 #include "wingdi.h"
  33 #include "winuser.h"
  34 #include "winnls.h"
  35 #include "commctrl.h"
  36 #include "wine/debug.h"
  37
  38 WINE_DEFAULT_DEBUG_CHANNEL(commctrl);
  39
  40
  41 static DWORD dwLastScrollTime = 0;
  42
  43 /***********************************************************************
  44  *              MakeDragList (COMCTL32.13)
  45  *
  46  * Makes a normal ListBox into a DragList by subclassing it.
  47  *
  48  * RETURNS
  49  *      Success: Non-zero
  50  *      Failure: Zero
  51  */
  52 BOOL WINAPI MakeDragList (HWND hwndLB)
  53 {
  54     FIXME("(%p)\n", hwndLB);
  55
  56
  57     return FALSE;
  58 }
  59
  60 /***********************************************************************
  61  *              DrawInsert (COMCTL32.15)
  62  *
  63  * Draws insert arrow by the side of the ListBox item in the parent window.
  64  *
  65  * RETURNS
  66  *      Nothing.
  67  */
  68 VOID WINAPI DrawInsert (HWND hwndParent, HWND hwndLB, INT nItem)
  69 {
  70     FIXME("(%p %p %d)\n", hwndParent, hwndLB, nItem);
  71
  72
  73 }
  74
  75 /***********************************************************************
  76  *              LBItemFromPt (COMCTL32.14)
  77  *
  78  * Gets the index of the ListBox item under the specified point,
  79  * scrolling if bAutoScroll is TRUE and pt is outside of the ListBox.
  80  *
  81  * RETURNS
  82  *      The ListBox item ID if pt is over a list item or -1 otherwise.
  83  */
  84 INT WINAPI LBItemFromPt (HWND hwndLB, POINT pt, BOOL bAutoScroll)
  85 {
  86     RECT rcClient;
  87     INT nIndex;
  88     DWORD dwScrollTime;
  89
  90     FIXME("(%p %ld x %ld %s)\n",
  91            hwndLB, pt.x, pt.y, bAutoScroll ? "TRUE" : "FALSE");
  92
  93     ScreenToClient (hwndLB, &pt);
  94     GetClientRect (hwndLB, &rcClient);
  95     nIndex = (INT)SendMessageA (hwndLB, LB_GETTOPINDEX, 0, 0);
  96
  97     if (PtInRect (&rcClient, pt))
  98     {
  99         /* point is inside -- get the item index */
 100         while (TRUE)
 101         {
 102             if (SendMessageA (hwndLB, LB_GETITEMRECT, nIndex, (LPARAM)&rcClient) == LB_ERR)
 103                 return -1;
 104
 105             if (PtInRect (&rcClient, pt))
 106                 return nIndex;
 107
 108             nIndex++;
 109         }
 110     }
 111     else
 112     {
 113         /* point is outside */
 114         if (!bAutoScroll)
 115             return -1;
 116
 117         if ((pt.x > rcClient.right) || (pt.x < rcClient.left))
 118             return -1;
 119
 120         if (pt.y < 0)
 121             nIndex--;
 122         else
 123             nIndex++;
 124
 125         dwScrollTime = GetTickCount ();
 126
 127         if ((dwScrollTime - dwLastScrollTime) < 200)
 128             return -1;
 129
 130         dwLastScrollTime = dwScrollTime;
 131
 132         SendMessageA (hwndLB, LB_SETTOPINDEX, (WPARAM)nIndex, 0);
 133     }
 134
 135     return -1;
 136 }
 137
 138
 139 #if 0
 140 static LRESULT CALLBACK
 141 DRAGLIST_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
 142 {
 143
 144     return FALSE;
 145 }
 146 #endif