![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to ttfonts.rc CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [WindowsNT SDKs] / mstools / samples / ttfonts|
Return to ttfonts.rc CVS log | Up to [WindowsNT SDKs] / mstools / samples / ttfonts |
Microsoft Windows NT Build 511 (SDK Final Release) 07-24-1993
//-----------------------------------------------------------------------------
// This is a part of the Microsoft Source Code Samples.
// Copyright (C) 1993 Microsoft Corporation.
// All rights reserved.
//
// This source code is only intended as a supplement to
// Microsoft Development Tools and/or WinHelp documentation.
// See these sources for detailed information regarding the
// Microsoft samples programs.
//-----------------------------------------------------------------------------
#include "windows.h"
#include "ttfonts.h"
#define FONTDIALOG FONT 10, "Helv"
ttfontsIcon ICON ttfonts.ico
bmtt BITMAP bmtt.bmp
bmdevice BITMAP bmdevice.bmp
ttfontsMenu MENU
BEGIN
POPUP "&Control"
BEGIN
MENUITEM "EnumFonts (&Display) \tF2" , TBID_ENUM
MENUITEM "&CreateFont \tEnter", TBID_CREATE
MENUITEM "&GetMetrics \tF4", TBID_GETTM
MENUITEM "Get&FontData \tF5", TBID_GETFONTDATA
MENUITEM "EnumFonts (P&rinter) \tF6", TBID_PRINT
MENUITEM SEPARATOR
MENUITEM "GetObject \tF7", IDM_GETOBJECT
MENUITEM "ChooseFont \tF8", IDM_CHOOSEFONT
POPUP "GetStockObject"
BEGIN
MENUITEM "ANSI_FIXED_FONT", IDM_ANSI_FIXED_FONT
MENUITEM "ANSI_VAR_FONT", IDM_ANSI_VAR_FONT
MENUITEM "DEVICE_DEFAULT_FONT", IDM_DEVICE_DEFAULT_FONT
MENUITEM "OEM_FIXED_FONT", IDM_OEM_FIXED_FONT
MENUITEM "SYSTEM_FIXED_FONT", IDM_SYSTEM_FIXED_FONT
MENUITEM "SYSTEM_FONT", IDM_SYSTEM_FONT
END
MENUITEM SEPARATOR
MENUITEM "&Print", IDM_PRINT
END
POPUP "&Display"
BEGIN
MENUITEM "&Centered string 'Hello'", IDM_MODEHELLO
MENUITEM "&Range [tmFirstChar, tmLastChar]", IDM_MODETMRANGE
MENUITEM "&All Glyphs from FontData", IDM_MODEALL
END
POPUP "&Window"
BEGIN
MENUITEM "&Cascade", IDM_CASCADE
MENUITEM "&Tile", IDM_TILE
MENUITEM "&Arrange", IDM_ARRANGE
END
POPUP "&Options"
BEGIN
MENUITEM "&Flying rectangles", IDM_FLYWINWIN
END
POPUP "&Help"
BEGIN
MENUITEM "Help &Contents \tF1", IDM_HELP
MENUITEM SEPARATOR
MENUITEM "&About", IDM_ABOUT
END
END
ttfontsAccel ACCELERATORS
BEGIN
VK_F1 , IDM_HELP , VIRTKEY
VK_F2 , TBID_ENUM , VIRTKEY
VK_F3 , TBID_CREATE , VIRTKEY
VK_RETURN, TBID_CREATE , VIRTKEY
VK_F4 , TBID_GETTM , VIRTKEY
VK_F5 , TBID_GETFONTDATA, VIRTKEY
VK_F6 , TBID_PRINT , VIRTKEY
VK_F7 , IDM_GETOBJECT , VIRTKEY
VK_F8 , IDM_CHOOSEFONT , VIRTKEY
END
logfontDlg DIALOG 0,0, DLGWIDTH, DLGHEIGHT
STYLE WS_MINIMIZEBOX | WS_CHILD | WS_VISIBLE | WS_CAPTION
| WS_SYSMENU | WS_CLIPSIBLINGS
CAPTION "LOGFONT"
FONTDIALOG
BEGIN
RTEXT "lfHeight", DID_X , 00, 03, 64, 8
EDITTEXT DIDHEIGHT, 70, 02, 24, 11
RTEXT "lfWidth", DID_X , 00, 14, 64, 8
EDITTEXT DIDWIDTH , 70, 13, 24, 11
RTEXT "lfEscapement", DID_X , 00, 25, 64, 8
EDITTEXT DIDESCAPE, 70, 24, 24, 11
RTEXT "lfOrientation", DID_X , 00, 36, 64, 8
EDITTEXT DIDORIENT, 70, 35, 24, 11
RTEXT "lfWeight", DID_X , 00, 47, 64, 8
EDITTEXT DIDWEIGHT, 70, 46, 24, 11
RTEXT "lfItalic", DID_X , 00, 59, 64, 8
EDITTEXT DIDITALIC, 70, 58, 18, 11
RTEXT "lfUnderline", DID_X , 00, 70, 64, 8
EDITTEXT DIDUNDERL, 70, 69, 18, 11
RTEXT "lfStrikeOut", DID_X , 00, 81, 64, 8
EDITTEXT DIDSTRIKE, 70, 80, 18, 11
RTEXT "lfCharSet", DID_X , 00, 92, 64, 8
EDITTEXT DIDCHARSE, 70, 91, 18, 11
RTEXT "lfOutPrecision", DID_X , 00, 103, 64, 8
EDITTEXT DIDOUTPRE, 70, 102, 18, 11
RTEXT "lfClipPrecision", DID_X , 00, 114, 64, 8
EDITTEXT DIDCLIPPR, 70, 113, 18, 11
RTEXT "lfQuality", DID_X , 00, 125, 64, 8
EDITTEXT DIDQUALIT, 70, 124, 18, 11
RTEXT "lfPitchAndFamily",DID_X , 00, 136, 64, 8
EDITTEXT DIDPITCHA, 70, 135, 18, 11
RTEXT "lfFaceName", DID_X , 00, 149, 38, 8
EDITTEXT DIDFACENA, 40, 148, 68, 11, ES_AUTOHSCROLL
END
textmetricDlg DIALOG 0,0, DLGWIDTH, DLGHEIGHT
STYLE WS_MINIMIZEBOX | WS_CHILD | WS_VISIBLE | WS_CAPTION
| WS_SYSMENU | WS_CLIPSIBLINGS
CAPTION "TEXTMETRIC"
FONTDIALOG
BEGIN
LISTBOX DID_LISTBOX, 0, 0, DLGWIDTH, DLGHEIGHT,
LBS_USETABSTOPS | LBS_NOINTEGRALHEIGHT | WS_VSCROLL
END
oltextmetricDlg DIALOG 0,0, 170, DLGHEIGHT
STYLE WS_MINIMIZEBOX | WS_CHILD | WS_VISIBLE | WS_CAPTION
| WS_SYSMENU | WS_CLIPSIBLINGS
CAPTION "OUTLINE TEXTMETRIC"
FONTDIALOG
BEGIN
LISTBOX DID_LISTBOX, 0, 0, 170,160,
LBS_USETABSTOPS | LBS_NOINTEGRALHEIGHT | WS_VSCROLL
END
getfontdataDlg DIALOG 45, 18, 170, DLGHEIGHT
STYLE WS_MINIMIZEBOX | WS_CHILD | WS_VISIBLE | WS_CAPTION
| WS_SYSMENU | WS_CLIPSIBLINGS
CAPTION "GetFontData"
FONTDIALOG
BEGIN
RTEXT "dwTable", -1, 0, 5, 35, 8
COMBOBOX DID_DWTABLE, 41, 3, 50, 100, CBS_DROPDOWN | CBS_HASSTRINGS |
WS_VSCROLL
RTEXT "dwOffset",-1, 0, 20, 35, 8
EDITTEXT DID_DWOFFSET, 41, 18, 50, 12
RTEXT "cbData", -1, 0, 35, 35, 8
EDITTEXT DID_CBDATA, 41, 33, 50, 12
LISTBOX DID_LISTBOX, 0, 50, 170, 110,
LBS_USETABSTOPS | LBS_NOINTEGRALHEIGHT | WS_VSCROLL
DEFPUSHBUTTON "GetFontData", DID_DOIT, 100, 14, 60, 15
CTEXT "all values in Hex", -1, 100, 30, 60, 15
END
aboutBox DIALOG 30, 14, 136, 90
LANGUAGE LANG_NEUTRAL, SUBLANG_NEUTRAL
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
CAPTION "About TTFonts"
BEGIN
ICON "ttfontsIcon", 101, 8, 20, 18, 20
LTEXT "TTFonts Win32 SDK sample ", 103, 40, 25, 95, 8
LTEXT "version 1.6", 106, 40, 35, 95, 8
DEFPUSHBUTTON "OK", IDOK, 95, 6, 40, 14
CONTROL "", 108, "Static", SS_BLACKRECT, 0, 53, 136, 2
CTEXT "Microsoft Developer Support", 105, 0, 62, 136, 8
CTEXT "Copyright \251 1992-1993 Microsoft", 105, 0, 74,
136, 8
END
STRINGTABLE
BEGIN
1, "cmap"
2, "glyf"
3, "head"
4, "hhea"
5, "hmtx"
6, "loca"
7, "maxp"
8, "name"
9, "post"
10, "OS/2"
11, "cvt"
12, "fpgm"
13, "hdmx"
14, "kern"
15, "LTSH"
16, "prep"
17, "WIN"
18, "VDMX"
19, "FOCA"
20, "PCLT"
END
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.