wxWidgets/samples/font/font.cpp
Vadim Zeitlin 6268b5c619 Fix building font sample in STL mode after recent breakage
The changes of adb8bbab4d (Sort font names in the dialog showing them in
the font sample, 2022-05-12) didn't compile with wxUSE_STL==1 because
wxSortedArrayString doesn't inherit from wxArrayString in this case.

Fix this by using wxArrayString and its Sort() method instead.
2022-05-12 21:00:01 +02:00

1541 lines
46 KiB
C++

/////////////////////////////////////////////////////////////////////////////
// Name: font.cpp
// Purpose: wxFont demo
// Author: Vadim Zeitlin
// Modified by:
// Created: 30.09.99
// Copyright: (c) 1999 Vadim Zeitlin
// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
// For compilers that support precompilation, includes "wx/wx.h".
#include "wx/wxprec.h"
// for all others, include the necessary headers (this file is usually all you
// need because it includes almost all standard wxWidgets headers
#ifndef WX_PRECOMP
#include "wx/wx.h"
#include "wx/log.h"
#endif
#include "wx/checkbox.h"
#include "wx/choicdlg.h"
#include "wx/fontdlg.h"
#include "wx/fontenum.h"
#include "wx/fontmap.h"
#include "wx/encconv.h"
#include "wx/sizer.h"
#include "wx/spinctrl.h"
#include "wx/splitter.h"
#include "wx/statline.h"
#include "wx/stdpaths.h"
#include "wx/textfile.h"
#include "wx/settings.h"
#include "../sample.xpm"
#ifdef __WXMAC__
#undef wxFontDialog
#include "wx/osx/fontdlg.h"
#endif
// used as title for several dialog boxes
static wxString GetSampleTitle()
{
return "wxWidgets Font Sample";
}
// ----------------------------------------------------------------------------
// private classes
// ----------------------------------------------------------------------------
// Define a new application type, each program should derive a class from wxApp
class MyApp : public wxApp
{
public:
// override base class virtuals
// ----------------------------
// this one is called on application startup and is a good place for the app
// initialization (doing it here and not in the ctor allows to have an error
// return: if OnInit() returns false, the application terminates)
virtual bool OnInit() wxOVERRIDE;
};
// FontPanel contains controls allowing to specify the font properties
class FontPanel : public wxPanel
{
public:
explicit FontPanel(wxWindow* parent);
void ShowFont(const wxFont& font) { m_font = font; DoUpdate(); }
wxFontInfo GetFontInfo() const;
private:
// Update m_useXXX flags depending on which control was changed last.
void OnFacename(wxCommandEvent& e) { m_useFamily = false; e.Skip(); }
void OnFamily(wxCommandEvent& e) { m_useFamily = true; e.Skip(); }
void OnWeightChoice(wxCommandEvent& e) { m_useNumericWeight = false; e.Skip(); }
void OnWeightSpin(wxCommandEvent& e) { m_useNumericWeight = true; e.Skip(); }
// Unlike wxFontXXX, the elements of these enum are consecutive, which is
// more convenient here.
enum Family
{
Family_Default,
Family_Decorative,
Family_Roman,
Family_Script,
Family_Swiss,
Family_Modern,
Family_Teletype
};
enum Style
{
Style_Normal,
Style_Italic,
Style_Slant
};
enum Weight
{
Weight_Thin,
Weight_Extralight,
Weight_Light,
Weight_Normal,
Weight_Medium,
Weight_Semibold,
Weight_Bold,
Weight_Extrabold,
Weight_Heavy,
Weight_Extraheavy
};
void DoUpdate();
wxFont m_font;
wxTextCtrl* m_textFaceName;
wxChoice* m_choiceFamily;
wxSpinCtrlDouble* m_spinPointSize;
wxChoice* m_choiceStyle;
wxChoice* m_choiceWeight;
wxSpinCtrl* m_spinWeight;
wxCheckBox* m_checkUnderlined;
wxCheckBox* m_checkStrikethrough;
wxCheckBox* m_checkFixedWidth;
wxStaticText* m_labelInfo;
bool m_useFamily;
bool m_useNumericWeight;
};
// FontCanvas shows the font characters.
class FontCanvas : public wxWindow
{
public:
explicit FontCanvas( wxWindow *parent );
// accessors for FontWindow
const wxFont& GetTextFont() const { return m_font; }
const wxColour& GetColour() const { return m_colour; }
void SetTextFont(const wxFont& font) { m_font = font; }
void SetColour(const wxColour& colour) { m_colour = colour; }
// event handlers
void OnPaint( wxPaintEvent &event );
protected:
virtual wxSize DoGetBestClientSize() const wxOVERRIDE
{
return wxSize(80*GetCharWidth(), 15*GetCharHeight());
}
private:
wxColour m_colour;
wxFont m_font;
wxDECLARE_EVENT_TABLE();
};
// FontWindow contains both FontPanel and FontCanvas
class FontWindow : public wxWindow
{
public:
explicit FontWindow(wxWindow *parent);
const wxFont& GetTextFont() const { return m_canvas->GetTextFont(); }
const wxColour& GetColour() const { return m_canvas->GetColour(); }
wxFont MakeNewFont() const { return m_panel->GetFontInfo(); }
void UpdateFont(const wxFont& font, const wxColour& colour);
private:
FontPanel* const m_panel;
FontCanvas* const m_canvas;
};
// Define a new frame type: this is going to be our main frame
class MyFrame : public wxFrame
{
public:
// ctor(s)
MyFrame();
// event handlers (these functions should _not_ be virtual)
void OnQuit(wxCommandEvent& event);
void OnAbout(wxCommandEvent& event);
void OnGetBaseFont(wxCommandEvent& WXUNUSED(event))
{ DoChangeFont(m_fontWindow->GetTextFont().GetBaseFont()); }
void OnIncFont(wxCommandEvent& WXUNUSED(event)) { DoResizeFont(+2); }
void OnDecFont(wxCommandEvent& WXUNUSED(event)) { DoResizeFont(-2); }
void OnBold(wxCommandEvent& event);
void OnLight(wxCommandEvent& event);
void OnItalic(wxCommandEvent& event);
void OnSlant(wxCommandEvent& event);
void OnUnderline(wxCommandEvent& event);
void OnStrikethrough(wxCommandEvent& event);
void OnwxPointerFont(wxCommandEvent& event);
void OnFontDefault(wxCommandEvent& event);
void OnwxSystemSettingsFont(wxCommandEvent& event);
void OnTestTextValue(wxCommandEvent& event);
void OnViewMsg(wxCommandEvent& event);
void OnSelectFont(wxCommandEvent& event);
void OnEnumerateFamiliesForEncoding(wxCommandEvent& event);
void OnEnumerateFamilies(wxCommandEvent& WXUNUSED(event))
{ DoEnumerateFamilies(false); }
void OnEnumerateFixedFamilies(wxCommandEvent& WXUNUSED(event))
{ DoEnumerateFamilies(true); }
void OnEnumerateEncodings(wxCommandEvent& event);
void OnSetNativeDesc(wxCommandEvent& event);
void OnSetNativeUserDesc(wxCommandEvent& event);
void OnSetFamily(wxCommandEvent& event);
void OnSetFaceName(wxCommandEvent& event);
void OnSetEncoding(wxCommandEvent& event);
void OnPrivateFont(wxCommandEvent& event);
void OnFontPanelApply(wxCommandEvent& WXUNUSED(event))
{ DoChangeFont(m_fontWindow->MakeNewFont()); }
protected:
bool DoEnumerateFamilies(bool fixedWidthOnly,
wxFontEncoding encoding = wxFONTENCODING_SYSTEM,
bool silent = false);
void DoResizeFont(int diff);
void DoChangeFont(const wxFont& font, const wxColour& col = wxNullColour);
// ask the user to choose an encoding and return it or
// wxFONTENCODING_SYSTEM if the dialog was cancelled
wxFontEncoding GetEncodingFromUser();
// ask the user to choose a font family and return it or
// wxFONTFAMILY_DEFAULT if the dialog was cancelled
wxFontFamily GetFamilyFromUser();
wxTextCtrl *m_textctrl;
FontWindow *m_fontWindow;
private:
// any class wishing to process wxWidgets events must use this macro
wxDECLARE_EVENT_TABLE();
};
// ----------------------------------------------------------------------------
// constants
// ----------------------------------------------------------------------------
// IDs for the controls and the menu commands
enum
{
// menu items
Font_Quit = wxID_EXIT,
Font_About = wxID_ABOUT,
Font_ViewMsg = wxID_HIGHEST+1,
Font_TestTextValue,
Font_IncSize,
Font_DecSize,
Font_GetBaseFont,
Font_Bold,
Font_Light,
Font_Italic,
Font_Slant,
Font_Underlined,
Font_Strikethrough,
// standard global wxFont objects:
Font_wxNORMAL_FONT,
Font_wxSMALL_FONT,
Font_wxITALIC_FONT,
Font_wxSWISS_FONT,
Font_wxFont_Default,
Font_Standard,
// wxSystemSettings::GetFont possible objects:
Font_wxSYS_OEM_FIXED_FONT,
Font_wxSYS_ANSI_FIXED_FONT,
Font_wxSYS_ANSI_VAR_FONT,
Font_wxSYS_SYSTEM_FONT,
Font_wxSYS_DEVICE_DEFAULT_FONT,
Font_wxSYS_DEFAULT_GUI_FONT,
Font_SystemSettings,
Font_Choose = 100,
Font_EnumFamiliesForEncoding,
Font_EnumFamilies,
Font_EnumFixedFamilies,
Font_EnumEncodings,
Font_SetNativeDesc,
Font_SetNativeUserDesc,
Font_SetFamily,
Font_SetFaceName,
Font_SetEncoding,
Font_Private,
Font_Max
};
// ----------------------------------------------------------------------------
// event tables and other macros for wxWidgets
// ----------------------------------------------------------------------------
// the event tables connect the wxWidgets events with the functions (event
// handlers) which process them. It can be also done at run-time, but for the
// simple menu events like this the static method is much simpler.
wxBEGIN_EVENT_TABLE(MyFrame, wxFrame)
EVT_MENU(Font_Quit, MyFrame::OnQuit)
EVT_MENU(Font_TestTextValue, MyFrame::OnTestTextValue)
EVT_MENU(Font_ViewMsg, MyFrame::OnViewMsg)
EVT_MENU(Font_About, MyFrame::OnAbout)
EVT_MENU(Font_GetBaseFont, MyFrame::OnGetBaseFont)
EVT_MENU(Font_IncSize, MyFrame::OnIncFont)
EVT_MENU(Font_DecSize, MyFrame::OnDecFont)
EVT_MENU(Font_Bold, MyFrame::OnBold)
EVT_MENU(Font_Light, MyFrame::OnLight)
EVT_MENU(Font_Italic, MyFrame::OnItalic)
EVT_MENU(Font_Slant, MyFrame::OnSlant)
EVT_MENU(Font_Underlined, MyFrame::OnUnderline)
EVT_MENU(Font_Strikethrough, MyFrame::OnStrikethrough)
EVT_MENU(Font_wxNORMAL_FONT, MyFrame::OnwxPointerFont)
EVT_MENU(Font_wxSMALL_FONT, MyFrame::OnwxPointerFont)
EVT_MENU(Font_wxITALIC_FONT, MyFrame::OnwxPointerFont)
EVT_MENU(Font_wxSWISS_FONT, MyFrame::OnwxPointerFont)
EVT_MENU(Font_wxFont_Default, MyFrame::OnFontDefault)
EVT_MENU(Font_wxSYS_OEM_FIXED_FONT, MyFrame::OnwxSystemSettingsFont)
EVT_MENU(Font_wxSYS_ANSI_FIXED_FONT, MyFrame::OnwxSystemSettingsFont)
EVT_MENU(Font_wxSYS_ANSI_VAR_FONT, MyFrame::OnwxSystemSettingsFont)
EVT_MENU(Font_wxSYS_SYSTEM_FONT, MyFrame::OnwxSystemSettingsFont)
EVT_MENU(Font_wxSYS_DEVICE_DEFAULT_FONT, MyFrame::OnwxSystemSettingsFont)
EVT_MENU(Font_wxSYS_DEFAULT_GUI_FONT, MyFrame::OnwxSystemSettingsFont)
EVT_MENU(Font_SetNativeDesc, MyFrame::OnSetNativeDesc)
EVT_MENU(Font_SetNativeUserDesc, MyFrame::OnSetNativeUserDesc)
EVT_MENU(Font_SetFamily, MyFrame::OnSetFamily)
EVT_MENU(Font_SetFaceName, MyFrame::OnSetFaceName)
EVT_MENU(Font_SetEncoding, MyFrame::OnSetEncoding)
EVT_MENU(Font_Choose, MyFrame::OnSelectFont)
EVT_MENU(Font_EnumFamiliesForEncoding, MyFrame::OnEnumerateFamiliesForEncoding)
EVT_MENU(Font_EnumFamilies, MyFrame::OnEnumerateFamilies)
EVT_MENU(Font_EnumFixedFamilies, MyFrame::OnEnumerateFixedFamilies)
EVT_MENU(Font_EnumEncodings, MyFrame::OnEnumerateEncodings)
EVT_MENU(Font_Private, MyFrame::OnPrivateFont)
wxEND_EVENT_TABLE()
// Create a new application object: this macro will allow wxWidgets to create
// the application object during program execution (it's better than using a
// static object for many reasons) and also declares the accessor function
// wxGetApp() which will return the reference of the right type (i.e. MyApp and
// not wxApp)
wxIMPLEMENT_APP(MyApp);
// ============================================================================
// implementation
// ============================================================================
// ----------------------------------------------------------------------------
// the application class
// ----------------------------------------------------------------------------
// `Main program' equivalent: the program execution "starts" here
bool MyApp::OnInit()
{
if ( !wxApp::OnInit() )
return false;
// Create the main application window
MyFrame *frame = new MyFrame();
// Show it
frame->Show(true);
// success: wxApp::OnRun() will be called which will enter the main message
// loop and the application will run. If we returned 'false' here, the
// application would exit immediately.
return true;
}
// ----------------------------------------------------------------------------
// main frame
// ----------------------------------------------------------------------------
// frame constructor
MyFrame::MyFrame()
: wxFrame(NULL, wxID_ANY, "wxWidgets font sample")
{
SetIcon(wxICON(sample));
// create a menu bar
wxMenu *menuFile = new wxMenu;
menuFile->Append(Font_TestTextValue, "&Test text value",
"Verify that getting and setting text value doesn't change it");
menuFile->Append(Font_ViewMsg, "&View...\tCtrl-V",
"View an email message file");
menuFile->AppendSeparator();
menuFile->Append(Font_About, "&About\tCtrl-A", "Show about dialog");
menuFile->AppendSeparator();
menuFile->Append(Font_Quit, "E&xit\tAlt-X", "Quit this program");
wxMenu *menuFont = new wxMenu;
menuFont->Append(Font_IncSize, "&Increase font size by 2 points\tCtrl-I");
menuFont->Append(Font_DecSize, "&Decrease font size by 2 points\tCtrl-D");
menuFont->Append(Font_GetBaseFont, "Use &base version of the font\tCtrl-0");
menuFont->AppendSeparator();
menuFont->AppendCheckItem(Font_Bold, "&Bold\tCtrl-B", "Toggle bold state");
menuFont->AppendCheckItem(Font_Light, "&Light\tCtrl-L", "Toggle light state");
menuFont->AppendSeparator();
menuFont->AppendCheckItem(Font_Italic, "&Oblique\tCtrl-O", "Toggle italic state");
#ifndef __WXMSW__
// under wxMSW slant == italic so there's no reason to provide another menu item for the same thing
menuFont->AppendCheckItem(Font_Slant, "&Slant\tCtrl-S", "Toggle slant state");
#endif
menuFont->AppendSeparator();
menuFont->AppendCheckItem(Font_Underlined, "&Underlined\tCtrl-U",
"Toggle underlined state");
menuFont->AppendCheckItem(Font_Strikethrough, "&Strikethrough",
"Toggle strikethrough state");
menuFont->AppendSeparator();
menuFont->Append(Font_SetNativeDesc,
"Set native font &description\tShift-Ctrl-D");
menuFont->Append(Font_SetNativeUserDesc,
"Set &user font description\tShift-Ctrl-U");
menuFont->AppendSeparator();
menuFont->Append(Font_SetFamily, "Set font family");
menuFont->Append(Font_SetFaceName, "Set font face name");
menuFont->Append(Font_SetEncoding, "Set font &encoding\tShift-Ctrl-E");
wxMenu *menuSelect = new wxMenu;
menuSelect->Append(Font_Choose, "&Select font...\tCtrl-S",
"Select a standard font");
wxMenu *menuStdFonts = new wxMenu;
menuStdFonts->Append(Font_wxNORMAL_FONT, "wxNORMAL_FONT", "Normal font used by wxWidgets");
menuStdFonts->Append(Font_wxSMALL_FONT, "wxSMALL_FONT", "Small font used by wxWidgets");
menuStdFonts->Append(Font_wxITALIC_FONT, "wxITALIC_FONT", "Italic font used by wxWidgets");
menuStdFonts->Append(Font_wxSWISS_FONT, "wxSWISS_FONT", "Swiss font used by wxWidgets");
menuStdFonts->Append(Font_wxFont_Default, "wxFont()", "wxFont constructed from default wxFontInfo");
menuSelect->Append(Font_Standard, "Standar&d fonts", menuStdFonts);
wxMenu *menuSettingFonts = new wxMenu;
menuSettingFonts->Append(Font_wxSYS_OEM_FIXED_FONT, "wxSYS_OEM_FIXED_FONT",
"Original equipment manufacturer dependent fixed-pitch font.");
menuSettingFonts->Append(Font_wxSYS_ANSI_FIXED_FONT, "wxSYS_ANSI_FIXED_FONT",
"Windows fixed-pitch (monospaced) font. ");
menuSettingFonts->Append(Font_wxSYS_ANSI_VAR_FONT, "wxSYS_ANSI_VAR_FONT",
"Windows variable-pitch (proportional) font.");
menuSettingFonts->Append(Font_wxSYS_SYSTEM_FONT, "wxSYS_SYSTEM_FONT",
"System font.");
menuSettingFonts->Append(Font_wxSYS_DEVICE_DEFAULT_FONT, "wxSYS_DEVICE_DEFAULT_FONT",
"Device-dependent font.");
menuSettingFonts->Append(Font_wxSYS_DEFAULT_GUI_FONT, "wxSYS_DEFAULT_GUI_FONT",
"Default font for user interface objects such as menus and dialog boxes. ");
menuSelect->Append(Font_SystemSettings, "System fonts", menuSettingFonts);
menuSelect->AppendSeparator();
menuSelect->Append(Font_EnumFamilies, "Enumerate font &families\tCtrl-F");
menuSelect->Append(Font_EnumFixedFamilies,
"Enumerate fi&xed font families\tCtrl-X");
menuSelect->Append(Font_EnumEncodings,
"Enumerate &encodings\tCtrl-E");
menuSelect->Append(Font_EnumFamiliesForEncoding,
"Find font for en&coding...\tCtrl-C",
"Find font families for given encoding");
#if wxUSE_PRIVATE_FONTS
// Try to use a private font, under most platforms we just look for it in
// the current directory but under OS X it must be in a specific location
// so look for it there.
//
// For OS X you also need to ensure that you actually do put wxprivate.ttf
// in font.app/Contents/Resources/Fonts and add the following snippet
//
// <plist version="0.9">
// <dict>
// ...
// <key>ATSApplicationFontsPath</key>
// <string>Fonts</string>
// ...
// </dict>
// </plist>
//
// to your font.app/Contents/Info.plist.
wxString privfont;
#ifdef __WXOSX__
privfont << wxStandardPaths::Get().GetResourcesDir() << "/Fonts/";
#endif
privfont << "wxprivate.ttf";
if ( !wxFont::AddPrivateFont(privfont) )
{
wxLogWarning("Failed to add private font from \"%s\"", privfont);
}
else
{
menuSelect->AppendSeparator();
menuSelect->Append(Font_Private,
"Select private font",
"Select a font available only in this application");
}
#endif // wxUSE_PRIVATE_FONTS
// now append the freshly created menu to the menu bar...
wxMenuBar *menuBar = new wxMenuBar;
menuBar->Append(menuFile, "&File");
menuBar->Append(menuFont, "F&ont");
menuBar->Append(menuSelect, "&Select");
// ... and attach this menu bar to the frame
SetMenuBar(menuBar);
wxSplitterWindow *splitter = new wxSplitterWindow(this);
m_fontWindow = new FontWindow(splitter);
m_fontWindow->Bind(wxEVT_BUTTON, &MyFrame::OnFontPanelApply, this);
m_textctrl = new wxTextCtrl(splitter, wxID_ANY,
"Paste text here to see how it looks\nlike in the given font",
wxDefaultPosition,
wxSize(-1, 6*GetCharHeight()),
wxTE_MULTILINE);
splitter->SplitHorizontally(m_fontWindow, m_textctrl, 0);
#if wxUSE_STATUSBAR
// create a status bar just for fun (by default with 1 pane only)
CreateStatusBar();
SetStatusText("Welcome to wxWidgets font demo!");
#endif // wxUSE_STATUSBAR
SetClientSize(splitter->GetBestSize());
splitter->SetSashPosition(m_fontWindow->GetBestSize().y);
}
// --------------------------------------------------------
class MyEncodingEnumerator : public wxFontEnumerator
{
public:
MyEncodingEnumerator()
{ m_n = 0; }
const wxString& GetText() const
{ return m_text; }
protected:
virtual bool OnFontEncoding(const wxString& facename,
const wxString& encoding) wxOVERRIDE
{
wxString text;
text.Printf("Encoding %u: %s (available in facename '%s')\n",
(unsigned int) ++m_n, encoding, facename);
m_text += text;
return true;
}
private:
size_t m_n;
wxString m_text;
};
void MyFrame::OnEnumerateEncodings(wxCommandEvent& WXUNUSED(event))
{
MyEncodingEnumerator fontEnumerator;
fontEnumerator.EnumerateEncodings();
wxLogMessage("Enumerating all available encodings:\n%s",
fontEnumerator.GetText());
}
// -------------------------------------------------------------
class MyFontEnumerator : public wxFontEnumerator
{
public:
bool GotAny() const
{ return !m_facenames.IsEmpty(); }
const wxArrayString& GetFacenames() const
{ return m_facenames; }
protected:
virtual bool OnFacename(const wxString& facename) wxOVERRIDE
{
m_facenames.Add(facename);
return true;
}
private:
wxArrayString m_facenames;
};
bool MyFrame::DoEnumerateFamilies(bool fixedWidthOnly,
wxFontEncoding encoding,
bool silent)
{
MyFontEnumerator fontEnumerator;
fontEnumerator.EnumerateFacenames(encoding, fixedWidthOnly);
if ( fontEnumerator.GotAny() )
{
int nFacenames = fontEnumerator.GetFacenames().GetCount();
if ( !silent )
{
wxLogStatus(this, "Found %d %sfonts",
nFacenames, fixedWidthOnly ? "fixed width " : "");
}
wxString facename;
if ( silent )
{
// choose the first
facename = fontEnumerator.GetFacenames().Item(0);
}
else
{
// let the user choose
wxArrayString facenames;
facenames.Alloc(nFacenames);
int n;
for ( n = 0; n < nFacenames; n++ )
facenames.Add(fontEnumerator.GetFacenames().Item(n));
// it's more convenient to see the fonts in alphabetical order
facenames.Sort();
n = wxGetSingleChoiceIndex
(
"Choose a facename",
GetSampleTitle(),
facenames,
this
);
if ( n != -1 )
facename = facenames[n];
}
if ( !facename.empty() )
{
wxFont font(wxFontInfo().FaceName(facename).Encoding(encoding));
DoChangeFont(font);
}
return true;
}
else if ( !silent )
{
wxLogWarning("No such fonts found.");
}
return false;
}
void MyFrame::OnEnumerateFamiliesForEncoding(wxCommandEvent& WXUNUSED(event))
{
wxFontEncoding enc = GetEncodingFromUser();
if ( enc != wxFONTENCODING_SYSTEM )
{
DoEnumerateFamilies(false, enc);
}
}
void MyFrame::OnSetNativeDesc(wxCommandEvent& WXUNUSED(event))
{
wxString fontInfo = wxGetTextFromUser
(
"Enter native font string",
"Input font description",
m_fontWindow->GetTextFont().GetNativeFontInfoDesc(),
this
);
if ( fontInfo.empty() )
return; // user clicked "Cancel" - do nothing
wxFont font;
font.SetNativeFontInfo(fontInfo);
if ( !font.IsOk() )
{
wxLogError("Font info string \"%s\" is invalid.",
fontInfo);
return;
}
DoChangeFont(font);
}
void MyFrame::OnSetNativeUserDesc(wxCommandEvent& WXUNUSED(event))
{
wxString fontdesc = m_fontWindow->GetTextFont().GetNativeFontInfoUserDesc();
wxString fontUserInfo = wxGetTextFromUser(
"Here you can edit current font description",
"Input font description", fontdesc,
this);
if (fontUserInfo.IsEmpty())
return; // user clicked "Cancel" - do nothing
wxFont font;
if (font.SetNativeFontInfoUserDesc(fontUserInfo))
{
wxASSERT_MSG(font.IsOk(), "The font should now be valid");
DoChangeFont(font);
}
else
{
wxASSERT_MSG(!font.IsOk(), "The font should now be invalid");
wxMessageBox("Error trying to create a font with such description...");
}
}
void MyFrame::OnSetFamily(wxCommandEvent& WXUNUSED(event))
{
wxFontFamily f = GetFamilyFromUser();
wxFont font = m_fontWindow->GetTextFont();
font.SetFamily(f);
DoChangeFont(font);
}
void MyFrame::OnSetFaceName(wxCommandEvent& WXUNUSED(event))
{
wxString facename = m_fontWindow->GetTextFont().GetFaceName();
wxString newFaceName = wxGetTextFromUser(
"Here you can edit current font face name.",
"Input font facename", facename,
this);
if (newFaceName.IsEmpty())
return; // user clicked "Cancel" - do nothing
wxFont font(m_fontWindow->GetTextFont());
if (font.SetFaceName(newFaceName)) // change facename only
{
wxASSERT_MSG(font.IsOk(), "The font should now be valid");
DoChangeFont(font);
}
else
{
wxASSERT_MSG(!font.IsOk(), "The font should now be invalid");
wxMessageBox("There is no font with such face name...",
"Invalid face name", wxOK|wxICON_ERROR, this);
}
}
void MyFrame::OnSetEncoding(wxCommandEvent& WXUNUSED(event))
{
wxFontEncoding enc = GetEncodingFromUser();
if ( enc == wxFONTENCODING_SYSTEM )
return;
wxFont font = m_fontWindow->GetTextFont();
font.SetEncoding(enc);
DoChangeFont(font);
}
wxFontEncoding MyFrame::GetEncodingFromUser()
{
wxArrayString names;
wxArrayInt encodings;
const size_t count = wxFontMapper::GetSupportedEncodingsCount();
names.reserve(count);
encodings.reserve(count);
for ( size_t n = 0; n < count; n++ )
{
wxFontEncoding enc = wxFontMapper::GetEncoding(n);
encodings.push_back(enc);
names.push_back(wxFontMapper::GetEncodingName(enc));
}
int i = wxGetSingleChoiceIndex
(
"Choose the encoding",
GetSampleTitle(),
names,
this
);
return i == -1 ? wxFONTENCODING_SYSTEM : (wxFontEncoding)encodings[i];
}
wxFontFamily MyFrame::GetFamilyFromUser()
{
wxArrayString names;
wxArrayInt families;
families.push_back(wxFONTFAMILY_DECORATIVE);
families.push_back(wxFONTFAMILY_ROMAN);
families.push_back(wxFONTFAMILY_SCRIPT);
families.push_back(wxFONTFAMILY_SWISS);
families.push_back(wxFONTFAMILY_MODERN);
families.push_back(wxFONTFAMILY_TELETYPE);
names.push_back("DECORATIVE");
names.push_back("ROMAN");
names.push_back("SCRIPT");
names.push_back("SWISS");
names.push_back("MODERN");
names.push_back("TELETYPE");
int i = wxGetSingleChoiceIndex
(
"Choose the family",
GetSampleTitle(),
names,
this
);
return i == -1 ? wxFONTFAMILY_DEFAULT : (wxFontFamily)families[i];
}
void MyFrame::DoResizeFont(int diff)
{
wxFont font = m_fontWindow->GetTextFont();
font.SetPointSize(font.GetPointSize() + diff);
DoChangeFont(font);
}
void MyFrame::OnBold(wxCommandEvent& event)
{
wxFont font = m_fontWindow->GetTextFont();
font.SetWeight(event.IsChecked() ? wxFONTWEIGHT_BOLD : wxFONTWEIGHT_NORMAL);
DoChangeFont(font);
}
void MyFrame::OnLight(wxCommandEvent& event)
{
wxFont font = m_fontWindow->GetTextFont();
font.SetWeight(event.IsChecked() ? wxFONTWEIGHT_LIGHT : wxFONTWEIGHT_NORMAL);
DoChangeFont(font);
}
void MyFrame::OnItalic(wxCommandEvent& event)
{
wxFont font = m_fontWindow->GetTextFont();
font.SetStyle(event.IsChecked() ? wxFONTSTYLE_ITALIC : wxFONTSTYLE_NORMAL);
DoChangeFont(font);
}
void MyFrame::OnSlant(wxCommandEvent& event)
{
wxFont font = m_fontWindow->GetTextFont();
font.SetStyle(event.IsChecked() ? wxFONTSTYLE_SLANT : wxFONTSTYLE_NORMAL);
DoChangeFont(font);
}
void MyFrame::OnUnderline(wxCommandEvent& event)
{
wxFont font = m_fontWindow->GetTextFont();
font.SetUnderlined(event.IsChecked());
DoChangeFont(font);
}
void MyFrame::OnStrikethrough(wxCommandEvent& event)
{
wxFont font = m_fontWindow->GetTextFont();
font.SetStrikethrough(event.IsChecked());
DoChangeFont(font);
}
void MyFrame::OnwxPointerFont(wxCommandEvent& event)
{
wxFont font;
switch ( event.GetId() )
{
case Font_wxNORMAL_FONT:
font = *wxNORMAL_FONT;
break;
case Font_wxSMALL_FONT:
font = *wxSMALL_FONT;
break;
case Font_wxITALIC_FONT:
font = *wxITALIC_FONT;
break;
case Font_wxSWISS_FONT:
font = *wxSWISS_FONT;
break;
default:
wxFAIL_MSG( "unknown standard font" );
return;
}
DoChangeFont(font);
}
void MyFrame::OnFontDefault(wxCommandEvent& WXUNUSED(event))
{
DoChangeFont(wxFont(wxFontInfo()));
}
void MyFrame::OnwxSystemSettingsFont(wxCommandEvent& event)
{
wxFont font;
switch ( event.GetId() )
{
case Font_wxSYS_OEM_FIXED_FONT:
font = wxSystemSettings::GetFont(wxSYS_OEM_FIXED_FONT);
break;
case Font_wxSYS_ANSI_FIXED_FONT:
font = wxSystemSettings::GetFont(wxSYS_ANSI_FIXED_FONT);
break;
case Font_wxSYS_ANSI_VAR_FONT:
font = wxSystemSettings::GetFont(wxSYS_ANSI_VAR_FONT);
break;
case Font_wxSYS_SYSTEM_FONT:
font = wxSystemSettings::GetFont(wxSYS_SYSTEM_FONT);
break;
case Font_wxSYS_DEVICE_DEFAULT_FONT:
font = wxSystemSettings::GetFont(wxSYS_DEVICE_DEFAULT_FONT);
break;
case Font_wxSYS_DEFAULT_GUI_FONT:
font = wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT);
break;
default:
wxFAIL_MSG( "unknown standard font" );
return;
}
DoChangeFont(font);
}
void MyFrame::DoChangeFont(const wxFont& font, const wxColour& col)
{
m_fontWindow->UpdateFont(font, col);
m_textctrl->SetFont(font);
if ( col.IsOk() )
m_textctrl->SetForegroundColour(col);
m_textctrl->Refresh();
// update the state of the bold/italic/underlined menu items
wxMenuBar *mbar = GetMenuBar();
if ( mbar )
{
mbar->Check(Font_Light, font.GetWeight() == wxFONTWEIGHT_LIGHT);
mbar->Check(Font_Bold, font.GetWeight() == wxFONTWEIGHT_BOLD);
mbar->Check(Font_Italic, font.GetStyle() == wxFONTSTYLE_ITALIC);
#ifndef __WXMSW__
mbar->Check(Font_Slant, font.GetStyle() == wxFONTSTYLE_SLANT);
#endif
mbar->Check(Font_Underlined, font.GetUnderlined());
mbar->Check(Font_Strikethrough, font.GetStrikethrough());
}
}
void MyFrame::OnSelectFont(wxCommandEvent& WXUNUSED(event))
{
wxFontData data;
data.SetInitialFont(m_fontWindow->GetTextFont());
data.SetColour(m_fontWindow->GetColour());
wxFontDialog dialog(this, data);
if ( dialog.ShowModal() == wxID_OK )
{
wxFontData retData = dialog.GetFontData();
wxFont font = retData.GetChosenFont();
wxColour colour = retData.GetColour();
DoChangeFont(font, colour);
}
}
void MyFrame::OnPrivateFont(wxCommandEvent& WXUNUSED(event))
{
wxFont font(m_fontWindow->GetTextFont());
if (font.SetFaceName("wxprivate"))
{
wxASSERT_MSG( font.IsOk(), "The font should now be valid") ;
DoChangeFont(font);
}
else
{
wxLogError("Failed to use private font.");
}
}
void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
{
// true is to force the frame to close
Close(true);
}
void MyFrame::OnTestTextValue(wxCommandEvent& WXUNUSED(event))
{
wxString value = m_textctrl->GetValue();
m_textctrl->SetValue(value);
if ( m_textctrl->GetValue() != value )
{
wxLogError("Text value changed after getting and setting it");
}
}
void MyFrame::OnViewMsg(wxCommandEvent& WXUNUSED(event))
{
#if wxUSE_FILEDLG
// first, choose the file
static wxString s_dir, s_file;
wxFileDialog dialog(this, "Open an email message file",
s_dir, s_file);
if ( dialog.ShowModal() != wxID_OK )
return;
// save for the next time
s_dir = dialog.GetDirectory();
s_file = dialog.GetFilename();
wxString filename = dialog.GetPath();
// load it and search for Content-Type header
wxTextFile file(filename);
if ( !file.Open() )
return;
wxString charset;
wxString prefix = "Content-Type: text/plain; charset=";
const size_t len = wxStrlen(prefix);
size_t n, count = file.GetLineCount();
for ( n = 0; n < count; n++ )
{
wxString line = file[n];
if ( !line )
{
// if it is an email message, headers are over, no need to parse
// all the file
break;
}
if ( line.Left(len) == prefix )
{
// found!
const wxChar *pc = line.c_str() + len;
if ( *pc == '"')
pc++;
while ( *pc && *pc != '"')
{
charset += *pc++;
}
break;
}
}
if ( !charset )
{
wxLogError("The file '%s' doesn't contain charset information.",
filename);
return;
}
// ok, now get the corresponding encoding
wxFontEncoding fontenc = wxFontMapper::Get()->CharsetToEncoding(charset);
if ( fontenc == wxFONTENCODING_SYSTEM )
{
wxLogError("Charset '%s' is unsupported.", charset);
return;
}
m_textctrl->LoadFile(filename);
if ( fontenc == wxFONTENCODING_UTF8 ||
!wxFontMapper::Get()->IsEncodingAvailable(fontenc) )
{
// try to find some similar encoding:
wxFontEncoding encAlt;
if ( wxFontMapper::Get()->GetAltForEncoding(fontenc, &encAlt) )
{
wxEncodingConverter conv;
if (conv.Init(fontenc, encAlt))
{
fontenc = encAlt;
m_textctrl -> SetValue(conv.Convert(m_textctrl -> GetValue()));
}
else
{
wxLogWarning("Cannot convert from '%s' to '%s'.",
wxFontMapper::GetEncodingDescription(fontenc),
wxFontMapper::GetEncodingDescription(encAlt));
}
}
else
wxLogWarning("No fonts for encoding '%s' on this system.",
wxFontMapper::GetEncodingDescription(fontenc));
}
// and now create the correct font
if ( !DoEnumerateFamilies(false, fontenc, true /* silent */) )
{
wxFont font(wxFontInfo(wxNORMAL_FONT->GetPointSize()).Encoding(fontenc));
if ( font.IsOk() )
{
DoChangeFont(font);
}
else
{
wxLogWarning("No fonts for encoding '%s' on this system.",
wxFontMapper::GetEncodingDescription(fontenc));
}
}
#endif // wxUSE_FILEDLG
}
void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
{
wxMessageBox("wxWidgets font sample\n"
"(c) 1999-2006 Vadim Zeitlin",
wxString("About ") + GetSampleTitle(),
wxOK | wxICON_INFORMATION, this);
}
// ----------------------------------------------------------------------------
// FontWindow
// ----------------------------------------------------------------------------
FontWindow::FontWindow(wxWindow *parent)
: wxWindow(parent, wxID_ANY),
m_panel(new FontPanel(this)),
m_canvas(new FontCanvas(this))
{
wxSizer* const sizer = new wxBoxSizer(wxVERTICAL);
sizer->Add(m_panel, wxSizerFlags().Expand().Border());
sizer->Add(new wxStaticLine(this), wxSizerFlags().Expand());
sizer->Add(m_canvas, wxSizerFlags(1).Expand());
SetSizer(sizer);
}
void FontWindow::UpdateFont(const wxFont& font, const wxColour& colour)
{
m_panel->ShowFont(font);
m_canvas->SetTextFont(font);
if ( colour.IsOk() )
m_canvas->SetColour(colour);
m_canvas->Refresh();
}
// ----------------------------------------------------------------------------
// FontPanel
// ----------------------------------------------------------------------------
FontPanel::FontPanel(wxWindow* parent)
: wxPanel(parent)
{
m_useFamily =
m_useNumericWeight = false;
m_textFaceName = new wxTextCtrl(this, wxID_ANY, wxString(),
wxDefaultPosition, wxDefaultSize,
wxTE_PROCESS_ENTER);
m_textFaceName->Bind(wxEVT_TEXT, &FontPanel::OnFacename, this);
// Must be in sync with the Family enum.
const wxString familiesNames[] =
{
"Default",
"Decorative",
"Roman",
"Script",
"Swiss",
"Modern",
"Teletype",
};
m_choiceFamily = new wxChoice(this, wxID_ANY,
wxDefaultPosition, wxDefaultSize,
WXSIZEOF(familiesNames), familiesNames);
m_choiceFamily->Bind(wxEVT_CHOICE, &FontPanel::OnFamily, this);
m_spinPointSize = new wxSpinCtrlDouble(this, wxID_ANY, wxString(),
wxDefaultPosition, wxDefaultSize,
wxSP_ARROW_KEYS,
1.0, 100.0, 10.0, 0.1);
m_spinPointSize->SetInitialSize
(
m_spinPointSize->GetSizeFromTextSize(GetTextExtent("999.9").x)
);
// Must be in sync with the Style enum.
const wxString stylesNames[] =
{
"Normal",
"Italic",
"Slant",
};
m_choiceStyle = new wxChoice(this, wxID_ANY,
wxDefaultPosition, wxDefaultSize,
WXSIZEOF(stylesNames), stylesNames);
// Must be in sync with the Weight enum.
const wxString weightsNames[] =
{
"Thin",
"Extra light",
"Light",
"Normal",
"Medium",
"Semi-bold",
"Bold",
"Extra bold",
"Heavy",
"Extra heavy",
};
m_choiceWeight = new wxChoice(this, wxID_ANY,
wxDefaultPosition, wxDefaultSize,
WXSIZEOF(weightsNames), weightsNames);
m_choiceWeight->Bind(wxEVT_CHOICE, &FontPanel::OnWeightChoice, this);
m_spinWeight = new wxSpinCtrl(this, wxID_ANY, wxString(),
wxDefaultPosition, wxDefaultSize,
wxSP_ARROW_KEYS,
1, wxFONTWEIGHT_MAX);
m_spinWeight->SetInitialSize
(
m_spinWeight->GetSizeFromTextSize(GetTextExtent("9999").x)
);
m_spinWeight->Bind(wxEVT_SPINCTRL, &FontPanel::OnWeightSpin, this);
m_checkUnderlined = new wxCheckBox(this, wxID_ANY, wxString());
m_checkStrikethrough = new wxCheckBox(this, wxID_ANY, wxString());
m_checkFixedWidth = new wxCheckBox(this, wxID_ANY, wxString());
m_checkFixedWidth->Disable(); // Can't be changed by the user.
m_labelInfo = new wxStaticText(this, wxID_ANY, "\n\n\n");
const int border = wxSizerFlags::GetDefaultBorder();
// Columns are: label, control, gap, label, control, label, control (there
// is no second gap column because we don't want any gap in the weight row).
wxFlexGridSizer* const sizer = new wxFlexGridSizer(7, wxSize(border, border));
const wxSizerFlags flagsLabel = wxSizerFlags().CentreVertical();
const wxSizerFlags flagsValue = wxSizerFlags().Expand().CentreVertical();
sizer->Add(new wxStaticText(this, wxID_ANY, "Face &name:"), flagsLabel);
sizer->Add(m_textFaceName, flagsValue);
sizer->AddSpacer(2*border);
sizer->Add(new wxStaticText(this, wxID_ANY, "&Family:"), flagsLabel);
sizer->Add(m_choiceFamily, flagsValue);
sizer->Add(new wxStaticText(this, wxID_ANY, "&Point size:"),
wxSizerFlags().DoubleBorder(wxLEFT).CentreVertical());
sizer->Add(m_spinPointSize, flagsValue);
sizer->Add(new wxStaticText(this, wxID_ANY, "&Style:"), flagsLabel);
sizer->Add(m_choiceStyle, flagsValue);
sizer->AddSpacer(0);
sizer->Add(new wxStaticText(this, wxID_ANY, "&Weight:"), flagsLabel);
sizer->Add(m_choiceWeight, flagsValue);
sizer->Add(new wxStaticText(this, wxID_ANY, "or &raw value:"), flagsLabel);
sizer->Add(m_spinWeight, flagsValue);
sizer->Add(new wxStaticText(this, wxID_ANY, "&Underlined:"), flagsLabel);
sizer->Add(m_checkUnderlined, flagsValue);
sizer->AddSpacer(0);
sizer->Add(new wxStaticText(this, wxID_ANY, "&Strike through:"), flagsLabel);
sizer->Add(m_checkStrikethrough, flagsValue);
sizer->Add(new wxStaticText(this, wxID_ANY, "Fixed width:"), flagsLabel);
sizer->Add(m_checkFixedWidth, flagsValue);
wxSizer* const sizerTop = new wxBoxSizer(wxVERTICAL);
sizerTop->Add(sizer, wxSizerFlags().Expand().Border(wxBOTTOM));
sizerTop->Add(new wxButton(this, wxID_APPLY, "&Apply changes"),
wxSizerFlags().Border(wxBOTTOM).Centre());
sizerTop->Add(m_labelInfo, wxSizerFlags().Expand().Border(wxTOP));
SetSizer(sizerTop);
ShowFont(*wxNORMAL_FONT);
}
void FontPanel::DoUpdate()
{
m_textFaceName->ChangeValue(m_font.GetFaceName());
Family family = Family_Default;
switch ( m_font.GetFamily() )
{
case wxFONTFAMILY_DECORATIVE: family = Family_Decorative; break;
case wxFONTFAMILY_ROMAN: family = Family_Roman; break;
case wxFONTFAMILY_SCRIPT: family = Family_Script; break;
case wxFONTFAMILY_SWISS: family = Family_Swiss; break;
case wxFONTFAMILY_MODERN: family = Family_Modern; break;
case wxFONTFAMILY_TELETYPE: family = Family_Teletype; break;
case wxFONTFAMILY_DEFAULT:
case wxFONTFAMILY_UNKNOWN:
// Leave family as Family_Default, what else can we do.
break;
}
m_choiceFamily->SetSelection(family);
m_spinPointSize->SetValue(m_font.GetFractionalPointSize());
Style style = Style_Normal;
switch ( m_font.GetStyle() )
{
case wxFONTSTYLE_ITALIC: style = Style_Italic; break;
case wxFONTSTYLE_SLANT: style = Style_Slant; break;
case wxFONTSTYLE_NORMAL:
case wxFONTSTYLE_MAX:
break;
}
m_choiceStyle->SetSelection(style);
Weight weight = Weight_Normal;
switch ( m_font.GetWeight() )
{
case wxFONTWEIGHT_THIN: weight = Weight_Thin; break;
case wxFONTWEIGHT_EXTRALIGHT: weight = Weight_Extralight; break;
case wxFONTWEIGHT_LIGHT: weight = Weight_Light; break;
case wxFONTWEIGHT_MEDIUM: weight = Weight_Medium; break;
case wxFONTWEIGHT_SEMIBOLD: weight = Weight_Semibold; break;
case wxFONTWEIGHT_BOLD: weight = Weight_Bold; break;
case wxFONTWEIGHT_EXTRABOLD: weight = Weight_Extrabold; break;
case wxFONTWEIGHT_HEAVY: weight = Weight_Heavy; break;
case wxFONTWEIGHT_EXTRAHEAVY: weight = Weight_Extraheavy; break;
case wxFONTWEIGHT_NORMAL:
case wxFONTWEIGHT_INVALID:
break;
}
m_choiceWeight->SetSelection(weight);
m_spinWeight->SetValue(m_font.GetNumericWeight());
m_checkUnderlined->SetValue(m_font.GetUnderlined());
m_checkStrikethrough->SetValue(m_font.GetStrikethrough());
m_checkFixedWidth->SetValue(m_font.IsFixedWidth());
const wxSize pixelSize = m_font.GetPixelSize();
wxClientDC dc(this);
dc.SetFont(m_font);
m_labelInfo->SetLabelText
(
wxString::Format
(
"Font info string: %s\n"
"Size in pixels: %d*%d, "
"average char size: %d*%d",
m_font.GetNativeFontInfoDesc(),
pixelSize.x, pixelSize.y,
dc.GetCharWidth(), dc.GetCharHeight()
)
);
}
wxFontInfo FontPanel::GetFontInfo() const
{
wxFontInfo info(m_spinPointSize->GetValue());
if ( m_useFamily )
{
const wxFontFamily families[] =
{
wxFONTFAMILY_DEFAULT,
wxFONTFAMILY_DECORATIVE,
wxFONTFAMILY_ROMAN,
wxFONTFAMILY_SCRIPT,
wxFONTFAMILY_SWISS,
wxFONTFAMILY_MODERN,
wxFONTFAMILY_TELETYPE,
};
info.Family(families[m_choiceFamily->GetSelection()]);
}
else
{
info.FaceName(m_textFaceName->GetValue());
}
switch ( m_choiceStyle->GetSelection() )
{
case Style_Normal:
break;
case Style_Italic:
info.Italic();
break;
case Style_Slant:
info.Slant();
break;
}
info.Weight(m_useNumericWeight ? m_spinWeight->GetValue()
: (m_choiceWeight->GetSelection() + 1)*100);
if ( m_checkUnderlined->GetValue() )
info.Underlined();
if ( m_checkStrikethrough->GetValue() )
info.Strikethrough();
return info;
}
// ----------------------------------------------------------------------------
// FontCanvas
// ----------------------------------------------------------------------------
wxBEGIN_EVENT_TABLE(FontCanvas, wxWindow)
EVT_PAINT(FontCanvas::OnPaint)
wxEND_EVENT_TABLE()
FontCanvas::FontCanvas( wxWindow *parent )
: wxWindow( parent, wxID_ANY ),
m_colour(*wxRED), m_font(*wxNORMAL_FONT)
{
}
void FontCanvas::OnPaint( wxPaintEvent &WXUNUSED(event) )
{
wxPaintDC dc(this);
PrepareDC(dc);
// set background
dc.SetBackground(*wxWHITE_BRUSH);
dc.Clear();
dc.SetFont(m_font);
// the current text origin
wxCoord x = 5,
y = 5;
// prepare to draw the font
dc.SetTextForeground(m_colour);
// the size of one cell (Normally biggest char + small margin)
wxCoord maxCharWidth, maxCharHeight;
dc.GetTextExtent("W", &maxCharWidth, &maxCharHeight);
int w = maxCharWidth + 5,
h = maxCharHeight + 4;
// print all font symbols from 32 to 256 in 7 rows of 32 chars each
for ( int i = 0; i < 7; i++ )
{
for ( int j = 0; j < 32; j++ )
{
wxChar c = (wxChar)(32 * (i + 1) + j);
wxCoord charWidth, charHeight;
dc.GetTextExtent(c, &charWidth, &charHeight);
dc.DrawText
(
c,
x + w*j + (maxCharWidth - charWidth) / 2 + 1,
y + h*i + (maxCharHeight - charHeight) / 2
);
}
}
// draw the lines between them
dc.SetPen(*wxBLUE_PEN);
int l;
// horizontal
for ( l = 0; l < 8; l++ )
{
int yl = y + h*l - 2;
dc.DrawLine(x - 2, yl, x + 32*w - 1, yl);
}
// and vertical
for ( l = 0; l < 33; l++ )
{
int xl = x + w*l - 2;
dc.DrawLine(xl, y - 2, xl, y + 7*h - 1);
}
}