fontlist.cpp

wince中的简单例子 画字体 在wince下的消息处理等。本人初学wince编程 希望大家多多交流

//=================================================
// FontList - Lists the available fonts in the system
//
// Written for the book Programming Windows CE
// Copyright (C) 2003 Douglas Boling
//=================================================

#include <windows.h>      // For all that Windows stuff
#include "stdafx.h"
#include "FontList.h"              // Program-specific stuff

//----------------------------------------------------------------------
// Global data
//

int flag=0;

const TCHAR szAppName[] = TEXT ("FontList");
HINSTANCE hInst; // Program instance handle
FONTFAMSTRUCT ffs[FAMILYMAX];
INT sFamilyCnt = 0;
// Message dispatch table for MainWindowProc
const struct decodeUINT MainMessages[] = {
	WM_CREATE, DoCreateMain,
	WM_PAINT, DoPaintMain,
	WM_DESTROY, DoDestroyMain,
};
//=================================================
// Program entry point
//
int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance,
					LPWSTR lpCmdLine, int nCmdShow) {
						MSG msg;
						//int rc = 0;
						HWND hwndMain;
						// Initialize this instance.
						hwndMain = InitInstance (hInstance, lpCmdLine, nCmdShow);
						if (hwndMain == 0)
							return 0x10;
						// Application message loop
						while (GetMessage (&msg, NULL, 0, 0)) {
							TranslateMessage (&msg);
							DispatchMessage (&msg);
						}
						// Instance cleanup
						return TermInstance (hInstance, msg.wParam);
}
//----------------------------------------------------------------------
// InitInstance - Instance initialization
//
HWND InitInstance (HINSTANCE hInstance, LPWSTR lpCmdLine, int nCmdShow) {
	WNDCLASS wc;
	HWND hWnd;
	// Save program instance handle in global variable.
	hInst = hInstance;
#if defined(WIN32_PLATFORM_PSPC)
	// If Pocket PC, allow only one instance of the application.
	hWnd = FindWindow (szAppName, NULL);
	if (hWnd) {
		SetForegroundWindow ((HWND)(((DWORD)hWnd) | 0x01));
		return 0;
	}
#endif
	// Register application main window class.
	wc.style = 0; // Window style
	wc.lpfnWndProc = MainWndProc; // Callback function
	wc.cbClsExtra = 0; // Extra class data
	wc.cbWndExtra = 0; // Extra window data
	wc.hInstance = hInstance; // Owner handle
	wc.hIcon = NULL, // Application icon
		wc.hCursor = LoadCursor (NULL, IDC_ARROW);// Default cursor
	wc.hbrBackground = (HBRUSH) GetStockObject(WHITE_BRUSH);
	wc.lpszMenuName = NULL; // Menu name
	wc.lpszClassName = szAppName; // Window class name
	if (RegisterClass (&wc) == 0) return 0;
	// Create main window.
	hWnd = CreateWindowEx (WS_EX_NODRAG, // Ex style flags
		szAppName, // Window class
		TEXT("Font Listing"),// Window title
		// Style flags
		WS_VISIBLE | WS_CAPTION | WS_SYSMENU,
		CW_USEDEFAULT, // x position
		CW_USEDEFAULT, // y position
		CW_USEDEFAULT, // Initial width
		CW_USEDEFAULT, // Initial height
		NULL, // Parent
		NULL, // Menu, must be null
		hInstance, // Application instance
		NULL); // Pointer to create
	// parameters
	// Return fail code if window not created.
	if (!IsWindow (hWnd)) return 0;
	// Standard show and update calls
	ShowWindow (hWnd, nCmdShow);
	UpdateWindow (hWnd);
	return hWnd;
}
//----------------------------------------------------------------------
// TermInstance - Program cleanup
//
int TermInstance (HINSTANCE hInstance, int nDefRC) {
	return nDefRC;
}
//=================================================

// Font callback functions
//
//----------------------------------------------------------------------
// FontFamilyCallback - Callback function that enumerates the font
// families
//
int CALLBACK FontFamilyCallback (CONST LOGFONT *lplf,
								 CONST TEXTMETRIC *lpntm,
								 DWORD nFontType, LPARAM lParam) {
									 int rc = 1;
									 // Stop enumeration if array filled.
									 if (sFamilyCnt >= FAMILYMAX)
										 return 0;
									 // Copy face name of font.
									 lstrcpy (ffs[sFamilyCnt++].szFontFamily, lplf->lfFaceName);
									 return rc;
}
//----------------------------------------------------------------------
// EnumSingleFontFamily - Callback function that enumerates fonts
//
int CALLBACK EnumSingleFontFamily (CONST LOGFONT *lplf,
								   CONST TEXTMETRIC *lpntm ,
								   DWORD nFontType, LPARAM lParam) {
									   PFONTFAMSTRUCT pffs;
									   pffs = (PFONTFAMSTRUCT) lParam;
									   pffs->nNumFonts++; // Increment count of fonts in family
									   return 1;
}
//----------------------------------------------------------------
// PaintSingleFontFamily - Callback function that draws a font
//
int CALLBACK PaintSingleFontFamily (CONST LOGFONT *lplf,
									CONST TEXTMETRIC *lpntm,
									DWORD nFontType, LPARAM lParam) {
		
										flag++;

										PPAINTFONTINFO ppfi;
										TCHAR szOut[256];
										INT nFontHeight, nPointSize;
										HFONT hFont, hOldFont;
										ppfi = (PPAINTFONTINFO) lParam; // Translate lParam into struct
										// pointer.
										// Create the font from the LOGFONT structure passed.
										hFont = CreateFontIndirect (lplf);           //根据
										// Select the font into the device context.
										hOldFont = (HFONT)SelectObject (ppfi->hdc, hFont);
										// Compute font size.
										int ss=GetDeviceCaps(ppfi->hdc,LOGPIXELSY);
										nPointSize = (lplf->lfHeight * 72) /
											GetDeviceCaps(ppfi->hdc,LOGPIXELSY);
										// Format string and paint on display.
										wsprintf (szOut, TEXT ("%s:%d:%d"), lplf->lfFaceName,
											nPointSize,flag);
										ExtTextOut (ppfi->hdc, 25, ppfi->yCurrent, 0, NULL,szOut, lstrlen (szOut), NULL);
										// Compute the height of the default font.
										nFontHeight = lpntm->tmHeight + lpntm->tmExternalLeading;
										// Update new draw point.
										ppfi->yCurrent += nFontHeight;
										// Deselect font and delete.
										SelectObject (ppfi->hdc, hOldFont);
										DeleteObject (hFont);
										return 1;
}
//=================================================
// Message handling procedures for MainWindow
//
//----------------------------------------------------------------
// MainWndProc - Callback function for application window
//
LRESULT CALLBACK MainWndProc (HWND hWnd, UINT wMsg, WPARAM wParam,
							  LPARAM lParam) {
								  INT i;
								  //
								  // Search message list to see if we need to handle this
								  // message. If in list, call procedure.
								  //
								  for (i = 0; i < dim(MainMessages); i++) {
									  if (wMsg == MainMessages[i].Code)
										  return (*MainMessages[i].Fxn)(hWnd, wMsg, wParam, lParam);
								  }
								  return DefWindowProc (hWnd, wMsg, wParam, lParam);
}
//----------------------------------------------------------------------
// DoCreateMain - Process WM_CREATE message for window.
//
LRESULT DoCreateMain (HWND hWnd, UINT wMsg, WPARAM wParam,
					  LPARAM lParam) {
						  HDC hdc;
						  INT i, rc;
						  //Enumerate the available fonts.
						  hdc = GetDC (hWnd);
						  rc = EnumFontFamilies ((HDC)hdc, (LPTSTR)NULL,
							  FontFamilyCallback, 0);
						  for (i = 0; i < sFamilyCnt; i++) {
							  ffs[i].nNumFonts = 0;
							  rc = EnumFontFamilies ((HDC)hdc, ffs[i].szFontFamily,
								  EnumSingleFontFamily,
								  (LPARAM)(PFONTFAMSTRUCT)&ffs[i]);
						  }
						  ReleaseDC (hWnd, hdc);
						  return 0;
}
//---------------------------------------------------------------
// DoPaintMain - Process WM_PAINT message for window.
//
LRESULT DoPaintMain (HWND hWnd, UINT wMsg, WPARAM wParam,
					 LPARAM lParam) {
						 PAINTSTRUCT ps;
						 RECT rect;
						 HDC hdc;
						 TEXTMETRIC tm;
						 INT nFontHeight, i;
						 TCHAR szOut[256];
						 PAINTFONTINFO pfi;
						 GetClientRect (hWnd, &rect);
						 hdc = BeginPaint (hWnd, &ps);
						 // Get the height of the default font.
						 GetTextMetrics (hdc, &tm);
						 nFontHeight = tm.tmHeight + tm.tmExternalLeading;
						 // Initialize struct that is passed to enumerate function.
						 pfi.yCurrent = rect.top;
						 pfi.hdc = hdc;
						 for (i = 0; i < sFamilyCnt; i++) {
							 flag=0;
							 // Format output string, and paint font family name.
							 wsprintf (szOut, TEXT("Family: %s "),
								 ffs[i].szFontFamily);
							 ExtTextOut (hdc, 5, pfi.yCurrent, 0, NULL,
								 szOut, lstrlen (szOut), NULL);
							 pfi.yCurrent += nFontHeight;
							 // Enumerateeach family to draw a sample of that font.
							 EnumFontFamilies ((HDC)hdc, ffs[i].szFontFamily,
								 PaintSingleFontFamily,
								 (LPARAM)&pfi);
						 }
						 EndPaint (hWnd, &ps);
						 return 0;
}
//----------------------------------------------------------------
// DoDestroyMain - Process WM_DESTROY message for window.
//
LRESULT DoDestroyMain (HWND hWnd, UINT wMsg, WPARAM wParam,
					   LPARAM lParam) {
						   PostQuitMessage (0);
						   return 0;
}