| /* |
| * Progress control |
| * |
| * Copyright 1997, 2002 Dimitrie O. Paun |
| * Copyright 1998, 1999 Eric Kohl |
| * |
| * This library is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU Lesser General Public |
| * License as published by the Free Software Foundation; either |
| * version 2.1 of the License, or (at your option) any later version. |
| * |
| * This library is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| * Lesser General Public License for more details. |
| * |
| * You should have received a copy of the GNU Lesser General Public |
| * License along with this library; if not, write to the Free Software |
| * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
| */ |
| |
| #include <string.h> |
| #include "winbase.h" |
| #include "commctrl.h" |
| #include "wine/debug.h" |
| |
| WINE_DEFAULT_DEBUG_CHANNEL(progress); |
| |
| typedef struct |
| { |
| HWND Self; /* The window handle for this control */ |
| INT CurVal; /* Current progress value */ |
| INT MinVal; /* Minimum progress value */ |
| INT MaxVal; /* Maximum progress value */ |
| INT Step; /* Step to use on PMB_STEPIT */ |
| COLORREF ColorBar; /* Bar color */ |
| COLORREF ColorBk; /* Background color */ |
| HFONT Font; /* Handle to font (not unused) */ |
| } PROGRESS_INFO; |
| |
| /* Control configuration constants */ |
| |
| #define LED_GAP 2 |
| |
| #define UNKNOWN_PARAM(msg, wParam, lParam) WARN( \ |
| "Unknown parameter(s) for message " #msg \ |
| "(%04x): wp=%04x lp=%08lx\n", msg, wParam, lParam); |
| |
| /*********************************************************************** |
| * PROGRESS_EraseBackground |
| */ |
| static void PROGRESS_EraseBackground(PROGRESS_INFO *infoPtr, WPARAM wParam) |
| { |
| RECT rect; |
| HBRUSH hbrBk; |
| HDC hdc = wParam ? (HDC)wParam : GetDC(infoPtr->Self); |
| |
| /* get the required background brush */ |
| if(infoPtr->ColorBk == CLR_DEFAULT) |
| hbrBk = GetSysColorBrush(COLOR_3DFACE); |
| else |
| hbrBk = CreateSolidBrush(infoPtr->ColorBk); |
| |
| /* get client rectangle */ |
| GetClientRect(infoPtr->Self, &rect); |
| |
| /* draw the background */ |
| FillRect(hdc, &rect, hbrBk); |
| |
| /* delete background brush */ |
| if(infoPtr->ColorBk != CLR_DEFAULT) |
| DeleteObject (hbrBk); |
| |
| if(!wParam) ReleaseDC(infoPtr->Self, hdc); |
| } |
| |
| /*********************************************************************** |
| * PROGRESS_Draw |
| * Draws the progress bar. |
| */ |
| static LRESULT PROGRESS_Draw (PROGRESS_INFO *infoPtr, HDC hdc) |
| { |
| HBRUSH hbrBar; |
| int rightBar, rightMost, ledWidth; |
| RECT rect; |
| DWORD dwStyle; |
| |
| TRACE("(infoPtr=%p, hdc=%x)\n", infoPtr, hdc); |
| |
| /* get the required bar brush */ |
| if (infoPtr->ColorBar == CLR_DEFAULT) |
| hbrBar = GetSysColorBrush(COLOR_HIGHLIGHT); |
| else |
| hbrBar = CreateSolidBrush (infoPtr->ColorBar); |
| |
| /* get client rectangle */ |
| GetClientRect (infoPtr->Self, &rect); |
| |
| InflateRect(&rect, -1, -1); |
| |
| /* get the window style */ |
| dwStyle = GetWindowLongW (infoPtr->Self, GWL_STYLE); |
| |
| /* compute extent of progress bar */ |
| if (dwStyle & PBS_VERTICAL) { |
| rightBar = rect.bottom - |
| MulDiv (infoPtr->CurVal - infoPtr->MinVal, |
| rect.bottom - rect.top, |
| infoPtr->MaxVal - infoPtr->MinVal); |
| ledWidth = MulDiv (rect.right - rect.left, 2, 3); |
| rightMost = rect.top; |
| } else { |
| rightBar = rect.left + |
| MulDiv (infoPtr->CurVal - infoPtr->MinVal, |
| rect.right - rect.left, |
| infoPtr->MaxVal - infoPtr->MinVal); |
| ledWidth = MulDiv (rect.bottom - rect.top, 2, 3); |
| rightMost = rect.right; |
| } |
| |
| /* now draw the bar */ |
| if (dwStyle & PBS_SMOOTH) { |
| if (dwStyle & PBS_VERTICAL) |
| rect.top = rightBar; |
| else |
| rect.right = rightBar; |
| FillRect(hdc, &rect, hbrBar); |
| } else { |
| if (dwStyle & PBS_VERTICAL) { |
| while(rect.bottom > rightBar) { |
| rect.top = rect.bottom - ledWidth; |
| if (rect.top < rightMost) |
| rect.top = rightMost; |
| FillRect(hdc, &rect, hbrBar); |
| rect.bottom = rect.top - LED_GAP; |
| } |
| } else { |
| while(rect.left < rightBar) { |
| rect.right = rect.left + ledWidth; |
| if (rect.right > rightMost) |
| rect.right = rightMost; |
| FillRect(hdc, &rect, hbrBar); |
| rect.left = rect.right + LED_GAP; |
| } |
| } |
| } |
| |
| /* delete bar brush */ |
| if (infoPtr->ColorBar != CLR_DEFAULT) |
| DeleteObject (hbrBar); |
| |
| return 0; |
| } |
| |
| |
| /*********************************************************************** |
| * PROGRESS_Paint |
| * Draw the progress bar. The background need not be erased. |
| * If dc!=0, it draws on it |
| */ |
| static LRESULT PROGRESS_Paint (PROGRESS_INFO *infoPtr, HDC hdc) |
| { |
| PAINTSTRUCT ps; |
| if (hdc) return PROGRESS_Draw (infoPtr, hdc); |
| hdc = BeginPaint (infoPtr->Self, &ps); |
| PROGRESS_Draw (infoPtr, hdc); |
| EndPaint (infoPtr->Self, &ps); |
| return 0; |
| } |
| |
| |
| /*********************************************************************** |
| * PROGRESS_CoercePos |
| * Makes sure the current position (CurVal) is within bounds. |
| */ |
| static void PROGRESS_CoercePos(PROGRESS_INFO *infoPtr) |
| { |
| if(infoPtr->CurVal < infoPtr->MinVal) |
| infoPtr->CurVal = infoPtr->MinVal; |
| if(infoPtr->CurVal > infoPtr->MaxVal) |
| infoPtr->CurVal = infoPtr->MaxVal; |
| } |
| |
| |
| /*********************************************************************** |
| * PROGRESS_SetFont |
| * Set new Font for progress bar |
| */ |
| static HFONT PROGRESS_SetFont (PROGRESS_INFO *infoPtr, HFONT hFont, BOOL bRedraw) |
| { |
| HFONT hOldFont = infoPtr->Font; |
| infoPtr->Font = hFont; |
| /* Since infoPtr->Font is not used, there is no need for repaint */ |
| return hOldFont; |
| } |
| |
| static DWORD PROGRESS_SetRange (PROGRESS_INFO *infoPtr, int low, int high) |
| { |
| DWORD res = MAKELONG(LOWORD(infoPtr->MinVal), LOWORD(infoPtr->MaxVal)); |
| |
| /* if nothing changes, simply return */ |
| if(infoPtr->MinVal == low && infoPtr->MaxVal == high) return res; |
| |
| infoPtr->MinVal = low; |
| infoPtr->MaxVal = high; |
| PROGRESS_CoercePos(infoPtr); |
| return res; |
| } |
| |
| /*********************************************************************** |
| * ProgressWindowProc |
| */ |
| static LRESULT WINAPI ProgressWindowProc(HWND hwnd, UINT message, |
| WPARAM wParam, LPARAM lParam) |
| { |
| PROGRESS_INFO *infoPtr; |
| |
| TRACE("hwnd=%x msg=%04x wparam=%x lParam=%lx\n", hwnd, message, wParam, lParam); |
| |
| infoPtr = (PROGRESS_INFO *)GetWindowLongW(hwnd, 0); |
| |
| if (!infoPtr && message != WM_CREATE) |
| return DefWindowProcW( hwnd, message, wParam, lParam ); |
| |
| switch(message) { |
| case WM_CREATE: |
| { |
| DWORD dwExStyle = GetWindowLongW (hwnd, GWL_EXSTYLE); |
| dwExStyle &= ~(WS_EX_CLIENTEDGE | WS_EX_WINDOWEDGE); |
| dwExStyle |= WS_EX_STATICEDGE; |
| SetWindowLongW (hwnd, GWL_EXSTYLE, dwExStyle | WS_EX_STATICEDGE); |
| /* Force recalculation of a non-client area */ |
| SetWindowPos(hwnd, 0, 0, 0, 0, 0, |
| SWP_FRAMECHANGED | SWP_NOSIZE | SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE); |
| |
| /* allocate memory for info struct */ |
| infoPtr = (PROGRESS_INFO *)COMCTL32_Alloc (sizeof(PROGRESS_INFO)); |
| if (!infoPtr) return -1; |
| SetWindowLongW (hwnd, 0, (DWORD)infoPtr); |
| |
| /* initialize the info struct */ |
| infoPtr->Self = hwnd; |
| infoPtr->MinVal = 0; |
| infoPtr->MaxVal = 100; |
| infoPtr->CurVal = 0; |
| infoPtr->Step = 10; |
| infoPtr->ColorBar = CLR_DEFAULT; |
| infoPtr->ColorBk = CLR_DEFAULT; |
| infoPtr->Font = 0; |
| TRACE("Progress Ctrl creation, hwnd=%04x\n", hwnd); |
| return 0; |
| } |
| |
| case WM_DESTROY: |
| TRACE("Progress Ctrl destruction, hwnd=%04x\n", hwnd); |
| COMCTL32_Free (infoPtr); |
| SetWindowLongW(hwnd, 0, 0); |
| return 0; |
| |
| case WM_ERASEBKGND: |
| PROGRESS_EraseBackground(infoPtr, wParam); |
| return TRUE; |
| |
| case WM_GETFONT: |
| return (LRESULT)infoPtr->Font; |
| |
| case WM_SETFONT: |
| return PROGRESS_SetFont (infoPtr, (HFONT)wParam, (BOOL)lParam); |
| |
| case WM_PAINT: |
| return PROGRESS_Paint (infoPtr, (HDC)wParam); |
| |
| case PBM_DELTAPOS: |
| { |
| INT oldVal; |
| if(lParam) UNKNOWN_PARAM(PBM_DELTAPOS, wParam, lParam); |
| oldVal = infoPtr->CurVal; |
| if(wParam != 0) { |
| BOOL bErase; |
| infoPtr->CurVal += (INT)wParam; |
| PROGRESS_CoercePos (infoPtr); |
| TRACE("PBM_DELTAPOS: current pos changed from %d to %d\n", oldVal, infoPtr->CurVal); |
| bErase = (oldVal > infoPtr->CurVal); |
| InvalidateRect(hwnd, NULL, bErase); |
| } |
| return oldVal; |
| } |
| |
| case PBM_SETPOS: |
| { |
| INT oldVal; |
| if (lParam) UNKNOWN_PARAM(PBM_SETPOS, wParam, lParam); |
| oldVal = infoPtr->CurVal; |
| if(oldVal != wParam) { |
| BOOL bErase; |
| infoPtr->CurVal = (INT)wParam; |
| PROGRESS_CoercePos(infoPtr); |
| TRACE("PBM_SETPOS: current pos changed from %d to %d\n", oldVal, infoPtr->CurVal); |
| bErase = (oldVal > infoPtr->CurVal); |
| InvalidateRect(hwnd, NULL, bErase); |
| } |
| return oldVal; |
| } |
| |
| case PBM_SETRANGE: |
| if (wParam) UNKNOWN_PARAM(PBM_SETRANGE, wParam, lParam); |
| return PROGRESS_SetRange (infoPtr, (int)LOWORD(lParam), (int)HIWORD(lParam)); |
| |
| case PBM_SETSTEP: |
| { |
| INT oldStep; |
| if (lParam) UNKNOWN_PARAM(PBM_SETSTEP, wParam, lParam); |
| oldStep = infoPtr->Step; |
| infoPtr->Step = (INT)wParam; |
| return oldStep; |
| } |
| |
| case PBM_STEPIT: |
| { |
| INT oldVal; |
| if (wParam || lParam) UNKNOWN_PARAM(PBM_STEPIT, wParam, lParam); |
| oldVal = infoPtr->CurVal; |
| infoPtr->CurVal += infoPtr->Step; |
| if(infoPtr->CurVal > infoPtr->MaxVal) |
| infoPtr->CurVal = infoPtr->MinVal; |
| if(oldVal != infoPtr->CurVal) |
| { |
| BOOL bErase; |
| TRACE("PBM_STEPIT: current pos changed from %d to %d\n", oldVal, infoPtr->CurVal); |
| bErase = (oldVal > infoPtr->CurVal); |
| InvalidateRect(hwnd, NULL, bErase); |
| } |
| return oldVal; |
| } |
| |
| case PBM_SETRANGE32: |
| return PROGRESS_SetRange (infoPtr, (int)wParam, (int)lParam); |
| |
| case PBM_GETRANGE: |
| if (lParam) { |
| ((PPBRANGE)lParam)->iLow = infoPtr->MinVal; |
| ((PPBRANGE)lParam)->iHigh = infoPtr->MaxVal; |
| } |
| return wParam ? infoPtr->MinVal : infoPtr->MaxVal; |
| |
| case PBM_GETPOS: |
| if (wParam || lParam) UNKNOWN_PARAM(PBM_STEPIT, wParam, lParam); |
| return infoPtr->CurVal; |
| |
| case PBM_SETBARCOLOR: |
| if (wParam) UNKNOWN_PARAM(PBM_SETBARCOLOR, wParam, lParam); |
| infoPtr->ColorBar = (COLORREF)lParam; |
| InvalidateRect(hwnd, NULL, TRUE); |
| return 0; |
| |
| case PBM_SETBKCOLOR: |
| if (wParam) UNKNOWN_PARAM(PBM_SETBKCOLOR, wParam, lParam); |
| infoPtr->ColorBk = (COLORREF)lParam; |
| InvalidateRect(hwnd, NULL, TRUE); |
| return 0; |
| |
| default: |
| if (message >= WM_USER) |
| ERR("unknown msg %04x wp=%04x lp=%08lx\n", message, wParam, lParam ); |
| return DefWindowProcW( hwnd, message, wParam, lParam ); |
| } |
| } |
| |
| |
| /*********************************************************************** |
| * PROGRESS_Register [Internal] |
| * |
| * Registers the progress bar window class. |
| */ |
| VOID PROGRESS_Register (void) |
| { |
| WNDCLASSW wndClass; |
| |
| ZeroMemory (&wndClass, sizeof(wndClass)); |
| wndClass.style = CS_GLOBALCLASS | CS_VREDRAW | CS_HREDRAW; |
| wndClass.lpfnWndProc = (WNDPROC)ProgressWindowProc; |
| wndClass.cbClsExtra = 0; |
| wndClass.cbWndExtra = sizeof (PROGRESS_INFO *); |
| wndClass.hCursor = LoadCursorW (0, IDC_ARROWW); |
| wndClass.lpszClassName = PROGRESS_CLASSW; |
| |
| RegisterClassW (&wndClass); |
| } |
| |
| |
| /*********************************************************************** |
| * PROGRESS_Unregister [Internal] |
| * |
| * Unregisters the progress bar window class. |
| */ |
| VOID PROGRESS_Unregister (void) |
| { |
| UnregisterClassW (PROGRESS_CLASSW, (HINSTANCE)NULL); |
| } |
| |
