1. some DDE tests in exec

[wxWidgets.git] / samples / font / font.cpp

diff --git a/samples/font/font.cpp b/samples/font/font.cpp
index 60c3a39cf5211ae3f3375e83dd8b325e584fa5c0..56e5a565b671e32aa2e731f68a7daf832723ae11 100644 (file)
--- a/samples/font/font.cpp
+++ b/samples/font/font.cpp
@@ -5,7 +5,7 @@
 // Modified by:
 // Created:     30.09.99
 // RCS-ID:      $Id$
 // Modified by:
 // Created:     30.09.99
 // RCS-ID:      $Id$

-// Copyright:   (c) Vadim Zeitlin
+// Copyright:   (c) 1999 Vadim Zeitlin

 // Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
 // Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 


@@ -24,8 +24,11 @@
     #include <wx/log.h>
 #endif
 
     #include <wx/log.h>
 #endif
 

+#include <wx/choicdlg.h>

 #include <wx/fontdlg.h>
 #include <wx/fontenum.h>
 #include <wx/fontdlg.h>
 #include <wx/fontenum.h>

+#include <wx/fontmap.h>
+#include <wx/textfile.h>

 
 // ----------------------------------------------------------------------------
 // private classes
 
 // ----------------------------------------------------------------------------
 // private classes


@@ -80,39 +83,32 @@ public:
     // event handlers (these functions should _not_ be virtual)
     void OnQuit(wxCommandEvent& event);
     void OnAbout(wxCommandEvent& event);
     // event handlers (these functions should _not_ be virtual)
     void OnQuit(wxCommandEvent& event);
     void OnAbout(wxCommandEvent& event);

+    void OnViewMsg(wxCommandEvent& event);

     void OnSelectFont(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 OnEnumerateFamilies(wxCommandEvent& WXUNUSED(event))
         { DoEnumerateFamilies(FALSE); }
     void OnEnumerateFixedFamilies(wxCommandEvent& WXUNUSED(event))
         { DoEnumerateFamilies(TRUE); }

+    void OnEnumerateEncodings(wxCommandEvent& event);

 
 

-protected:
-    void DoEnumerateFamilies(bool fixedWidthOnly);
-
-    MyCanvas *m_canvas;
+    void OnSize(wxSizeEvent& event);

 
 

-private:
-    // any class wishing to process wxWindows events must use this macro
-    DECLARE_EVENT_TABLE()
-};
-
-// 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 DoChangeFont(const wxFont& font, const wxColour& col = wxNullColour);

 
 

-protected:
-    void DoApply();
+    void Resize(const wxSize& size, const wxFont& font = wxNullFont);

 
 

-    MyCanvas *m_canvas;
+    wxTextCtrl *m_textctrl;
+    MyCanvas   *m_canvas;

 
 private:
 
 private:

-    //DECLARE_EVENT_TABLE() TODO
+    // any class wishing to process wxWindows events must use this macro
+    DECLARE_EVENT_TABLE()

 };
 
 // ----------------------------------------------------------------------------
 };
 
 // ----------------------------------------------------------------------------


@@ -125,10 +121,12 @@ enum
     // menu items
     Font_Quit = 1,
     Font_About,
     // menu items
     Font_Quit = 1,
     Font_About,

+    Font_ViewMsg,

     Font_Choose = 100,
     Font_Choose = 100,

-    Font_Create,
+    Font_EnumFamiliesForEncoding,

     Font_EnumFamilies,
     Font_EnumFixedFamilies,
     Font_EnumFamilies,
     Font_EnumFixedFamilies,

+    Font_EnumEncodings,

     Font_Max
 };
 
     Font_Max
 };
 


@@ -142,10 +140,14 @@ enum
 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
     EVT_MENU(Font_Quit,  MyFrame::OnQuit)
     EVT_MENU(Font_About, MyFrame::OnAbout)
 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
     EVT_MENU(Font_Quit,  MyFrame::OnQuit)
     EVT_MENU(Font_About, MyFrame::OnAbout)

+    EVT_MENU(Font_ViewMsg, MyFrame::OnViewMsg)

     EVT_MENU(Font_Choose, MyFrame::OnSelectFont)
     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_EnumFamilies, MyFrame::OnEnumerateFamilies)
     EVT_MENU(Font_EnumFixedFamilies, MyFrame::OnEnumerateFixedFamilies)

+    EVT_MENU(Font_EnumEncodings, MyFrame::OnEnumerateEncodings)
+
+    EVT_SIZE(MyFrame::OnSize)

 END_EVENT_TABLE()
 
 // Create a new application object: this macro will allow wxWindows to create
 END_EVENT_TABLE()
 
 // Create a new application object: this macro will allow wxWindows to create


@@ -186,11 +188,14 @@ bool MyApp::OnInit()
 
 // frame constructor
 MyFrame::MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size)
 
 // 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)

 {
     // create a menu bar
     wxMenu *menuFile = new wxMenu;
 
 {
     // 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");
     menuFile->Append(Font_About, "&About...\tCtrl-A", "Show about dialog");
     menuFile->AppendSeparator();
     menuFile->Append(Font_Quit, "E&xit\tAlt-X", "Quit this program");


@@ -198,12 +203,15 @@ MyFrame::MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size)
     wxMenu *menuFont = new wxMenu;
     menuFont->Append(Font_Choose, "&Select font...\tCtrl-S",
                      "Select a standard font");
     wxMenu *menuFont = new wxMenu;
     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->AppendSeparator();

-    menuFont->Append(Font_EnumFamilies, "&Enumerate font families\tCtrl-E");
+    menuFont->Append(Font_EnumFamilies, "Enumerate font &families\tCtrl-F");

     menuFont->Append(Font_EnumFixedFamilies,
     menuFont->Append(Font_EnumFixedFamilies,

-                     "&Enumerate fixed font families\tCtrl-F");
+                     "Enumerate f&ixed font families\tCtrl-I");
+    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");

 
     // now append the freshly created menu to the menu bar...
     wxMenuBar *menuBar = new wxMenuBar;
 
     // now append the freshly created menu to the menu bar...
     wxMenuBar *menuBar = new wxMenuBar;


@@ -213,45 +221,180 @@ MyFrame::MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size)
     // ... and attach this menu bar to the frame
     SetMenuBar(menuBar);
 
     // ... 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)
     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!");

 }
 
 
 // event handlers
 }
 
 
 // event handlers

+void MyFrame::OnEnumerateEncodings(wxCommandEvent& WXUNUSED(event))
+{
+    class MyEncodingEnumerator : public wxFontEnumerator
+    {
+    public:
+        MyEncodingEnumerator() { m_n = 0; }

 
 

-void MyFrame::DoEnumerateFamilies(bool fixedWidthOnly)
+        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;
+    } fontEnumerator;
+
+    fontEnumerator.EnumerateEncodings();
+
+    wxLogMessage("Enumerating all available encodings:\n%s",
+                 fontEnumerator.GetText().c_str());
+}
+
+bool MyFrame::DoEnumerateFamilies(bool fixedWidthOnly,
+                                  wxFontEncoding encoding,
+                                  bool silent)

 {
     class MyFontEnumerator : public wxFontEnumerator
     {
     public:
 {
     class MyFontEnumerator : public wxFontEnumerator
     {
     public:

-        MyFontEnumerator() { m_n = 0; }
+        bool GotAny() const { return !m_facenames.IsEmpty(); }
+
+        const wxArrayString& GetFacenames() const { return m_facenames; }

 
     protected:
 
     protected:

-        virtual bool OnFontFamily(const wxString& family)
+        virtual bool OnFacename(const wxString& facename)

         {
         {

-            wxLogMessage("Font family %d: %s\n", ++m_n, family.c_str());
+            m_facenames.Add(facename);

 
             return TRUE;
         }
 
     private:
 
             return TRUE;
         }
 
     private:

-        size_t m_n;
+        wxArrayString m_facenames;

     } fontEnumerator;
 
     } fontEnumerator;
 

-    wxLogMessage("Enumerating %s font families:",
-                 fixedWidthOnly ? "fixed width" : "all");
-    fontEnumerator.EnumerateFamilies(fixedWidthOnly);
+    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 char *encodingNames[] =
+    {
+        "West European (Latin 1)",
+        "Central European (Latin 2)",
+        "Cyrillic (Latin 5)",
+        "Greek (Latin 7)",
+        "West European new (Latin 0)",
+        "KOI8-R",
+        "Windows Latin 2",
+        "Windows Cyrillic",
+        "Windows Latin 1",
+    };
+
+    int n = wxGetSingleChoiceIndex("Choose an encoding", "Font demo",
+                                   WXSIZEOF(encodingNames),
+                                   (char **)encodingNames,
+                                   this);
+
+    if ( n != -1 )
+    {
+        DoEnumerateFamilies(FALSE, encodings[n]);
+    }

 }
 
 }
 

-void MyFrame::OnCreateFont(wxCommandEvent& WXUNUSED(event))
+void MyFrame::DoChangeFont(const wxFont& font, const wxColour& col)

 {
 {

-    MyFontDialog dialog(this);
+    Resize(GetSize(), 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))
 }
 
 void MyFrame::OnSelectFont(wxCommandEvent& WXUNUSED(event))


@@ -264,9 +407,10 @@ void MyFrame::OnSelectFont(wxCommandEvent& WXUNUSED(event))
     if ( dialog.ShowModal() == wxID_OK )
     {
         wxFontData retData = dialog.GetFontData();
     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);

     }
 }
 
     }
 }
 


@@ -276,12 +420,133 @@ void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
     Close(TRUE);
 }
 
     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;
+    }
+
+    // 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());
+        }
+    }
+
+    m_textctrl->LoadFile(filename);
+}
+

 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 {
 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);
 }
 
                  wxOK | wxICON_INFORMATION, this);
 }
 

+void MyFrame::OnSize(wxSizeEvent& event)
+{
+    wxSize size = event.GetSize();
+
+    Resize(size);
+
+    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
 
 // ----------------------------------------------------------------------------
 // MyCanvas


@@ -292,10 +557,9 @@ BEGIN_EVENT_TABLE(MyCanvas, wxWindow)
 END_EVENT_TABLE()
 
 MyCanvas::MyCanvas( wxWindow *parent )
 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()
 }
 
 MyCanvas::~MyCanvas()


@@ -330,7 +594,7 @@ void MyCanvas::OnPaint( wxPaintEvent &WXUNUSED(event) )
 
     // the origin for our table
     int x = 5,
 
     // 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++ )
 
     // print all font symbols from 32 to 256 in 7 rows of 32 chars each
     for ( int i = 1; i < 8; i++ )


@@ -360,36 +624,3 @@ void MyCanvas::OnPaint( wxPaintEvent &WXUNUSED(event) )
         dc.DrawLine(xl, y, xl, y + 7*h - 2);
     }
 }
         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();
-    }
-}