archive
/
windows-nt-4.0
mirror of https://github.com/lianthony/NT4.0
2
0
Fork 0
Code Issues Projects Releases Wiki Activity
Windows NT 4.0 source code leak
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
2 Commits
1 Branch
0 Tags
184 MiB
 
 
 
 
 
 
Tree: b4a8d373d8
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from 'b4a8d373d8'
${ noResults }
windows-nt-4.0/private/windows/cairoshl/commctrl/status.c

1226 lines
32 KiB
Raw Blame History

/*
** STATUS.C
**
** Status bar code
**
*/
#include "ctlspriv.h"
typedef struct {
DWORD dwString;
UINT uType;
int right;
} STRINGINFO, NEAR *PSTRINGINFO;
typedef struct {
HWND hwnd;
HWND hwndParent;
HFONT hStatFont;
BOOL bDefFont;
int nFontHeight;
int nMinHeight;
int nBorderX, nBorderY, nBorderPart;
int nLastX; // for invalidating unclipped right side
int dxGripper; // 0 if no gripper
STRINGINFO sSimple;
int nParts;
STRINGINFO sInfo[1];
} STATUSINFO, NEAR *PSTATUSINFO;
#define SBT_NORMAL 0xf000
#define SBT_NULL 0x0000 /* Some code depends on this being 0 */
#define SBT_ALLTYPES 0xf000 /* WINDOWS_ME: this does NOT include rtlred */
#define SBT_NOSIMPLE 0x00ff /* Flags to indicate normal status bar */
#define MAXPARTS 256
#define MAX_STATUS_TEXT_LEN 128
BOOL NEAR PASCAL SBSetText(PSTATUSINFO pStatusInfo, WPARAM wParam, LPCTSTR lpsz);
void NEAR PASCAL SBSetBorders(PSTATUSINFO pStatusInfo, LPINT lpInt);
void NEAR PASCAL SBSetFont(PSTATUSINFO pStatusInfo, HFONT hFont, BOOL bInvalidate);
void NEAR PASCAL NewFont(PSTATUSINFO pStatusInfo, HFONT hNewFont)
{
HFONT hOldFont;
BOOL bDelFont;
HDC hDC;
#ifndef WIN32
LOGFONT lf;
#endif
NONCLIENTMETRICS ncm;
hOldFont = pStatusInfo->hStatFont;
bDelFont = pStatusInfo->bDefFont;
hDC = GetDC(pStatusInfo->hwnd);
if (hNewFont) {
pStatusInfo->hStatFont = hNewFont;
pStatusInfo->bDefFont = FALSE;
} else {
if (bDelFont) {
/* I will reuse the default font, so don't delete it later
*/
hNewFont = pStatusInfo->hStatFont;
bDelFont = FALSE;
} else {
#ifndef DBCS_FONT
ncm.cbSize = sizeof(ncm);
SystemParametersInfo(SPI_GETNONCLIENTMETRICS, sizeof(ncm), &ncm, 0);
#ifdef WIN32
hNewFont = CreateFontIndirect(&ncm.lfStatusFont);
#else
lf.lfHeight = (int)ncm.lfStatusFont.lfHeight;
lf.lfWidth = (int)ncm.lfStatusFont.lfWidth;
lf.lfEscapement = (int)ncm.lfStatusFont.lfEscapement;
lf.lfWeight = (int)ncm.lfStatusFont.lfWeight;
hmemcpy(&lf.lfItalic, &ncm.lfStatusFont.lfCommon, sizeof(COMMONFONT));
hNewFont = CreateFontIndirect(&lf);
#endif
if (!hNewFont)
#endif // DBCS_FONT
hNewFont = g_hfontSystem;
pStatusInfo->hStatFont = hNewFont;
pStatusInfo->bDefFont = (BOOL)hNewFont; /* I'm cheating here! */
}
}
#ifndef DBCS_FONT
/* We delete the old font after creating the new one in case they are
* the same; this should help GDI a little
*/
if (bDelFont)
DeleteObject(hOldFont);
#endif
/* HACK! Pass in -1 to just delete the old font
*/
if (hNewFont != (HFONT)-1)
{
TEXTMETRIC tm;
hOldFont = 0;
if (hNewFont)
hOldFont = SelectObject(hDC, hNewFont);
GetTextMetrics(hDC, &tm);
if (hOldFont)
SelectObject(hDC, hOldFont);
pStatusInfo->nFontHeight = tm.tmHeight + tm.tmInternalLeading;
#ifdef DBCS
if ( !tm.tmInternalLeading )
pStatusInfo->nFontHeight += g_cyBorder * 2;
#endif
}
ReleaseDC(pStatusInfo->hwnd, hDC);
}
/* We should send messages instead of calling things directly so we can
* be subclassed more easily.
*/
LRESULT NEAR PASCAL InitStatusWnd(HWND hWnd, LPCREATESTRUCT lpCreate)
{
int nBorders[3];
PSTATUSINFO pStatusInfo = (PSTATUSINFO)LocalAlloc(LPTR, sizeof(STATUSINFO));
if (!pStatusInfo)
return -1; // fail the window create
SetWindowInt(hWnd, 0, (int)pStatusInfo);
pStatusInfo->hwnd = hWnd;
pStatusInfo->hwndParent = lpCreate->hwndParent;
// pStatusInfo->hStatFont = NULL;
// pStatusInfo->bDefFont = FALSE;
// pStatusInfo->nFontHeight = 0;
// pStatusInfo->nMinHeight = 0;
// pStatusInfo->nBorderX = 0;
// pStatusInfo->nBorderY = 0;
// pStatusInfo->nBorderPart = 0;
pStatusInfo->sSimple.uType = SBT_NOSIMPLE | SBT_NULL;
pStatusInfo->sSimple.right = -1;
pStatusInfo->nParts = 1;
pStatusInfo->sInfo[0].uType = SBT_NULL;
pStatusInfo->sInfo[0].right = -1;
// Save the window text in our struct, and let USER store the NULL string
SBSetText(pStatusInfo, 0, (LPCTSTR)lpCreate->lpszName);
lpCreate->lpszName = c_szNULL;
SBSetFont(pStatusInfo, 0, FALSE);
nBorders[0] = -1; // use default border widths
nBorders[1] = -1;
nBorders[2] = -1;
SBSetBorders(pStatusInfo, nBorders);
#define GRIPSIZE (g_cxVScroll + g_cxBorder) // make the default look good
if ((lpCreate->style & SBARS_SIZEGRIP) ||
((GetWindowStyle(lpCreate->hwndParent) & WS_THICKFRAME) &&
!(lpCreate->style & (CCS_NOPARENTALIGN | CCS_TOP | CCS_NOMOVEY))))
pStatusInfo->dxGripper = GRIPSIZE;
return 0; // success
}
// lprc is left unchanged, but used as scratch
void WINAPI DrawStatusText(HDC hDC, LPRECT lprc, LPCTSTR pszText, UINT uFlags)
{
int len, nWidth, nHeight;
HBRUSH hFaceBrush=NULL;
COLORREF crTextColor, crBkColor;
UINT uOpts;
BOOL bNull;
int nOldMode;
int i, left;
LPTSTR lpTab, lpNext;
TCHAR szBuf[MAX_STATUS_TEXT_LEN];
#if defined(WINDOWS_ME)
int oldAlign;
#endif
if (!pszText)
return;
#if defined(WINDOWS_ME)
if (uFlags & SBT_RTLREADING)
{
oldAlign = GetTextAlign(hDC);
SetTextAlign(hDC, oldAlign | TA_RTLREADING);
}
#endif
lstrcpyn(szBuf, pszText, ARRAYSIZE(szBuf));
//
// Create the three brushes we need. If the button face is a solid
// color, then we will just draw in opaque, instead of using a
// brush to avoid the flash
//
if (GetNearestColor(hDC, g_clrBtnFace) == g_clrBtnFace ||
!(hFaceBrush = CreateSolidBrush(g_clrBtnFace)))
{
uOpts = ETO_CLIPPED | ETO_OPAQUE;
nOldMode = SetBkMode(hDC, OPAQUE);
}
else
{
uOpts = ETO_CLIPPED;
nOldMode = SetBkMode(hDC, TRANSPARENT);
}
crTextColor = SetTextColor(hDC, g_clrBtnText);
crBkColor = SetBkColor(hDC, g_clrBtnFace);
// Draw the hilites
if (!(uFlags & SBT_NOBORDERS))
// BF_ADJUST does the InflateRect stuff
DrawEdge(hDC, lprc, (uFlags & SBT_POPOUT) ? BDR_RAISEDINNER : BDR_SUNKENOUTER, BF_RECT | BF_ADJUST);
else
InflateRect(lprc, -g_cxBorder, -g_cyBorder);
if (hFaceBrush)
{
HBRUSH hOldBrush = SelectObject(hDC, hFaceBrush);
if (hOldBrush)
{
PatBlt(hDC, lprc->left, lprc->top,
lprc->right-lprc->left, lprc->bottom-lprc->top, PATCOPY);
SelectObject(hDC, hOldBrush);
}
}
for (i=0, lpNext=szBuf, bNull=FALSE; i<3; ++i)
{
/* Optimize for NULL left or center strings
*/
if (*lpNext==TEXT('\t') && i<=1)
{
++lpNext;
continue;
}
/* Determine the end of the current string
*/
for (lpTab=lpNext; ; lpTab=AnsiNext(lpTab))
{
if (!*lpTab)
{
bNull = TRUE;
break;
}
else if (*lpTab == TEXT('\t'))
break;
}
*lpTab = TEXT('\0');
len = lstrlen(lpNext);
/* i=0 means left, 1 means center, and 2 means right justified text
*/
MGetTextExtent(hDC, lpNext, len, &nWidth, &nHeight);
switch (i) {
case 0:
left = lprc->left + 2*g_cxBorder;
break;
case 1:
left = (lprc->left + lprc->right - nWidth) / 2;
break;
default:
left = lprc->right - 2 * g_cxBorder - nWidth;
break;
}
ExtTextOut(hDC, left, (lprc->bottom - nHeight + lprc->top) / 2, uOpts, lprc, lpNext, len, NULL);
/* Now that we have drawn text once, take off the OPAQUE flag
*/
uOpts = ETO_CLIPPED;
if (bNull)
break;
*lpTab = TEXT('\t');
lpNext = lpTab + 1;
}
#if defined(WINDOWS_ME)
if (uFlags & SBT_RTLREADING)
SetTextAlign(hDC, oldAlign);
#endif
// restore the rect to original dimensions
InflateRect(lprc, g_cxBorder, g_cyBorder);
SetTextColor(hDC, crTextColor);
SetBkColor(hDC, crBkColor);
SetBkMode(hDC, nOldMode);
if (hFaceBrush)
DeleteObject(hFaceBrush);
}
#ifdef UNICODE
void WINAPI DrawStatusTextA(HDC hDC, LPRECT lprc, LPCSTR pszText, UINT uFlags)
{
INT cch;
LPWSTR lpw;
cch = lstrlenA(pszText);
lpw = (LPWSTR)LocalAlloc(LMEM_ZEROINIT, ((cch + 1) * sizeof(TCHAR)));
if (!lpw) {
#ifdef DEBUG
OutputDebugString(TEXT("Alloc failed: DrawStatusTextA\r\n"));
#endif
return;
}
MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED, pszText, cch, lpw, cch);
DrawStatusTextW(hDC, lprc, lpw, uFlags);
LocalFree((LPVOID)lpw);
}
#else
//
// Stub Unicode function for DrawStatusTextW when this
// code is built ANSI.
//
void WINAPI DrawStatusTextW(HDC hDC, LPRECT lprc, LPCWSTR pszText, UINT uFlags)
{
SetLastErrorEx(ERROR_CALL_NOT_IMPLEMENTED, SLE_WARNING);
return;
}
#endif
BOOL NEAR PASCAL Status_GetRect(PSTATUSINFO pStatusInfo, int nthPart, LPRECT lprc)
{
PSTRINGINFO pStringInfo = pStatusInfo->sInfo;
if (pStatusInfo->sSimple.uType & SBT_NOSIMPLE)
{
RECT rc;
int nRightMargin, i;
/* Get the client rect and inset the top and bottom. Then set
* up the right side for entry into the loop
*/
GetClientRect(pStatusInfo->hwnd, &rc);
if (pStatusInfo->dxGripper && !IsZoomed(pStatusInfo->hwndParent))
{
rc.right = rc.right - pStatusInfo->dxGripper + pStatusInfo->nBorderX;
}
rc.top += pStatusInfo->nBorderY;
nRightMargin = rc.right - pStatusInfo->nBorderX;
rc.right = pStatusInfo->nBorderX - pStatusInfo->nBorderPart;
for (i = 0; i < pStatusInfo->nParts; ++i, ++pStringInfo)
{
if (pStringInfo->right == 0)
continue;
rc.left = rc.right + pStatusInfo->nBorderPart;
rc.right = pStringInfo->right;
// size the right-most one to the end with room for border
if (rc.right < 0 || rc.right > nRightMargin)
rc.right = nRightMargin;
// if the part is real small, don't show it
if ((rc.right - rc.left) < pStatusInfo->nBorderPart)
continue;
if (i == nthPart)
{
*lprc = rc;
return TRUE;
}
}
}
return FALSE;
}
void NEAR PASCAL PaintStatusWnd(PSTATUSINFO pStatusInfo, HDC hdcIn, PSTRINGINFO pStringInfo, int nParts, int nBorderX)
{
PAINTSTRUCT ps;
RECT rc, rcGripper;
int nRightMargin, i;
HFONT hOldFont = NULL;
UINT uType;
BOOL bDrawGrip;
// paint the whole client area
GetClientRect(pStatusInfo->hwnd, &rc);
if (hdcIn)
{
ps.rcPaint = rc;
ps.hdc = hdcIn;
}
else
BeginPaint(pStatusInfo->hwnd, &ps);
rc.top += pStatusInfo->nBorderY;
bDrawGrip = pStatusInfo->dxGripper && !IsZoomed(pStatusInfo->hwndParent);
if (bDrawGrip)
rcGripper = rc;
nRightMargin = rc.right - nBorderX;
rc.right = nBorderX - pStatusInfo->nBorderPart;
if (pStatusInfo->hStatFont)
hOldFont = SelectObject(ps.hdc, pStatusInfo->hStatFont);
for (i=0; i<nParts; ++i, ++pStringInfo)
{
if (pStringInfo->right == 0)
continue;
rc.left = rc.right + pStatusInfo->nBorderPart;
rc.right = pStringInfo->right;
// size the right-most one to the end with room for border
if (rc.right < 0 || rc.right > nRightMargin)
rc.right = nRightMargin;
// if the part is real small, don't show it
if (((rc.right - rc.left) < pStatusInfo->nBorderPart) || !RectVisible(ps.hdc, &rc))
continue;
uType = pStringInfo->uType;
if ((uType&SBT_ALLTYPES) == SBT_NORMAL)
{
DrawStatusText(ps.hdc, &rc, (LPTSTR)OFFSETOF(pStringInfo->dwString), uType);
}
else
{
DrawStatusText(ps.hdc, &rc, c_szNULL, uType);
if (uType & SBT_OWNERDRAW)
{
DRAWITEMSTRUCT di;
di.CtlID = GetWindowID(pStatusInfo->hwnd);
di.itemID = i;
di.hwndItem = pStatusInfo->hwnd;
di.hDC = ps.hdc;
di.rcItem = rc;
InflateRect(&di.rcItem, -g_cxBorder, -g_cyBorder);
di.itemData = pStringInfo->dwString;
if (i != nParts-1)
// If we are doing the last status bar or are in menu
// mode with no "parts" to the status bar, don't bother
// with the slow save/restore dc stuff.
SaveDC(ps.hdc);
IntersectClipRect(ps.hdc, di.rcItem.left, di.rcItem.top,
di.rcItem.right, di.rcItem.bottom);
SendMessage(pStatusInfo->hwndParent, WM_DRAWITEM, di.CtlID,
(LPARAM)(LPTSTR)&di);
if (i != nParts-1)
RestoreDC(ps.hdc, -1);
}
}
}
if (bDrawGrip)
{
RECT rcTemp;
COLORREF crBkColor;
pStatusInfo->dxGripper = min(pStatusInfo->dxGripper, pStatusInfo->nFontHeight);
// draw the grip
rcGripper.right -= g_cxBorder; // inside the borders
rcGripper.bottom -= g_cyBorder;
rcGripper.left = rcGripper.right - pStatusInfo->dxGripper; // make it square
rcGripper.top += g_cyBorder;
// rcGripper.top = rcGripper.bottom - pStatusInfo->dxGripper;
#if 0
rcTemp = rcGripper;
InflateRect(&rcTemp, g_cxBorder, g_cyBorder);
crBkColor = SetBkColor(ps.hdc, RGB(255, 0, 0));
ExtTextOut(ps.hdc, 0, 0, ETO_OPAQUE, &rcTemp, NULL, 0, NULL);
crBkColor = SetBkColor(ps.hdc, crBkColor);
#endif
DrawFrameControl(ps.hdc, &rcGripper, DFC_SCROLL, DFCS_SCROLLSIZEGRIP);
// clear out the border edges to make this appear on the same level
crBkColor = SetBkColor(ps.hdc, g_clrBtnFace);
// NOTE: these values line up right only for the default scroll bar
// width. for others this is close enough...
// right border
rcTemp.top = rcGripper.bottom - pStatusInfo->dxGripper + g_cyBorder + g_cyEdge;
rcTemp.left = rcGripper.right;
rcTemp.bottom = rcGripper.bottom;
rcTemp.right = rcGripper.right + g_cxBorder;
ExtTextOut(ps.hdc, 0, 0, ETO_OPAQUE, &rcTemp, NULL, 0, NULL);
// bottom border
rcTemp.top = rcGripper.bottom;
rcTemp.left = rcGripper.left + g_cyBorder + g_cxEdge;
rcTemp.bottom = rcGripper.bottom + g_cyBorder;
rcTemp.right = rcGripper.right + g_cxBorder;
ExtTextOut(ps.hdc, 0, 0, ETO_OPAQUE, &rcTemp, NULL, 0, NULL);
SetBkColor(ps.hdc, crBkColor);
}
if (hOldFont)
SelectObject(ps.hdc, hOldFont);
if (hdcIn == NULL)
EndPaint(pStatusInfo->hwnd, &ps);
}
BOOL NEAR PASCAL SetStatusText(PSTATUSINFO pStatusInfo, PSTRINGINFO pStringInfo, UINT uPart, LPCTSTR lpStr)
{
PTSTR pString;
UINT wLen;
int nPart;
RECT rc;
nPart = LOBYTE(uPart);
/* Note it is up to the app the dispose of the previous itemData for
* SBT_OWNERDRAW
*/
if ((pStringInfo->uType&SBT_ALLTYPES) == SBT_NORMAL)
LocalFree((HLOCAL)OFFSETOF(pStringInfo->dwString));
/* Set to the NULL string in case anything goes wrong
*/
pStringInfo->uType = uPart & 0xff00;
pStringInfo->uType &= ~SBT_ALLTYPES;
pStringInfo->uType |= SBT_NULL;
/* Invalidate the rect of this pane
*/
GetClientRect(pStatusInfo->hwnd, &rc);
if (nPart)
rc.left = pStringInfo[-1].right;
if (pStringInfo->right > 0)
rc.right = pStringInfo->right;
InvalidateRect(pStatusInfo->hwnd, &rc, FALSE);
switch (uPart&SBT_ALLTYPES)
{
case 0:
/* If lpStr==NULL, we have the NULL string
*/
if (HIWORD(lpStr))
{
wLen = lstrlen(lpStr);
if (wLen)
{
pString = (PTSTR)LocalAlloc(LPTR, (wLen+1)*sizeof(TCHAR));
pStringInfo->dwString = (DWORD)(LPTSTR)pString;
if (pString)
{
pStringInfo->uType |= SBT_NORMAL;
/* Copy the string
*/
lstrcpy(pString, lpStr);
/* Replace unprintable characters (like CR/LF) with spaces
*/
for ( ; *pString;
pString=(PTSTR)OFFSETOF((DWORD)(UINT)AnsiNext(pString)))
if ((unsigned)(*pString)<(unsigned)TEXT(' ') && *pString!= TEXT('\t'))
*pString = TEXT(' ');
}
else
{
/* We return FALSE to indicate there was an error setting
* the string
*/
return(FALSE);
}
}
}
else if (LOWORD(lpStr))
{
/* We don't allow this anymore; the app needs to set the ownerdraw
* bit for ownerdraw.
*/
return(FALSE);
}
break;
case SBT_OWNERDRAW:
pStringInfo->uType |= SBT_OWNERDRAW;
pStringInfo->dwString = (DWORD)lpStr;
break;
default:
return(FALSE);
}
return(TRUE);
}
BOOL NEAR PASCAL SetStatusParts(PSTATUSINFO pStatusInfo, int nParts, LPINT lpInt)
{
int i;
PSTATUSINFO pStatusTemp;
PSTRINGINFO pStringInfo;
BOOL bRedraw = FALSE;
if (nParts != pStatusInfo->nParts)
{
bRedraw = TRUE;
/* Note that if nParts > pStatusInfo->nParts, this loop
* does nothing
*/
for (i=pStatusInfo->nParts-nParts,
pStringInfo=&pStatusInfo->sInfo[nParts]; i>0;
--i, ++pStringInfo)
{
if ((pStringInfo->uType&SBT_ALLTYPES) == SBT_NORMAL)
LocalFree((HLOCAL)OFFSETOF(pStringInfo->dwString));
pStringInfo->uType = SBT_NULL;
}
/* Realloc to the new size and store the new pointer
*/
pStatusTemp = (PSTATUSINFO)LocalReAlloc((HLOCAL)pStatusInfo,
sizeof(STATUSINFO) + (nParts - 1) * sizeof(STRINGINFO), LMEM_MOVEABLE);
if (!pStatusTemp)
return(FALSE);
pStatusInfo = pStatusTemp;
SetWindowInt(pStatusInfo->hwnd, 0, (int)pStatusInfo);
/* Note that if nParts < pStatusInfo->nParts, this loop
* does nothing
*/
for (i=nParts-pStatusInfo->nParts,
pStringInfo=&pStatusInfo->sInfo[pStatusInfo->nParts]; i>0;
--i, ++pStringInfo)
{
pStringInfo->uType = SBT_NULL;
}
pStatusInfo->nParts = nParts;
}
for (i=0, pStringInfo=pStatusInfo->sInfo; i<nParts;
++i, ++pStringInfo, ++lpInt)
{
if (pStringInfo->right != *lpInt)
{
bRedraw = TRUE;
pStringInfo->right = *lpInt;
}
}
/* Only redraw if necesary (if the number of parts has changed or
* a border has changed)
*/
if (bRedraw)
InvalidateRect(pStatusInfo->hwnd, NULL, TRUE);
return TRUE;
}
void NEAR PASCAL SBSetFont(PSTATUSINFO pStatusInfo, HFONT hFont, BOOL bInvalidate)
{
NewFont(pStatusInfo, hFont);
if (bInvalidate)
{
// BUGBUG do we need the updatenow flag?
RedrawWindow(pStatusInfo->hwnd, NULL, NULL, RDW_INVALIDATE | RDW_UPDATENOW);
}
}
BOOL NEAR PASCAL SBSetText(PSTATUSINFO pStatusInfo, WPARAM wParam, LPCTSTR lpsz)
{
BOOL bRet;
/* This is the "simple" status bar pane
*/
if (LOBYTE(wParam) == 0xff)
{
UINT uSimple;
// Note that we do not allow OWNERDRAW for a "simple" status bar
if (wParam & SBT_OWNERDRAW)
return FALSE;
uSimple = pStatusInfo->sSimple.uType;
bRet = SetStatusText(pStatusInfo, &pStatusInfo->sSimple,
wParam&0xff00, lpsz);
pStatusInfo->sSimple.uType |= (uSimple&0x00ff);
}
else
{
if ((UINT)pStatusInfo->nParts <= (UINT)LOBYTE(wParam))
bRet = FALSE;
else
bRet = SetStatusText(pStatusInfo, &pStatusInfo->sInfo[LOBYTE(wParam)],
wParam, lpsz);
}
return bRet;
}
void NEAR PASCAL SBSetBorders(PSTATUSINFO pStatusInfo, LPINT lpInt)
{
// pStatusInfo->nBorderX = lpInt[0] < 0 ? 0 : lpInt[0];
pStatusInfo->nBorderX = 0;
// pStatusInfo->nBorderY = lpInt[1] < 0 ? 2 * g_cyBorder : lpInt[1];
pStatusInfo->nBorderY = g_cyEdge;
// pStatusInfo->nBorderPart = lpInt[2] < 0 ? 2 * g_cxBorder : lpInt[2];
pStatusInfo->nBorderPart = g_cxEdge;
}
LRESULT CALLBACK StatusWndProc(HWND hWnd, UINT uMessage, WPARAM wParam, LPARAM lParam)
{
PSTATUSINFO pStatusInfo = (PSTATUSINFO)GetWindowInt(hWnd, 0);
switch (uMessage)
{
case WM_CREATE:
return InitStatusWnd(hWnd, (LPCREATESTRUCT)lParam);
#ifdef WINNT
# if WM_SETTINGCHANGE != WM_WININICHANGE
# pragma error( WM_SETTINGCHANGE value is not WM_WININICHANGE)
# endif
#endif
case WM_SETTINGCHANGE:
InitGlobalColors();
InitGlobalMetrics(wParam);
if (pStatusInfo->dxGripper)
pStatusInfo->dxGripper = GRIPSIZE;
if (wParam == SPI_SETNONCLIENTMETRICS)
{
if (pStatusInfo->bDefFont)
{
if (pStatusInfo->hStatFont)
{
DeleteObject(pStatusInfo->hStatFont);
pStatusInfo->hStatFont = NULL;
pStatusInfo->bDefFont = FALSE;
SBSetFont(pStatusInfo, 0, TRUE);
}
}
}
break;
case WM_DESTROY:
if (pStatusInfo)
{
int i;
PSTRINGINFO pStringInfo;
NewFont(pStatusInfo, (HFONT)-1);
for (i=pStatusInfo->nParts-1, pStringInfo=pStatusInfo->sInfo;
i>=0; --i, ++pStringInfo)
{
if ((pStringInfo->uType&SBT_ALLTYPES) == SBT_NORMAL)
LocalFree((HLOCAL)OFFSETOF(pStringInfo->dwString));
}
if ((pStatusInfo->sSimple.uType&SBT_ALLTYPES) == SBT_NORMAL)
LocalFree((HLOCAL)OFFSETOF(pStatusInfo->sSimple.dwString));
LocalFree((HLOCAL)pStatusInfo);
SetWindowInt(hWnd, 0, 0);
}
break;
case WM_NCHITTEST:
if (pStatusInfo->dxGripper && !IsZoomed(pStatusInfo->hwndParent))
{
RECT rc;
// already know height is valid. if the width is in the grip,
// show the sizing cursor
GetWindowRect(pStatusInfo->hwnd, &rc);
if ((int)LOWORD(lParam) > (rc.right - pStatusInfo->dxGripper))
return HTBOTTOMRIGHT;
}
goto DoDefThing;
break;
case WM_SETTEXT:
wParam = 0;
uMessage = SB_SETTEXT;
/* Fall through */
case SB_SETTEXT:
if (!pStatusInfo)
return(FALSE);
else
return SBSetText(pStatusInfo, wParam, (LPCTSTR)lParam);
#ifdef UNICODE
case SB_SETTEXTA:
{
BOOL bRet, bAlloced = FALSE;
LPTSTR lpsz;
if (!(wParam & SBT_OWNERDRAW)) {
lpsz = ProduceWFromA((LPSTR)lParam);
bAlloced = TRUE;
} else {
lpsz = (LPTSTR)lParam;
}
if (!pStatusInfo)
bRet = FALSE;
else
bRet = SBSetText(pStatusInfo, wParam, (LPCTSTR)lpsz);
if (bAlloced) {
FreeProducedString(lpsz);
}
return bRet;
}
#endif
case WM_GETTEXT:
uMessage = SB_GETTEXT;
/* Fall through */
case WM_GETTEXTLENGTH:
wParam = 0;
/* Fall through */
case SB_GETTEXT:
case SB_GETTEXTLENGTH:
{
UINT uType;
PTSTR pString;
DWORD dwString;
UINT wLen;
/* We assume the buffer is large enough to hold the string, just
* as listboxes do; the app should call SB_GETTEXTLEN first
*/
if (!pStatusInfo || (UINT)pStatusInfo->nParts<=wParam)
return(0);
if (pStatusInfo->sSimple.uType & SBT_NOSIMPLE) {
uType = pStatusInfo->sInfo[wParam].uType;
dwString = pStatusInfo->sInfo[wParam].dwString;
} else {
uType = pStatusInfo->sSimple.uType;
dwString = pStatusInfo->sSimple.dwString;
}
if ((uType&SBT_ALLTYPES) == SBT_NORMAL)
{
pString = (PTSTR)OFFSETOF(dwString);
if (uMessage==SB_GETTEXT && HIWORD(lParam))
lstrcpy( (LPTSTR)lParam, pString);
wLen = lstrlen(pString);
/* Set this back to 0 to return to the app
*/
uType &= ~SBT_ALLTYPES;
}
else
{
if (uMessage==SB_GETTEXT && HIWORD(lParam))
*(LPTSTR)lParam = TEXT('\0');
wLen = 0;
if (uMessage==SB_GETTEXT && (uType&SBT_ALLTYPES)==SBT_OWNERDRAW)
return(dwString);
}
return(MAKELONG(wLen, uType));
}
#ifdef UNICODE
case SB_GETTEXTA:
case SB_GETTEXTLENGTHA:
{
UINT uType;
PTSTR pString;
DWORD dwString;
UINT wLen;
/* We assume the buffer is large enough to hold the string, just
* as listboxes do; the app should call SB_GETTEXTLEN first
*/
if (!pStatusInfo || (UINT)pStatusInfo->nParts<=wParam)
return(0);
if (pStatusInfo->sSimple.uType & SBT_NOSIMPLE) {
uType = pStatusInfo->sInfo[wParam].uType;
dwString = pStatusInfo->sInfo[wParam].dwString;
} else {
uType = pStatusInfo->sSimple.uType;
dwString = pStatusInfo->sSimple.dwString;
}
if ((uType&SBT_ALLTYPES) == SBT_NORMAL)
{
pString = (PTSTR)OFFSETOF(dwString);
wLen = WideCharToMultiByte(CP_ACP, 0, pString, -1, NULL,
0, NULL, NULL) - 1;
if (uMessage==SB_GETTEXTA && HIWORD(lParam))
WideCharToMultiByte(CP_ACP, 0, pString, -1, (LPSTR)lParam,
(wLen+1), NULL, NULL);
/* Set this back to 0 to return to the app
*/
uType &= ~SBT_ALLTYPES;
}
else
{
if (uMessage==SB_GETTEXTA && HIWORD(lParam))
*(LPSTR)lParam = '\0';
wLen = 0;
if (uMessage==SB_GETTEXTA && (uType&SBT_ALLTYPES)==SBT_OWNERDRAW)
return(dwString);
}
return(MAKELONG(wLen, uType));
}
#endif
case SB_SETPARTS:
if (!pStatusInfo || !wParam || wParam>MAXPARTS)
return FALSE;
return SetStatusParts(pStatusInfo, wParam, (LPINT)lParam);
case SB_GETPARTS:
if (!pStatusInfo)
return(0);
if (lParam)
{
PSTRINGINFO pStringInfo;
LPINT lpInt;
/* Fill in the lesser of the number of entries asked for or
* the number of entries there are
*/
if (wParam > (WPARAM)pStatusInfo->nParts)
wParam = pStatusInfo->nParts;
for (pStringInfo=pStatusInfo->sInfo, lpInt=(LPINT)lParam;
wParam>0; --wParam, ++pStringInfo, ++lpInt)
*lpInt = pStringInfo->right;
}
/* Always return the number of actual entries
*/
return(pStatusInfo->nParts);
#if 0
case SB_SETBORDERS:
if (!pStatusInfo)
return FALSE;
SBSetBorders(pStatusInfo, (LPINT)lParam);
return TRUE;
#endif
case SB_GETBORDERS:
if (!pStatusInfo)
return FALSE;
((LPINT)lParam)[0] = pStatusInfo->nBorderX;
((LPINT)lParam)[1] = pStatusInfo->nBorderY;
((LPINT)lParam)[2] = pStatusInfo->nBorderPart;
return TRUE;
case SB_GETRECT:
return Status_GetRect(pStatusInfo, (int)wParam, (LPRECT)lParam);
case SB_SETMINHEIGHT: // this is a substitute for WM_MEASUREITEM
if (!pStatusInfo)
return FALSE;
pStatusInfo->nMinHeight = wParam;
break;
case SB_SIMPLE:
{
BOOL bInvalidate = FALSE;
if (!pStatusInfo)
return FALSE;
if (wParam)
{
if (pStatusInfo->sSimple.uType & SBT_NOSIMPLE)
{
pStatusInfo->sSimple.uType &= ~SBT_NOSIMPLE;
bInvalidate = TRUE;
}
}
else
{
if ((pStatusInfo->sSimple.uType & SBT_NOSIMPLE) == 0)
{
pStatusInfo->sSimple.uType |= SBT_NOSIMPLE;
bInvalidate = TRUE;
}
}
if (bInvalidate)
InvalidateRect(pStatusInfo->hwnd, NULL, TRUE);
break;
}
case WM_SETFONT:
if (!pStatusInfo)
return FALSE;
SBSetFont(pStatusInfo, (HFONT)wParam, (BOOL)lParam);
return TRUE;
case WM_LBUTTONUP:
SendNotifyEx(pStatusInfo->hwndParent, pStatusInfo->hwnd, NM_CLICK, NULL, FALSE);
break;
case WM_LBUTTONDBLCLK:
SendNotifyEx(pStatusInfo->hwndParent, pStatusInfo->hwnd, NM_DBLCLK, NULL, FALSE);
break;
case WM_RBUTTONDBLCLK:
SendNotifyEx(pStatusInfo->hwndParent, pStatusInfo->hwnd, NM_RDBLCLK, NULL, FALSE);
break;
case WM_RBUTTONUP:
if (!SendNotifyEx(pStatusInfo->hwndParent, pStatusInfo->hwnd, NM_RCLICK, NULL,FALSE))
goto DoDefThing;
return 0;
case WM_GETFONT:
if (!pStatusInfo)
return 0;
return (LRESULT)(UINT)pStatusInfo->hStatFont;
case WM_SIZE:
{
int nHeight;
RECT rc;
if (!pStatusInfo)
return 0;
GetWindowRect(pStatusInfo->hwnd, &rc);
rc.right -= rc.left; // -> dx
rc.bottom -= rc.top; // -> dy
// If there is no parent, then this is a top level window
if (pStatusInfo->hwndParent)
ScreenToClient(pStatusInfo->hwndParent, (LPPOINT)&rc);
// need room for text, 3d border, and extra edge
nHeight = pStatusInfo->nFontHeight + 2 * g_cyBorder ;
if (nHeight < pStatusInfo->nMinHeight)
nHeight = pStatusInfo->nMinHeight;
nHeight += pStatusInfo->nBorderY;
// we don't have a divider thing -> force CCS_NODIVIDER
NewSize(pStatusInfo->hwnd, nHeight, GetWindowStyle(pStatusInfo->hwnd) | CCS_NODIVIDER,
rc.left, rc.top, rc.right, rc.bottom);
// need to invalidate the right end of the status bar
// to maintain the finished edge look.
GetClientRect(pStatusInfo->hwnd, &rc);
if (rc.right > pStatusInfo->nLastX)
rc.left = pStatusInfo->nLastX;
else
rc.left = rc.right;
rc.left -= (g_cxBorder + pStatusInfo->nBorderX);
if (pStatusInfo->dxGripper)
rc.left -= pStatusInfo->dxGripper;
else
rc.left -= pStatusInfo->nBorderPart;
#ifdef WINNT
//
// REVIEW: Should we have to erase the bkgnd ?
//
InvalidateRect(pStatusInfo->hwnd, &rc, TRUE);
#else
InvalidateRect(pStatusInfo->hwnd, &rc, FALSE);
#endif
pStatusInfo->nLastX = rc.right;
break;
}
case WM_PRINTCLIENT:
case WM_PAINT:
if (!pStatusInfo)
break;
if (pStatusInfo->sSimple.uType & SBT_NOSIMPLE)
PaintStatusWnd(pStatusInfo, (HDC)wParam, pStatusInfo->sInfo, pStatusInfo->nParts, pStatusInfo->nBorderX);
else
PaintStatusWnd(pStatusInfo, (HDC)wParam, &pStatusInfo->sSimple, 1, 0);
return 0;
default:
break;
}
DoDefThing:
return DefWindowProc(hWnd, uMessage, wParam, lParam);
}
#pragma code_seg(CODESEG_INIT)
BOOL FAR PASCAL InitStatusClass(HINSTANCE hInstance)
{
WNDCLASS rClass;
if (!GetClassInfo(hInstance, c_szStatusClass, &rClass))
{
#ifndef WIN32
extern LRESULT CALLBACK _StatusWndProc(HWND, UINT, WPARAM, LPARAM);
rClass.lpfnWndProc = _StatusWndProc;
#else
rClass.lpfnWndProc = (WNDPROC)StatusWndProc;
#endif
rClass.style = CS_DBLCLKS | CS_GLOBALCLASS | CS_VREDRAW;
rClass.cbClsExtra = 0;
rClass.cbWndExtra = sizeof(PSTATUSINFO);
rClass.hInstance = hInstance;
rClass.hIcon = NULL;
rClass.hCursor = LoadCursor(NULL, IDC_ARROW);
rClass.hbrBackground = (HBRUSH)(COLOR_BTNFACE+1);
rClass.lpszMenuName = NULL;
rClass.lpszClassName = c_szStatusClass;
return RegisterClass(&rClass);
}
return TRUE;
}
#pragma code_seg()
HWND WINAPI CreateStatusWindow(LONG style, LPCTSTR pszText, HWND hwndParent, UINT uID)
{
// remove border styles to fix capone and other stupid apps
return CreateWindowEx(0, c_szStatusClass, pszText, style & ~(WS_BORDER | CCS_NODIVIDER),
-100, -100, 10, 10, hwndParent, (HMENU)uID, HINST_THISDLL, NULL);
}
#ifdef UNICODE
HWND WINAPI CreateStatusWindowA(LONG style, LPCSTR pszText, HWND hwndParent,
UINT uID)
{
// remove border styles to fix capone and other stupid apps
return CreateWindowExA(0, STATUSCLASSNAMEA, pszText, style & ~(WS_BORDER | CCS_NODIVIDER),
-100, -100, 10, 10, hwndParent, (HMENU)uID, HINST_THISDLL, NULL);
}
#else
HWND WINAPI CreateStatusWindowW(LONG style, LPCWSTR pszText, HWND hwndParent,
UINT uID)
{
SetLastErrorEx(ERROR_CALL_NOT_IMPLEMENTED, SLE_WARNING);
return NULL;
}
#endif