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/shell/shelldll/lnkfnt.c

911 lines
26 KiB
Raw Blame History

/*++
Copyright (c) 1992 Microsoft Corporation
Module Name:
fontdlg.dlg
Abstract:
This module contains the code for console font dialog
Author:
Therese Stowell (thereses) Feb-3-1992 (swiped from Win3.1)
Revision History:
--*/
#include "shellprv.h"
#pragma hdrstop
#include "lnkcon.h"
HBITMAP g_hbmTT = NULL; // handle of TT logo bitmap
BITMAP g_bmTT; // attributes of TT source bitmap
int g_dyFacelistItem = 0;
/* ----- Prototypes ----- */
int FontListCreate(
LPCONSOLEPROP_DATA pcpd,
HWND hDlg,
LPTSTR ptszTTFace,
BOOL bNewFaceList
);
BOOL ConsolePreviewUpdate(
LPCONSOLEPROP_DATA pcpd,
HWND hDlg,
BOOL bLB
);
int SelectCurrentSize(
LPCONSOLEPROP_DATA pcpd,
HWND hDlg,
BOOL bLB,
int FontIndex);
BOOL ConsolePreviewInit(
LPCONSOLEPROP_DATA pcpd,
HWND hDlg);
VOID ConsoleDrawItemFontList(
LPCONSOLEPROP_DATA pcpd,
const LPDRAWITEMSTRUCT lpdis);
/* ----- Globals ----- */
TCHAR g_szPreviewText[] = \
TEXT("C:\\WINNT> dir \n") \
TEXT("SYSTEM <DIR> 08-24-95 4:00a\n") \
TEXT("SYSTEM32 <DIR> 08-24-95 4:00a\n") \
TEXT("WIN COM 26926 08-24-95 4:00a\n") \
TEXT("BEAR EXE 46080 08-24-95 4:00a\n") \
TEXT("SETUP EXE 337232 08-24-95 4:00a\n") \
TEXT("IANJAMES EXE 39594 05-12-60 4:00p\n") \
TEXT("WIN INI 7005 08-24-95 4:00a\n");
// Context-sensitive help ids
const static DWORD rgdwHelpFont[] = {
IDC_CNSL_PREVIEWLABEL, IDH_DOS_FONT_WINDOW_PREVIEW,
IDC_CNSL_PREVIEWWINDOW, IDH_DOS_FONT_WINDOW_PREVIEW,
IDC_CNSL_STATIC, IDH_CONSOLE_FONT_FONT,
IDC_CNSL_FACENAME, IDH_CONSOLE_FONT_FONT,
IDC_CNSL_FONTSIZE, IDH_DOS_FONT_SIZE,
IDC_CNSL_PIXELSLIST, IDH_DOS_FONT_SIZE,
IDC_CNSL_POINTSLIST, IDH_DOS_FONT_SIZE,
IDC_CNSL_BOLDFONT, IDH_CONSOLE_FONT_BOLD_FONTS,
IDC_CNSL_GROUP, IDH_DOS_FONT_FONT_PREVIEW,
0, 0
};
// Globals strings loaded from resource
TCHAR tszSelectedFont[CCH_SELECTEDFONT+1];
TCHAR tszRasterFonts[CCH_RASTERFONTS+1];
BOOL
CALLBACK
_FontDlgProc(
HWND hDlg,
UINT wMsg,
DWORD wParam,
LONG lParam
)
/*++
Dialog proc for the font selection dialog box.
Returns the near offset into the far table of LOGFONT structures.
--*/
{
HWND hWndFocus;
HWND hWndList;
int FontIndex;
BOOL bLB;
TEXTMETRIC tm;
HDC hDC;
LPLINKDATA pld = (LPLINKDATA)GetWindowLong(hDlg, DWL_USER);
switch (wMsg) {
case WM_INITDIALOG:
pld = ((LPLINKPSP)lParam)->pld;
SetWindowLong(hDlg, DWL_USER, (LPARAM)pld);
pld->cpd.bFontInit = FALSE;
SendDlgItemMessage(hDlg, IDC_CNSL_PREVIEWWINDOW, CM_PREVIEW_INIT, 0, (LPARAM)&pld->cpd );
SendDlgItemMessage(hDlg, IDC_CNSL_PREVIEWWINDOW, CM_PREVIEW_UPDATE, 0, 0 );
/*
* Load the font description strings
*/
LoadString(HINST_THISDLL, IDS_CNSL_RASTERFONT,
tszRasterFonts, NELEM(tszRasterFonts));
ASSERT(lstrlen(tszRasterFonts) < CCH_RASTERFONTS);
LoadString(g_hinst, IDS_CNSL_SELECTEDFONT,
tszSelectedFont, NELEM(tszSelectedFont));
ASSERT(lstrlen(tszSelectedFont) < CCH_SELECTEDFONT);
/* Save current font size as dialog window's user data */
pld->cpd.FontLong =
MAKELONG(pld->cpd.FontInfo[pld->cpd.CurrentFontIndex].Size.X,
pld->cpd.FontInfo[pld->cpd.CurrentFontIndex].Size.Y);
/* Create the list of suitable fonts */
pld->cpd.gbEnumerateFaces = TRUE;
bLB = !TM_IS_TT_FONT(pld->cpd.lpConsole->uFontFamily);
pld->cpd.gbBold = IS_BOLD(pld->cpd.lpConsole->uFontWeight);
CheckDlgButton(hDlg, IDC_CNSL_BOLDFONT, pld->cpd.gbBold);
FontListCreate(&pld->cpd, hDlg, bLB ? NULL : pld->cpd.lpFaceName, TRUE);
/* Initialize the preview window - selects current face & size too */
bLB = ConsolePreviewInit(&pld->cpd, hDlg);
ConsolePreviewUpdate(&pld->cpd, hDlg, bLB);
/* Make sure the list box has the focus */
hWndList = GetDlgItem(hDlg, bLB ? IDC_CNSL_PIXELSLIST : IDC_CNSL_POINTSLIST);
SetFocus(hWndList);
pld->cpd.bFontInit = TRUE;
break;
case WM_FONTCHANGE:
pld->cpd.gbEnumerateFaces = TRUE;
bLB = !TM_IS_TT_FONT(pld->cpd.lpConsole->uFontFamily);
FontListCreate(&pld->cpd, hDlg, NULL, TRUE);
FontIndex = FindCreateFont(&pld->cpd,
pld->cpd.lpConsole->uFontFamily,
pld->cpd.lpFaceName,
pld->cpd.lpConsole->dwFontSize,
pld->cpd.lpConsole->uFontWeight);
SelectCurrentSize(&pld->cpd, hDlg, bLB, FontIndex);
return TRUE;
case WM_HELP: /* F1 or title-bar help button */
WinHelp( (HWND) ((LPHELPINFO) lParam)->hItemHandle,
NULL,
HELP_WM_HELP,
(DWORD) (LPVOID) &rgdwHelpFont[0]
);
break;
case WM_CONTEXTMENU: /* right mouse click */
WinHelp( (HWND) wParam,
NULL,
HELP_CONTEXTMENU,
(DWORD) (LPTSTR) &rgdwHelpFont[0]
);
break;
case WM_COMMAND:
switch (LOWORD(wParam))
{
case IDC_CNSL_BOLDFONT:
pld->cpd.gbBold = IsDlgButtonChecked(hDlg, IDC_CNSL_BOLDFONT);
pld->cpd.bConDirty = TRUE;
goto RedoFontListAndPreview;
case IDC_CNSL_FACENAME:
switch (HIWORD(wParam))
{
case LBN_SELCHANGE:
RedoFontListAndPreview:
if (pld->cpd.bFontInit)
PropSheet_Changed( GetParent( hDlg ), hDlg );
{
TCHAR atchNewFace[LF_FACESIZE];
LONG l;
l = SendDlgItemMessage(hDlg, IDC_CNSL_FACENAME, LB_GETCURSEL, 0, 0L);
bLB = SendDlgItemMessage(hDlg, IDC_CNSL_FACENAME, LB_GETITEMDATA, l, 0L);
if (!bLB) {
SendDlgItemMessage(hDlg, IDC_CNSL_FACENAME, LB_GETTEXT, l, (LONG)atchNewFace);
}
FontIndex = FontListCreate(&pld->cpd, hDlg, bLB ? NULL : atchNewFace, FALSE);
FontIndex = SelectCurrentSize(&pld->cpd, hDlg, bLB, FontIndex);
ConsolePreviewUpdate(&pld->cpd, hDlg, bLB);
pld->cpd.bConDirty = TRUE;
return TRUE;
}
}
break;
case IDC_CNSL_POINTSLIST:
switch (HIWORD(wParam)) {
case CBN_SELCHANGE:
if (pld->cpd.bFontInit)
PropSheet_Changed( GetParent( hDlg ), hDlg );
ConsolePreviewUpdate(&pld->cpd, hDlg, FALSE);
pld->cpd.bConDirty = TRUE;
return TRUE;
case CBN_KILLFOCUS:
if (!pld->cpd.gbPointSizeError) {
hWndFocus = GetFocus();
if (hWndFocus != NULL && IsChild(hDlg, hWndFocus) &&
hWndFocus != GetDlgItem(hDlg, IDCANCEL)) {
ConsolePreviewUpdate(&pld->cpd, hDlg, FALSE);
}
}
return TRUE;
default:
break;
}
break;
case IDC_CNSL_PIXELSLIST:
switch (HIWORD(wParam)) {
case LBN_SELCHANGE:
if (pld->cpd.bFontInit)
PropSheet_Changed( GetParent( hDlg ), hDlg );
ConsolePreviewUpdate(&pld->cpd, hDlg, TRUE);
pld->cpd.bConDirty = TRUE;
return TRUE;
default:
break;
}
break;
default:
break;
}
break;
case WM_NOTIFY:
switch (((LPNMHDR)lParam)->code) {
case PSN_APPLY:
/*
* Write out the state values and exit.
*/
if (FAILED(_SaveLink(pld)))
SetWindowLong(hDlg, DWL_MSGRESULT, PSNRET_INVALID_NOCHANGEPAGE);
break;
case PSN_KILLACTIVE:
//
// If the TT combo box is visible, update selection
//
hWndList = GetDlgItem(hDlg, IDC_CNSL_POINTSLIST);
if (hWndList != NULL && IsWindowVisible(hWndList)) {
if (!ConsolePreviewUpdate(&pld->cpd, hDlg, FALSE)) {
SetDlgMsgResult(hDlg, PSN_KILLACTIVE, TRUE);
return TRUE;
}
SetDlgMsgResult(hDlg, PSN_KILLACTIVE, FALSE);
}
FontIndex = pld->cpd.CurrentFontIndex;
if (pld->cpd.FontInfo[FontIndex].SizeWant.Y == 0) {
// Raster Font, so save actual size
pld->cpd.lpConsole->dwFontSize = pld->cpd.FontInfo[FontIndex].Size;
} else {
// TT Font, so save desired size
pld->cpd.lpConsole->dwFontSize = pld->cpd.FontInfo[FontIndex].SizeWant;
}
pld->cpd.lpConsole->uFontWeight = pld->cpd.FontInfo[FontIndex].Weight;
pld->cpd.lpConsole->uFontFamily = pld->cpd.FontInfo[FontIndex].Family;
lstrcpy(pld->cpd.lpFaceName, pld->cpd.FontInfo[FontIndex].FaceName);
return TRUE;
}
break;
/*
* For WM_MEASUREITEM and WM_DRAWITEM, since there is only one
* owner-draw item (combobox) in the entire dialog box, we don't have
* to do a GetDlgItem to figure out who he is.
*/
case WM_MEASUREITEM:
/*
* Load the TrueType logo bitmap
*/
if (g_hbmTT == NULL) {
g_hbmTT = LoadBitmap(NULL, MAKEINTRESOURCE(OBM_TRUETYPE));
GetObject(g_hbmTT, sizeof(BITMAP), &g_bmTT);
}
/*
* Compute the height of face name listbox entries
*/
if (g_dyFacelistItem == 0) {
hDC = GetDC(NULL);
GetTextMetrics(hDC, &tm);
ReleaseDC(NULL, hDC);
g_dyFacelistItem = max(tm.tmHeight, g_bmTT.bmHeight);
}
((LPMEASUREITEMSTRUCT)lParam)->itemHeight = g_dyFacelistItem;
return TRUE;
case WM_DRAWITEM:
ConsoleDrawItemFontList(&pld->cpd, (LPDRAWITEMSTRUCT)lParam);
return TRUE;
case WM_DESTROY:
/*
* Delete the TrueType logo bitmap
*/
if (g_hbmTT != NULL) {
DeleteObject(g_hbmTT);
g_hbmTT = NULL;
}
return TRUE;
default:
break;
}
return FALSE;
}
int
FontListCreate(
LPCONSOLEPROP_DATA pcpd,
HWND hDlg,
LPTSTR ptszTTFace,
BOOL bNewFaceList
)
/*++
Initializes the font list by enumerating all fonts and picking the
proper ones for our list.
Returns
FontIndex of selected font (LB_ERR if none)
--*/
{
TCHAR tszText[80];
LONG lListIndex;
ULONG i;
HWND hWndShow; // List or Combo box
HWND hWndHide; // Combo or List box
HWND hWndFaceCombo;
HANDLE hStockFont;
BOOL bLB;
int LastShowX = 0;
int LastShowY = 0;
int nSameSize = 0;
bLB = ((ptszTTFace == NULL) || (ptszTTFace[0] == TEXT('\0')));
/*
* This only enumerates face names if necessary, and
* it only enumerates font sizes if necessary
*/
EnumerateFonts(pcpd, bLB ? EF_OEMFONT : EF_TTFONT);
/* init the TTFaceNames */
if (bNewFaceList) {
PFACENODE panFace;
hWndFaceCombo = GetDlgItem(hDlg, IDC_CNSL_FACENAME);
SendMessage(hWndFaceCombo, LB_RESETCONTENT, 0, 0);
lListIndex = SendMessage(hWndFaceCombo, LB_ADDSTRING, 0, (LPARAM)tszRasterFonts);
SendMessage(hWndFaceCombo, LB_SETITEMDATA, lListIndex, TRUE);
for (panFace = pcpd->gpFaceNames; panFace; panFace = panFace->pNext) {
if ((panFace->dwFlag & (EF_TTFONT|EF_NEW)) != (EF_TTFONT|EF_NEW)) {
continue;
}
lListIndex = SendMessage(hWndFaceCombo, LB_ADDSTRING, 0,
(LPARAM)panFace->atch);
SendMessage(hWndFaceCombo, LB_SETITEMDATA, lListIndex, FALSE);
}
}
hWndShow = GetDlgItem(hDlg, IDC_CNSL_BOLDFONT);
CheckDlgButton(hDlg, IDC_CNSL_BOLDFONT, (bLB || !pcpd->gbBold) ? FALSE : TRUE);
EnableWindow(hWndShow, bLB ? FALSE : TRUE);
hWndHide = GetDlgItem(hDlg, bLB ? IDC_CNSL_POINTSLIST : IDC_CNSL_PIXELSLIST);
ShowWindow(hWndHide, SW_HIDE);
EnableWindow(hWndHide, FALSE);
hWndShow = GetDlgItem(hDlg, bLB ? IDC_CNSL_PIXELSLIST : IDC_CNSL_POINTSLIST);
// hStockFont = GetStockObject(SYSTEM_FIXED_FONT);
// SendMessage(hWndShow, WM_SETFONT, (DWORD)hStockFont, FALSE);
ShowWindow(hWndShow, SW_SHOW);
EnableWindow(hWndShow, TRUE);
/* Initialize hWndShow list/combo box */
for (i=0;i<pcpd->NumberOfFonts;i++) {
int ShowX, ShowY;
if (!bLB == !TM_IS_TT_FONT(pcpd->FontInfo[i].Family)) {
continue;
}
if (!bLB) {
if (lstrcmp(pcpd->FontInfo[i].FaceName, ptszTTFace) != 0) {
/*
* A TrueType font, but not the one we're interested in,
* so don't add it to the list of point sizes.
*/
continue;
}
if (pcpd->gbBold != IS_BOLD(pcpd->FontInfo[i].Weight)) {
continue;
}
}
if (pcpd->FontInfo[i].SizeWant.X > 0) {
ShowX = pcpd->FontInfo[i].SizeWant.X;
} else {
ShowX = pcpd->FontInfo[i].Size.X;
}
if (pcpd->FontInfo[i].SizeWant.Y > 0) {
ShowY = pcpd->FontInfo[i].SizeWant.Y;
} else {
ShowY = pcpd->FontInfo[i].Size.Y;
}
/*
* Add the size description string to the end of the right list
*/
if (TM_IS_TT_FONT(pcpd->FontInfo[i].Family)) {
// point size
wsprintf(tszText, TEXT("%2d"), pcpd->FontInfo[i].SizeWant.Y);
} else {
// pixel size
if ((LastShowX == ShowX) && (LastShowY == ShowY)) {
nSameSize++;
} else {
LastShowX = ShowX;
LastShowY = ShowY;
nSameSize = 0;
}
/*
* The number nSameSize is appended to the string to distinguish
* between Raster fonts of the same size. It is not intended to
* be visible and exists off the edge of the list
*/
wsprintf(tszText, TEXT("%2d x %2d #%d"),
ShowX, ShowY, nSameSize);
}
lListIndex = lcbFINDSTRINGEXACT(hWndShow, bLB, tszText);
if (lListIndex == LB_ERR) {
lListIndex = lcbADDSTRING(hWndShow, bLB, tszText);
}
lcbSETITEMDATA(hWndShow, bLB, (DWORD)lListIndex, i);
}
/*
* Get the FontIndex from the currently selected item.
* (i will be LB_ERR if no currently selected item).
*/
lListIndex = lcbGETCURSEL(hWndShow, bLB);
i = lcbGETITEMDATA(hWndShow, bLB, lListIndex);
return i;
}
/** ConsoleDrawItemFontList
*
* Answer the WM_DRAWITEM message sent from the font list box or
* facename list box.
*
* Entry:
* lpdis -> DRAWITEMSTRUCT describing object to be drawn
*
* Returns:
* None.
*
* The object is drawn.
*/
VOID WINAPI
ConsoleDrawItemFontList(LPCONSOLEPROP_DATA pcpd, const LPDRAWITEMSTRUCT lpdis)
{
HDC hDC, hdcMem;
DWORD rgbBack, rgbText, rgbFill;
TCHAR tszFace[LF_FACESIZE];
HBITMAP hOld;
int dy;
HBRUSH hbrFill;
HWND hWndItem;
BOOL bLB;
int dxttbmp;
if ((int)lpdis->itemID < 0)
return;
hDC = lpdis->hDC;
if (lpdis->itemAction & ODA_FOCUS) {
if (lpdis->itemState & ODS_SELECTED) {
DrawFocusRect(hDC, &lpdis->rcItem);
}
} else {
if (lpdis->itemState & ODS_SELECTED) {
rgbText = SetTextColor(hDC, GetSysColor(COLOR_HIGHLIGHTTEXT));
rgbBack = SetBkColor(hDC, rgbFill = GetSysColor(COLOR_HIGHLIGHT));
} else {
rgbText = SetTextColor(hDC, GetSysColor(COLOR_WINDOWTEXT));
rgbBack = SetBkColor(hDC, rgbFill = GetSysColor(COLOR_WINDOW));
}
// draw selection background
hbrFill = CreateSolidBrush(rgbFill);
if (hbrFill) {
FillRect(hDC, &lpdis->rcItem, hbrFill);
DeleteObject(hbrFill);
}
// get the string
if (IsWindow(hWndItem = lpdis->hwndItem) == FALSE) {
return;
}
SendMessage(hWndItem, LB_GETTEXT, lpdis->itemID, (LPARAM)tszFace);
bLB = SendMessage(hWndItem, LB_GETITEMDATA, lpdis->itemID, 0L);
dxttbmp = bLB ? 0 : g_bmTT.bmWidth;
// draw the text
TabbedTextOut(hDC, lpdis->rcItem.left + dxttbmp,
lpdis->rcItem.top, tszFace,
lstrlen(tszFace), 0, NULL, dxttbmp);
// and the TT bitmap if needed
if (!bLB) {
hdcMem = CreateCompatibleDC(hDC);
if (hdcMem) {
hOld = SelectObject(hdcMem, g_hbmTT);
dy = ((lpdis->rcItem.bottom - lpdis->rcItem.top) - g_bmTT.bmHeight) / 2;
BitBlt(hDC, lpdis->rcItem.left, lpdis->rcItem.top + dy,
dxttbmp, g_dyFacelistItem, hdcMem,
0, 0, SRCINVERT);
if (hOld)
SelectObject(hdcMem, hOld);
DeleteDC(hdcMem);
}
}
SetTextColor(hDC, rgbText);
SetBkColor(hDC, rgbBack);
if (lpdis->itemState & ODS_FOCUS) {
DrawFocusRect(hDC, &lpdis->rcItem);
}
}
}
UINT
GetPointSizeInRange(
HWND hDlg,
INT Min,
INT Max)
/*++
Routine Description:
Get a size from the Point Size ComboBox edit field
Return Value:
Point Size - of the edit field limited by Min/Max size
0 - if the field is empty or invalid
--*/
{
TCHAR szBuf[90];
int nTmp = 0;
BOOL bOK;
if (GetDlgItemText(hDlg, IDC_CNSL_POINTSLIST, szBuf, NELEM(szBuf))) {
nTmp = GetDlgItemInt(hDlg, IDC_CNSL_POINTSLIST, &bOK, TRUE);
if (bOK && nTmp >= Min && nTmp <= Max) {
return nTmp;
}
}
return 0;
}
/* ----- Preview routines ----- */
LONG
_FontPreviewWndProc(
HWND hWnd,
UINT wMessage,
WPARAM wParam,
LPARAM lParam
)
/* FontPreviewWndProc
* Handles the font preview window
*/
{
PAINTSTRUCT ps;
RECT rect;
HBRUSH hbrClient;
HBRUSH hbrOld;
COLORREF rgbText;
COLORREF rgbBk;
LPCONSOLEPROP_DATA pcpd = (LPCONSOLEPROP_DATA)GetWindowLong( hWnd, GWL_USERDATA );
switch (wMessage) {
case WM_CREATE:
pcpd = (LPCONSOLEPROP_DATA)((LPCREATESTRUCT)lParam)->lpCreateParams;
SetWindowLong( hWnd, GWL_USERDATA, (LPARAM)pcpd );
break;
case WM_PAINT:
BeginPaint(hWnd, &ps);
/* Draw the font sample */
rgbText = GetNearestColor(ps.hdc, ScreenTextColor(pcpd));
rgbBk = GetNearestColor(ps.hdc, ScreenBkColor(pcpd));
SelectObject(ps.hdc, pcpd->FontInfo[pcpd->CurrentFontIndex].hFont);
SetTextColor(ps.hdc, rgbText);
SetBkColor(ps.hdc, rgbBk);
GetClientRect(hWnd, &rect);
InflateRect(&rect, -2, -2);
hbrClient = CreateSolidBrush(rgbBk);
hbrOld = SelectObject(ps.hdc, hbrClient);
PatBlt(ps.hdc, rect.left, rect.top,
rect.right - rect.left, rect.bottom - rect.top,
PATCOPY);
DrawText(ps.hdc, g_szPreviewText, -1, &rect, 0);
SelectObject(ps.hdc, hbrOld);
DeleteObject(hbrClient);
EndPaint(hWnd, &ps);
break;
default:
return DefWindowProc(hWnd, wMessage, wParam, lParam);
}
return 0L;
}
/*
* SelectCurrentSize - Select the right line of the Size listbox/combobox.
* bLB : Size controls is a listbox (TRUE for RasterFonts)
* FontIndex : Index into FontInfo[] cache
* If < 0 then choose a good font.
* Returns
* FontIndex : Index into FontInfo[] cache
*/
int
SelectCurrentSize(LPCONSOLEPROP_DATA pcpd, HWND hDlg, BOOL bLB, int FontIndex)
{
int iCB;
HWND hWndList;
hWndList = GetDlgItem(hDlg, bLB ? IDC_CNSL_PIXELSLIST : IDC_CNSL_POINTSLIST);
iCB = lcbGETCOUNT(hWndList, bLB);
if (FontIndex >= 0) {
/*
* look for FontIndex
*/
while (iCB > 0) {
iCB--;
if (lcbGETITEMDATA(hWndList, bLB, iCB) == FontIndex) {
lcbSETCURSEL(hWndList, bLB, iCB);
break;
}
}
} else {
/*
* look for a reasonable default size: looking backwards, find
* the first one same height or smaller.
*/
DWORD Size;
Size = pcpd->FontLong;
while (iCB > 0) {
iCB--;
FontIndex = lcbGETITEMDATA(hWndList, bLB, iCB);
if (pcpd->FontInfo[FontIndex].Size.Y <= HIWORD(Size)) {
lcbSETCURSEL(hWndList, bLB, iCB);
break;
}
}
}
return FontIndex;
}
BOOL
SelectCurrentFont(LPCONSOLEPROP_DATA pcpd, HWND hDlg, int FontIndex)
{
BOOL bLB;
bLB = !TM_IS_TT_FONT(pcpd->FontInfo[FontIndex].Family);
SendDlgItemMessage(hDlg, IDC_CNSL_FACENAME, LB_SELECTSTRING, (DWORD)-1,
bLB ? (LONG)tszRasterFonts : (LONG)(pcpd->FontInfo[FontIndex].FaceName));
SelectCurrentSize(pcpd, hDlg, bLB, FontIndex);
return bLB;
}
BOOL
ConsolePreviewInit(
LPCONSOLEPROP_DATA pcpd,
HWND hDlg
)
/* PreviewInit
* Prepares the preview code, sizing the window and the dialog to
* make an attractive preview.
* Returns TRUE if Raster Fonts, FALSE if TT Font
*/
{
HDC hDC;
TEXTMETRIC tm;
RECT rectLabel;
RECT rectGroup;
int nFont;
SHORT xChar;
SHORT yChar;
/* Get the system char size */
hDC = GetDC(hDlg);
GetTextMetrics(hDC, &tm);
ReleaseDC(hDlg, hDC);
xChar = (SHORT) (tm.tmAveCharWidth);
yChar = (SHORT) (tm.tmHeight + tm.tmExternalLeading);
/* Compute the size of the font preview */
GetWindowRect(GetDlgItem(hDlg, IDC_CNSL_GROUP), &rectGroup);
rectGroup.bottom -= rectGroup.top;
ScreenToClient(hDlg, (LPPOINT)&rectGroup);
GetWindowRect(GetDlgItem(hDlg, IDC_CNSL_STATIC2), &rectLabel);
ScreenToClient(hDlg, (LPPOINT)&rectLabel);
/* Create the font preview */
CreateWindowEx(0L, TEXT("WOACnslFontPreview"), NULL,
WS_CHILD | WS_VISIBLE,
rectGroup.left + xChar, rectGroup.top + 3 * yChar / 2,
rectLabel.left - rectGroup.left - 2 * xChar,
rectGroup.bottom - 2 * yChar,
hDlg, (HMENU)IDC_CNSL_FONTWINDOW, g_hinst, (LPVOID)pcpd);
/*
* Set the current font
*/
nFont = FindCreateFont(pcpd,
pcpd->lpConsole->uFontFamily,
pcpd->lpFaceName,
pcpd->lpConsole->dwFontSize,
pcpd->lpConsole->uFontWeight);
pcpd->CurrentFontIndex = nFont;
return SelectCurrentFont(pcpd, hDlg, nFont);
}
BOOL
ConsolePreviewUpdate(
LPCONSOLEPROP_DATA pcpd,
HWND hDlg,
BOOL bLB
)
/*++
Does the preview of the selected font.
--*/
{
PFONT_INFO lpFont;
int FontIndex;
LONG lIndex;
HWND hWnd;
TCHAR tszText[60];
TCHAR tszFace[LF_FACESIZE + CCH_SELECTEDFONT];
HWND hWndList;
hWndList = GetDlgItem(hDlg, bLB ? IDC_CNSL_PIXELSLIST : IDC_CNSL_POINTSLIST);
/* When we select a font, we do the font preview by setting it into
* the appropriate list box
*/
lIndex = lcbGETCURSEL(hWndList, bLB);
if ((lIndex < 0) && !bLB) {
COORD NewSize;
lIndex = SendDlgItemMessage(hDlg, IDC_CNSL_FACENAME, LB_GETCURSEL, 0, 0L);
SendDlgItemMessage(hDlg, IDC_CNSL_FACENAME, LB_GETTEXT, lIndex, (LONG)tszFace);
NewSize.X = 0;
NewSize.Y = GetPointSizeInRange(hDlg, MIN_PIXEL_HEIGHT, MAX_PIXEL_HEIGHT);
if (NewSize.Y == 0) {
TCHAR tszBuf[60];
/*
* Use tszText, tszBuf to put up an error msg for bad point size
*/
pcpd->gbPointSizeError = TRUE;
LoadString(g_hinst, IDS_CNSL_FONTSIZE, tszBuf, NELEM(tszBuf));
wsprintf(tszText, tszBuf, MIN_PIXEL_HEIGHT, MAX_PIXEL_HEIGHT);
GetWindowText(hDlg, tszBuf, NELEM(tszBuf));
MessageBoxEx(hDlg, tszText, tszBuf, MB_OK|MB_ICONINFORMATION, 0L);
SetFocus(hWndList);
pcpd->gbPointSizeError = FALSE;
return FALSE;
}
FontIndex = FindCreateFont(pcpd,
FF_MODERN|TMPF_VECTOR|TMPF_TRUETYPE,
tszFace, NewSize, 0);
} else {
FontIndex = lcbGETITEMDATA(hWndList, bLB, lIndex);
}
if (FontIndex < 0) {
FontIndex = pcpd->DefaultFontIndex;
}
/*
* If we've selected a new font, tell the property sheet we've changed
*/
if (pcpd->CurrentFontIndex != (ULONG)FontIndex) {
pcpd->CurrentFontIndex = FontIndex;
}
lpFont = &pcpd->FontInfo[FontIndex];
/* Display the new font */
lstrcpy(tszFace, tszSelectedFont);
lstrcat(tszFace, lpFont->FaceName);
SetDlgItemText(hDlg, IDC_CNSL_GROUP, tszFace);
/* Put the font size in the static boxes */
wsprintf(tszText, TEXT("%u"), lpFont->Size.X);
hWnd = GetDlgItem(hDlg, IDC_CNSL_FONTWIDTH);
SetWindowText(hWnd, tszText);
InvalidateRect(hWnd, NULL, TRUE);
wsprintf(tszText, TEXT("%u"), lpFont->Size.Y);
hWnd = GetDlgItem(hDlg, IDC_CNSL_FONTHEIGHT);
SetWindowText(hWnd, tszText);
InvalidateRect(hWnd, NULL, TRUE);
/* Force the preview windows to repaint */
hWnd = GetDlgItem(hDlg, IDC_CNSL_PREVIEWWINDOW);
SendMessage(hWnd, CM_PREVIEW_UPDATE, 0, 0);
hWnd = GetDlgItem(hDlg, IDC_CNSL_FONTWINDOW);
InvalidateRect(hWnd, NULL, TRUE);
return TRUE;
}