359 lines
11 KiB
C
359 lines
11 KiB
C
/*
|
|
* Progress control
|
|
*
|
|
* Copyright 1997, 2002 Dimitrie O. Paun
|
|
* Copyright 1998, 1999 Eric Kohl
|
|
*
|
|
*/
|
|
|
|
#include <string.h>
|
|
#include "winbase.h"
|
|
#include "commctrl.h"
|
|
#include "debugtools.h"
|
|
|
|
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_Draw
|
|
* Draws the progress bar.
|
|
*/
|
|
static LRESULT PROGRESS_Draw (PROGRESS_INFO *infoPtr, HDC hdc)
|
|
{
|
|
HBRUSH hbrBar, hbrBk;
|
|
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 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);
|
|
|
|
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);
|
|
|
|
/* delete background brush */
|
|
if (infoPtr->ColorBk != CLR_DEFAULT)
|
|
DeleteObject (hbrBk);
|
|
|
|
return 0;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* PROGRESS_Refresh
|
|
* Draw the progress bar. The background need not be erased.
|
|
*/
|
|
static LRESULT PROGRESS_Refresh (PROGRESS_INFO *infoPtr)
|
|
{
|
|
HDC hdc = GetDC (infoPtr->Self);
|
|
LRESULT res = PROGRESS_Draw (infoPtr, hdc);
|
|
ReleaseDC (infoPtr->Self, hdc);
|
|
return res;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* 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;
|
|
if (bRedraw) PROGRESS_Refresh (infoPtr);
|
|
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;
|
|
|
|
/* if things are different, adjust values and repaint the control */
|
|
if (high <= low) high = low + 1;
|
|
infoPtr->MinVal = low;
|
|
infoPtr->MaxVal = high;
|
|
PROGRESS_CoercePos(infoPtr);
|
|
PROGRESS_Refresh (infoPtr);
|
|
return res;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* ProgressWindowProc
|
|
*/
|
|
static LRESULT WINAPI ProgressWindowProc(HWND hwnd, UINT message,
|
|
WPARAM wParam, LPARAM lParam)
|
|
{
|
|
PROGRESS_INFO *infoPtr = (PROGRESS_INFO *)GetWindowLongW(hwnd, 0);
|
|
DWORD dwExStyle;
|
|
UINT temp;
|
|
|
|
if (!infoPtr && message != WM_CREATE)
|
|
return DefWindowProcW( hwnd, message, wParam, lParam );
|
|
|
|
switch(message) {
|
|
case WM_CREATE:
|
|
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:
|
|
/* pretend to erase it here, but we will do it in the paint
|
|
function to avoid flicker */
|
|
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:
|
|
if(lParam) UNKNOWN_PARAM(PBM_DELTAPOS, wParam, lParam);
|
|
temp = infoPtr->CurVal;
|
|
if(wParam != 0) {
|
|
infoPtr->CurVal += (WORD)wParam;
|
|
PROGRESS_CoercePos (infoPtr);
|
|
PROGRESS_Refresh (infoPtr);
|
|
}
|
|
return temp;
|
|
|
|
case PBM_SETPOS:
|
|
if (lParam) UNKNOWN_PARAM(PBM_SETPOS, wParam, lParam);
|
|
temp = infoPtr->CurVal;
|
|
if(temp != wParam) {
|
|
infoPtr->CurVal = (WORD)wParam;
|
|
PROGRESS_CoercePos(infoPtr);
|
|
PROGRESS_Refresh (infoPtr);
|
|
}
|
|
return temp;
|
|
|
|
case PBM_SETRANGE:
|
|
if (wParam) UNKNOWN_PARAM(PBM_SETRANGE, wParam, lParam);
|
|
return PROGRESS_SetRange (infoPtr, (int)LOWORD(lParam), (int)HIWORD(lParam));
|
|
|
|
case PBM_SETSTEP:
|
|
if (lParam) UNKNOWN_PARAM(PBM_SETSTEP, wParam, lParam);
|
|
temp = infoPtr->Step;
|
|
infoPtr->Step = (WORD)wParam;
|
|
return temp;
|
|
|
|
case PBM_STEPIT:
|
|
if (wParam || lParam) UNKNOWN_PARAM(PBM_STEPIT, wParam, lParam);
|
|
temp = infoPtr->CurVal;
|
|
infoPtr->CurVal += infoPtr->Step;
|
|
if(infoPtr->CurVal > infoPtr->MaxVal)
|
|
infoPtr->CurVal = infoPtr->MinVal;
|
|
if(temp != infoPtr->CurVal)
|
|
PROGRESS_Refresh (infoPtr);
|
|
return temp;
|
|
|
|
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;
|
|
return PROGRESS_Refresh (infoPtr);
|
|
|
|
case PBM_SETBKCOLOR:
|
|
if (wParam) UNKNOWN_PARAM(PBM_SETBKCOLOR, wParam, lParam);
|
|
infoPtr->ColorBk = (COLORREF)lParam;
|
|
return PROGRESS_Refresh (infoPtr);
|
|
|
|
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);
|
|
}
|
|
|