]> git.saurik.com Git - wxWidgets.git/blobdiff - samples/font/font.cpp
wxFileSelector should have file name only, not path, passed to 3rd arg
[wxWidgets.git] / samples / font / font.cpp
index d18e23eea7b9c9053f0385fac6314b3ce6d6918c..00719a113f5a1d528ddb306a7efd8782d8c6bd26 100644 (file)
@@ -5,7 +5,7 @@
 // Modified by:
 // Created:     30.09.99
 // RCS-ID:      $Id$
-// Copyright:   (c) Vadim Zeitlin
+// Copyright:   (c) 1999 Vadim Zeitlin
 // Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
     #include <wx/log.h>
 #endif
 
+#include <wx/choicdlg.h>
 #include <wx/fontdlg.h>
+#include <wx/fontenum.h>
+#include <wx/fontmap.h>
+#include <wx/encconv.h>
+#include <wx/textfile.h>
 
 // ----------------------------------------------------------------------------
 // private classes
@@ -79,33 +84,40 @@ public:
     // event handlers (these functions should _not_ be virtual)
     void OnQuit(wxCommandEvent& event);
     void OnAbout(wxCommandEvent& event);
+    void OnIncFont(wxCommandEvent& event) { DoResizeFont(+2); }
+    void OnDecFont(wxCommandEvent& event) { DoResizeFont(-2); }
+
+    void OnViewMsg(wxCommandEvent& event);
     void OnSelectFont(wxCommandEvent& event);
-    void OnCreateFont(wxCommandEvent& event);
+    void OnEnumerateFamiliesForEncoding(wxCommandEvent& event);
+    void OnEnumerateFamilies(wxCommandEvent& WXUNUSED(event))
+        { DoEnumerateFamilies(FALSE); }
+    void OnEnumerateFixedFamilies(wxCommandEvent& WXUNUSED(event))
+        { DoEnumerateFamilies(TRUE); }
+    void OnEnumerateEncodings(wxCommandEvent& event);
 
-protected:
-    MyCanvas *m_canvas;
+    void OnCheckNativeToFromString(wxCommandEvent& event);
 
-private:
-    // any class wishing to process wxWindows events must use this macro
-    DECLARE_EVENT_TABLE()
-};
+    void OnSize(wxSizeEvent& event);
 
-// A custom font dialog which allows to directly edit wxFont proprieties
-class MyFontDialog : public wxDialog
-{
-public:
-    MyFontDialog(MyFrame *frame);
+protected:
+    bool DoEnumerateFamilies(bool fixedWidthOnly,
+                             wxFontEncoding encoding = wxFONTENCODING_SYSTEM,
+                             bool silent = FALSE);
 
-    // event handlers
-    void OnApply(wxCommandEvent& WXUNUSED(event)) { DoApply(); }
+    void DoResizeFont(int diff);
+    void DoChangeFont(const wxFont& font, const wxColour& col = wxNullColour);
 
-protected:
-    void DoApply();
+    void Resize(const wxSize& size, const wxFont& font = wxNullFont);
+
+    size_t      m_fontSize; // in points
 
-    MyCanvas *m_canvas;
+    wxTextCtrl *m_textctrl;
+    MyCanvas   *m_canvas;
 
 private:
-    //DECLARE_EVENT_TABLE() TODO
+    // any class wishing to process wxWindows events must use this macro
+    DECLARE_EVENT_TABLE()
 };
 
 // ----------------------------------------------------------------------------
@@ -118,8 +130,16 @@ enum
     // menu items
     Font_Quit = 1,
     Font_About,
+    Font_ViewMsg,
+    Font_IncSize,
+    Font_DecSize,
     Font_Choose = 100,
-    Font_Create
+    Font_EnumFamiliesForEncoding,
+    Font_EnumFamilies,
+    Font_EnumFixedFamilies,
+    Font_EnumEncodings,
+    Font_CheckNativeToFromString,
+    Font_Max
 };
 
 // ----------------------------------------------------------------------------
@@ -132,8 +152,17 @@ enum
 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
     EVT_MENU(Font_Quit,  MyFrame::OnQuit)
     EVT_MENU(Font_About, MyFrame::OnAbout)
+    EVT_MENU(Font_IncSize, MyFrame::OnIncFont)
+    EVT_MENU(Font_DecSize, MyFrame::OnDecFont)
+    EVT_MENU(Font_ViewMsg, MyFrame::OnViewMsg)
     EVT_MENU(Font_Choose, MyFrame::OnSelectFont)
-    EVT_MENU(Font_Create, MyFrame::OnCreateFont)
+    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_CheckNativeToFromString, MyFrame::OnCheckNativeToFromString)
+
+    EVT_SIZE(MyFrame::OnSize)
 END_EVENT_TABLE()
 
 // Create a new application object: this macro will allow wxWindows to create
@@ -155,7 +184,7 @@ IMPLEMENT_APP(MyApp)
 bool MyApp::OnInit()
 {
     // Create the main application window
-    MyFrame *frame = new MyFrame("Minimal wxWindows App",
+    MyFrame *frame = new MyFrame("Font wxWindows demo",
                                  wxPoint(50, 50), wxSize(450, 340));
 
     // Show it and tell the application that it's our main window
@@ -174,23 +203,38 @@ bool MyApp::OnInit()
 
 // frame constructor
 MyFrame::MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size)
-       : wxFrame((wxFrame *)NULL, -1, title, pos, size)
+       : wxFrame((wxFrame *)NULL, -1, title, pos, size), m_textctrl(NULL)
 {
-    // set the frame icon
-    SetIcon(wxICON(mondrian));
+    m_fontSize = 12;
 
     // create a menu bar
     wxMenu *menuFile = new wxMenu;
 
+    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_Choose, "&Select font...\tCtrl-F",
+    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->AppendSeparator();
+    menuFont->Append(Font_Choose, "&Select font...\tCtrl-S",
                      "Select a standard font");
-    menuFont->Append(Font_Create, "&Create font...\tCtrl-C",
-                     "Create a custom font");
+    menuFont->AppendSeparator();
+    menuFont->Append(Font_EnumFamilies, "Enumerate font &families\tCtrl-F");
+    menuFont->Append(Font_EnumFixedFamilies,
+                     "Enumerate fi&xed font families\tCtrl-X");
+    menuFont->Append(Font_EnumEncodings,
+                     "Enumerate &encodings\tCtrl-E");
+    menuFont->Append(Font_EnumFamiliesForEncoding,
+                     "Find font for en&coding...\tCtrl-C",
+                     "Find font families for given encoding");
+    menuFont->AppendSeparator();
+    menuFont->Append(Font_CheckNativeToFromString,
+                     "Check Native Font Info To/From String");
 
     // now append the freshly created menu to the menu bar...
     wxMenuBar *menuBar = new wxMenuBar;
@@ -200,21 +244,223 @@ MyFrame::MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size)
     // ... and attach this menu bar to the frame
     SetMenuBar(menuBar);
 
+    m_textctrl = new wxTextCtrl(this, -1,
+                                "Paste text here to see how it looks\n"
+                                "like in the given font",
+                                wxDefaultPosition, wxDefaultSize,
+                                wxTE_MULTILINE);
+
     m_canvas = new MyCanvas(this);
 
     // create a status bar just for fun (by default with 1 pane only)
-    CreateStatusBar(2);
-    SetStatusText("Welcome to wxWindows!");
+    CreateStatusBar();
+    SetStatusText("Welcome to wxWindows font demo!");
+}
+
+// --------------------------------------------------------
+
+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)
+    {
+        wxString text;
+        text.Printf("Encoding %d: %s (available in facename '%s')\n",
+                    ++m_n, encoding.c_str(), facename.c_str());
+        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().c_str());
+}
+
+// -------------------------------------------------------------
+
+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)
+    {
+        m_facenames.Add(facename);
+        return TRUE;
+    }
+
+    private:
+        wxArrayString m_facenames;
+} fontEnumerator;
+
+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
+            wxString *facenames = new wxString[nFacenames];
+            int n;
+            for ( n = 0; n < nFacenames; n++ )
+                facenames[n] = fontEnumerator.GetFacenames().Item(n);
+
+            n = wxGetSingleChoiceIndex("Choose a facename", "Font demo",
+                                       nFacenames, facenames, this);
+
+            if ( n != -1 )
+                facename = facenames[n];
+
+            delete [] facenames;
+        }
+
+        if ( !facename.IsEmpty() )
+        {
+            wxFont font(12, wxFONTFAMILY_DEFAULT, wxFONTSTYLE_NORMAL,
+                        wxFONTWEIGHT_NORMAL, FALSE, facename, encoding);
+
+            DoChangeFont(font);
+        }
+
+        return TRUE;
+    }
+    else if ( !silent )
+    {
+        wxLogWarning("No such fonts found.");
+    }
+
+    return FALSE;
+}
+
+void MyFrame::OnEnumerateFamiliesForEncoding(wxCommandEvent& WXUNUSED(event))
+{
+    static wxFontEncoding encodings[] =
+    {
+        wxFONTENCODING_ISO8859_1,
+        wxFONTENCODING_ISO8859_2,
+        wxFONTENCODING_ISO8859_5,
+        wxFONTENCODING_ISO8859_7,
+        wxFONTENCODING_ISO8859_15,
+        wxFONTENCODING_KOI8,
+        wxFONTENCODING_CP1250,
+        wxFONTENCODING_CP1251,
+        wxFONTENCODING_CP1252,
+    };
+
+    static const wxString encodingNames[] =
+    {
+        "Western European (ISO-8859-1)",
+        "Central European (ISO-8859-2)",
+        "Cyrillic (ISO-8859-5)",
+        "Greek (ISO-8859-7)",
+        "Western European with Euro (ISO-8859-15)",
+        "KOI8-R",
+        "Windows Central European (CP 1250)",
+        "Windows Cyrillic (CP 1251)",
+        "Windows Western European (CP 1252)",
+    };
+
+    int n = wxGetSingleChoiceIndex("Choose an encoding", "Font demo",
+                                   WXSIZEOF(encodingNames),
+                                   encodingNames,
+                                   this);
+
+    if ( n != -1 )
+    {
+        DoEnumerateFamilies(FALSE, encodings[n]);
+    }
 }
 
+void MyFrame::OnCheckNativeToFromString(wxCommandEvent& WXUNUSED(event))
+{
+    wxString fontInfo = m_canvas->GetTextFont().GetNativeFontInfoDesc();
+
+    if ( fontInfo.IsEmpty() )
+    {
+        wxLogError("Native font info string is empty!");
+    }
+    else
+    {
+        wxFont *font = wxFont::New(fontInfo);
+        if ( fontInfo != font->GetNativeFontInfoDesc() )
+            wxLogError("wxNativeFontInfo ToString()/FromString() broken!");
+        else
+            wxLogError("wxNativeFontInfo works: %s", fontInfo.c_str());
+        delete font;
+     }
+}
 
-// event handlers
+void MyFrame::DoResizeFont(int diff)
+{
+    wxFont fontOld = m_canvas->GetTextFont();
+
+    DoChangeFont(
+        wxFont(
+               fontOld.GetPointSize() + diff,
+               fontOld.GetFamily(),
+               fontOld.GetStyle(),
+               fontOld.GetWeight(),
+               fontOld.GetUnderlined(),
+               fontOld.GetFaceName(),
+               fontOld.GetEncoding()
+              )
+    );
+}
 
-void MyFrame::OnCreateFont(wxCommandEvent& WXUNUSED(event))
+void MyFrame::DoChangeFont(const wxFont& font, const wxColour& col)
 {
-    MyFontDialog dialog(this);
+    Resize(GetClientSize(), font);
 
-    (void)dialog.ShowModal();
+    m_canvas->SetTextFont(font);
+    if ( col.Ok() )
+        m_canvas->SetColour(col);
+    m_canvas->Refresh();
+
+    m_textctrl->SetFont(font);
+    if ( col.Ok() )
+        m_textctrl->SetForegroundColour(col);
 }
 
 void MyFrame::OnSelectFont(wxCommandEvent& WXUNUSED(event))
@@ -227,9 +473,10 @@ void MyFrame::OnSelectFont(wxCommandEvent& WXUNUSED(event))
     if ( dialog.ShowModal() == wxID_OK )
     {
         wxFontData retData = dialog.GetFontData();
-        m_canvas->SetTextFont(retData.GetChosenFont());
-        m_canvas->SetColour(retData.GetColour());
-        m_canvas->Refresh();
+        wxFont font = retData.GetChosenFont();
+        wxColour colour = retData.GetColour();
+
+        DoChangeFont(font, colour);
     }
 }
 
@@ -239,12 +486,157 @@ void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
     Close(TRUE);
 }
 
+void MyFrame::OnViewMsg(wxCommandEvent& WXUNUSED(event))
+{
+    // 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;
+
+    static const char *prefix = "Content-Type: text/plain; charset=";
+    const size_t len = strlen(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 char *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.c_str());
+
+        return;
+    }
+
+    // ok, now get the corresponding encoding
+    wxFontEncoding fontenc = wxTheFontMapper->CharsetToEncoding(charset);
+    if ( fontenc == wxFONTENCODING_SYSTEM )
+    {
+        wxLogError("Charset '%s' is unsupported.", charset.c_str());
+        return;
+    }
+
+    m_textctrl->LoadFile(filename);
+
+    if ( fontenc == wxFONTENCODING_UTF8 ||
+            !wxTheFontMapper->IsEncodingAvailable(fontenc) )
+    {
+        // try to find some similar encoding:
+        wxFontEncoding encAlt;
+        if ( wxTheFontMapper->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).c_str(),
+                             wxFontMapper::GetEncodingDescription(encAlt).c_str());
+            }
+        }
+        else
+            wxLogWarning("No fonts for encoding '%s' on this system.",
+                         wxFontMapper::GetEncodingDescription(fontenc).c_str());
+    }
+
+    // and now create the correct font
+    if ( !DoEnumerateFamilies(FALSE, fontenc, TRUE /* silent */) )
+    {
+        wxFont font(12, wxFONTFAMILY_DEFAULT, wxFONTSTYLE_NORMAL,
+                    wxFONTWEIGHT_NORMAL, FALSE /* !underlined */,
+                    wxEmptyString /* facename */, fontenc);
+        if ( font.Ok() )
+        {
+            DoChangeFont(font);
+        }
+        else
+        {
+            wxLogWarning("No fonts for encoding '%s' on this system.",
+                         wxFontMapper::GetEncodingDescription(fontenc).c_str());
+        }
+    }
+}
+
 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 {
-    wxMessageBox("wxWindows font demo.", "About Font",
+    wxMessageBox("wxWindows font demo\n"
+                 "(c) 1999 Vadim Zeitlin",
+                 "About Font",
                  wxOK | wxICON_INFORMATION, this);
 }
 
+void MyFrame::OnSize(wxSizeEvent& event)
+{
+    Resize(GetClientSize());
+
+    event.Skip();
+}
+
+void MyFrame::Resize(const wxSize& size, const wxFont& font)
+{
+    if ( !m_textctrl )
+        return;
+
+    wxCoord h;
+    if ( font.Ok() )
+    {
+        wxClientDC dc(this);
+        dc.SetFont(font);
+
+        h = 10*(dc.GetCharHeight() + 1);
+    }
+    else
+    {
+        h = m_textctrl->GetSize().y;
+    }
+
+    m_textctrl->SetSize(0, 0, size.x, h);
+    m_canvas->SetSize(0, h, size.x, size.y - h);
+}
 
 // ----------------------------------------------------------------------------
 // MyCanvas
@@ -255,10 +647,9 @@ BEGIN_EVENT_TABLE(MyCanvas, wxWindow)
 END_EVENT_TABLE()
 
 MyCanvas::MyCanvas( wxWindow *parent )
-        : wxWindow( parent, -1 )
+        : wxWindow( parent, -1 ),
+          m_colour(*wxRED), m_font(*wxNORMAL_FONT)
 {
-    m_font = *wxNORMAL_FONT;
-    m_colour = *wxRED;
 }
 
 MyCanvas::~MyCanvas()
@@ -276,13 +667,22 @@ void MyCanvas::OnPaint( wxPaintEvent &WXUNUSED(event) )
 
     // output the font name/info
     wxString fontInfo;
-    fontInfo.Printf("Font family is '%s', style '%s', weight '%s'",
+    fontInfo.Printf("Font size is %d points, family is %s, style %s, weight %s",
+                    m_font.GetPointSize(),
                     m_font.GetFamilyString().c_str(),
                     m_font.GetStyleString().c_str(),
                     m_font.GetWeightString().c_str());
 
     dc.DrawText(fontInfo, 5, 5);
 
+    if ( m_font.Ok() )
+    {
+        wxString fontDesc = m_font.GetNativeFontInfoDesc();
+        dc.SetFont(wxFont(fontDesc));
+        fontInfo.Printf("Native font info: %s", fontDesc.c_str());
+        dc.DrawText(fontInfo, 5, 5 + dc.GetCharHeight());
+    }
+
     // prepare to draw the font
     dc.SetFont(m_font);
     dc.SetTextForeground(m_colour);
@@ -293,7 +693,7 @@ void MyCanvas::OnPaint( wxPaintEvent &WXUNUSED(event) )
 
     // the origin for our table
     int x = 5,
-        y = 2*h + 5;
+        y = 2*h;
 
     // print all font symbols from 32 to 256 in 7 rows of 32 chars each
     for ( int i = 1; i < 8; i++ )
@@ -323,36 +723,3 @@ void MyCanvas::OnPaint( wxPaintEvent &WXUNUSED(event) )
         dc.DrawLine(xl, y, xl, y + 7*h - 2);
     }
 }
-
-// ----------------------------------------------------------------------------
-// MyFontDialog
-// ----------------------------------------------------------------------------
-
-MyFontDialog::MyFontDialog(MyFrame *frame)
-            : wxDialog(frame, -1, wxString("Edit font attributes"))
-{
-    m_canvas = frame->GetCanvas();
-
-    // create controls
-    wxSize sizeBtn = wxButton::GetDefaultSize();
-
-    // TODO
-
-    // position and size the dialog
-    SetClientSize(4*sizeBtn.x, 10*sizeBtn.y);
-    Centre();
-}
-
-void MyFontDialog::DoApply()
-{
-    wxFont font; //(size, family, style, weight, underlined, face, encoding);
-    if ( !font.Ok() )
-    {
-        wxLogError("Font creation failed.");
-    }
-    else
-    {
-        m_canvas->SetTextFont(font);
-        m_canvas->Refresh();
-    }
-}