]> git.saurik.com Git - wxWidgets.git/blobdiff - samples/html/test/test.cpp
Get rid of useless temporaries in wxAffineMatrix2D unit test.
[wxWidgets.git] / samples / html / test / test.cpp
index d167408c47ce5927e9462c1833bcfc0fa2b37899..d42117b966342675c6438f6d3c18fb728391941f 100644 (file)
 /////////////////////////////////////////////////////////////////////////////
 // Name:        test.cpp
 // Purpose:     wxHtml testing example
+// Author:      Vaclav Slavik
+// Created:     1999-07-07
+// RCS-ID:      $Id$
+// Copyright:   (c) Vaclav Slavik
+// Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
-#ifdef __GNUG__
-    #pragma implementation "test.cpp"
-    #pragma interface "test.cpp"
-#endif
-
 // For compilers that support precompilation, includes "wx/wx.h".
-#include <wx/wxprec.h>
+#include "wx/wxprec.h"
 
 #ifdef __BORLANDC__
     #pragma hdrstop
 #endif
 
-// for all others, include the necessary headers (this file is usually all you
-// need because it includes almost all "standard" wxWindows headers
+// 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/wx.h"
 #endif
 
-#include <wx/image.h>
-#include <wx/html/htmlwin.h>
+#include "wx/image.h"
+#include "wx/sysopt.h"
+#include "wx/html/htmlwin.h"
+#include "wx/html/htmlproc.h"
+#include "wx/fs_inet.h"
+#include "wx/filedlg.h"
+#include "wx/utils.h"
+#include "wx/clipbrd.h"
+#include "wx/dataobj.h"
+#include "wx/stopwatch.h"
+
+#include "../../sample.xpm"
 
 // ----------------------------------------------------------------------------
 // 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();
-   };
+class MyApp : public wxApp
+{
+public:
+    virtual bool OnInit();
+};
+
+// Define a new html window type: this is a wrapper for handling wxHtmlWindow events
+class MyHtmlWindow : public wxHtmlWindow
+{
+public:
+    MyHtmlWindow(wxWindow *parent) : wxHtmlWindow( parent )
+    {
+        // no custom background initially to avoid confusing people
+        m_drawCustomBg = false;
+    }
+
+    virtual wxHtmlOpeningStatus OnOpeningURL(wxHtmlURLType WXUNUSED(type),
+                                             const wxString& WXUNUSED(url),
+                                             wxString *WXUNUSED(redirect)) const;
+
+    // toggle drawing of custom background
+    void DrawCustomBg(bool draw)
+    {
+        m_drawCustomBg = draw;
+        Refresh();
+    }
+
+private:
+#if wxUSE_CLIPBOARD
+    void OnClipboardEvent(wxClipboardTextEvent& event);
+#endif // wxUSE_CLIPBOARD
+    void OnEraseBgEvent(wxEraseEvent& event);
+
+    bool m_drawCustomBg;
+
+    DECLARE_EVENT_TABLE()
+    wxDECLARE_NO_COPY_CLASS(MyHtmlWindow);
+};
 
 // Define a new frame type: this is going to be our main frame
-   class MyFrame : public wxFrame
-   {
-   public:
+class MyFrame : public wxFrame
+{
+public:
     // ctor(s)
-      MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size);
-   
+    MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size);
+
     // event handlers (these functions should _not_ be virtual)
-      void OnQuit(wxCommandEvent& event);
-      void OnAbout(wxCommandEvent& event);
-      void OnBack(wxCommandEvent& event);
-      void OnForward(wxCommandEvent& event);
+    void OnQuit(wxCommandEvent& event);
+    void OnPageOpen(wxCommandEvent& event);
+    void OnDefaultLocalBrowser(wxCommandEvent& event);
+    void OnDefaultWebBrowser(wxCommandEvent& event);
+    void OnBack(wxCommandEvent& event);
+    void OnForward(wxCommandEvent& event);
+    void OnProcessor(wxCommandEvent& event);
+    void OnDrawCustomBg(wxCommandEvent& event);
+
+    void OnHtmlLinkClicked(wxHtmlLinkEvent& event);
+    void OnHtmlCellHover(wxHtmlCellEvent &event);
+    void OnHtmlCellClicked(wxHtmlCellEvent &event);
 
-   private:
-    // any class wishing to process wxWindows events must use this macro
+private:
+    MyHtmlWindow *m_Html;
+    wxHtmlProcessor *m_Processor;
+
+    // Any class wishing to process wxWidgets events must use this macro
     DECLARE_EVENT_TABLE()
-   };
+};
+
+
+class BoldProcessor : public wxHtmlProcessor
+{
+public:
+    virtual wxString Process(const wxString& s) const
+    {
+        wxString r(s);
+        r.Replace(wxT("<b>"), wxEmptyString);
+        r.Replace(wxT("<B>"), wxEmptyString);
+        r.Replace(wxT("</b>"), wxEmptyString);
+        r.Replace(wxT("</B>"), wxEmptyString);
+
+        return r;
+    }
+};
 
 // ----------------------------------------------------------------------------
 // constants
 // ----------------------------------------------------------------------------
 
 // IDs for the controls and the menu commands
-   enum
-   {
+enum
+{
     // menu items
-   Minimal_Quit = 1,
-   Minimal_About,
-   Minimal_Back,
-   Minimal_Forward,
-   
-    // controls start here (the numbers are, of course, arbitrary)
-   Minimal_Text = 1000,
-   };
+    ID_PageOpen = wxID_HIGHEST,
+    ID_DefaultLocalBrowser,
+    ID_DefaultWebBrowser,
+    ID_Back,
+    ID_Forward,
+    ID_Processor,
+    ID_DrawCustomBg
+};
 
 // ----------------------------------------------------------------------------
-// event tables and other macros for wxWindows
+// event tables and other macros for wxWidgets
 // ----------------------------------------------------------------------------
 
-// the event tables connect the wxWindows 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.
-   BEGIN_EVENT_TABLE(MyFrame, wxFrame)
-   EVT_MENU(Minimal_Quit,  MyFrame::OnQuit)
-   EVT_MENU(Minimal_About, MyFrame::OnAbout)
-   EVT_MENU(Minimal_Back, MyFrame::OnBack)
-   EVT_MENU(Minimal_Forward, MyFrame::OnForward)
-   END_EVENT_TABLE()
-   
-   // Create a new application object: this macro will allow wxWindows 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)
-   IMPLEMENT_APP(MyApp)
-   
-   // ============================================================================
-   // implementation
-   // ============================================================================
-   
-   // ----------------------------------------------------------------------------
-   // the application class
-   // ----------------------------------------------------------------------------
-   // `Main program' equivalent: the program execution "starts" here
-   bool MyApp::OnInit()
-   {
-     wxLogDebug("[starting testing app]");
-     #if wxUSE_LIBPNG
-     wxImage::AddHandler(new wxPNGHandler);
-     #endif
-     #if wxUSE_LIBJPEG
-     wxImage::AddHandler(new wxJPEGHandler);
-     #endif
-     #if wxUSE_LIBGIF
-     wxImage::AddHandler(new wxGIFHandler);
-     #endif
+BEGIN_EVENT_TABLE(MyFrame, wxFrame)
+    EVT_MENU(wxID_EXIT,  MyFrame::OnQuit)
+    EVT_MENU(ID_PageOpen, MyFrame::OnPageOpen)
+    EVT_MENU(ID_DefaultLocalBrowser, MyFrame::OnDefaultLocalBrowser)
+    EVT_MENU(ID_DefaultWebBrowser, MyFrame::OnDefaultWebBrowser)
+    EVT_MENU(ID_Back, MyFrame::OnBack)
+    EVT_MENU(ID_Forward, MyFrame::OnForward)
+    EVT_MENU(ID_Processor, MyFrame::OnProcessor)
+    EVT_MENU(ID_DrawCustomBg, MyFrame::OnDrawCustomBg)
+
+    EVT_HTML_LINK_CLICKED(wxID_ANY, MyFrame::OnHtmlLinkClicked)
+    EVT_HTML_CELL_HOVER(wxID_ANY, MyFrame::OnHtmlCellHover)
+    EVT_HTML_CELL_CLICKED(wxID_ANY, MyFrame::OnHtmlCellClicked)
+END_EVENT_TABLE()
+
+IMPLEMENT_APP(MyApp)
+
+// ============================================================================
+// implementation
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// the application class
+// ----------------------------------------------------------------------------
+
+// `Main program' equivalent: the program execution "starts" here
+bool MyApp::OnInit()
+{
+    if ( !wxApp::OnInit() )
+        return false;
+
+#if wxUSE_SYSTEM_OPTIONS
+    wxSystemOptions::SetOption(wxT("no-maskblt"), 1);
+#endif
+
+    wxInitAllImageHandlers();
+#if wxUSE_FS_INET && wxUSE_STREAMS && wxUSE_SOCKETS
+    wxFileSystem::AddHandler(new wxInternetFSHandler);
+#endif
+
+    SetVendorName(wxT("wxWidgets"));
+    SetAppName(wxT("wxHtmlTest"));
+    // the following call to wxConfig::Get will use it to create an object...
+
     // Create the main application window
-      MyFrame *frame = new MyFrame("wxHtmlWindow testing application",
-         wxPoint(50, 50), wxSize(640, 480));
-   
-    // Show it and tell the application that it's our main window
-    // @@@ what does it do exactly, in fact? is it necessary here?
-      frame->Show(TRUE);
-      SetTopWindow(frame);
-
-   
-    // 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;
-   }
+    MyFrame *frame = new MyFrame(_("wxHtmlWindow testing application"),
+        wxDefaultPosition, wxSize(640, 480));
+
+    frame->Show();
+
+    return true /* continue running */;
+}
 
 // ----------------------------------------------------------------------------
 // main frame
 // ----------------------------------------------------------------------------
 
-wxHtmlWindow *html;
-
 // frame constructor
-   MyFrame::MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size)
-   : wxFrame((wxFrame *)NULL, -1, title, pos, size)
-   {
+MyFrame::MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size)
+   : wxFrame((wxFrame *)NULL, wxID_ANY, title, pos, size,
+             wxDEFAULT_FRAME_STYLE, wxT("html_test_app"))
+{
     // create a menu bar
-      wxMenu *menuFile = new wxMenu;
-      wxMenu *menuNav = new wxMenu;
+    wxMenu *menuFile = new wxMenu;
+    wxMenu *menuNav = new wxMenu;
 
-      menuFile->Append(Minimal_About, "&Load wxWindows manual page");
-      menuFile->AppendSeparator();
-      menuFile->Append(Minimal_Quit, "E&xit");
-      menuNav->Append(Minimal_Back, "Go &BACK");
-      menuNav->Append(Minimal_Forward, "Go &FORWARD");
+    menuFile->Append(ID_PageOpen, _("&Open HTML page...\tCtrl-O"));
+    menuFile->Append(ID_DefaultLocalBrowser, _("&Open current page with default browser"));
+    menuFile->Append(ID_DefaultWebBrowser, _("Open a &web page with default browser"));
+    menuFile->AppendSeparator();
+    menuFile->Append(ID_Processor, _("&Remove bold attribute"),
+                     wxEmptyString, wxITEM_CHECK);
+    menuFile->AppendSeparator();
+    menuFile->AppendCheckItem(ID_DrawCustomBg, "&Draw custom background");
+    menuFile->AppendSeparator();
+    menuFile->Append(wxID_EXIT, _("&Close frame"));
+    menuNav->Append(ID_Back, _("Go &BACK"));
+    menuNav->Append(ID_Forward, _("Go &FORWARD"));
 
     // now append the freshly created menu to the menu bar...
-      wxMenuBar *menuBar = new wxMenuBar;
-      menuBar->Append(menuFile, "&File");
-      menuBar->Append(menuNav, "&Navigate");
+    wxMenuBar *menuBar = new wxMenuBar;
+    menuBar->Append(menuFile, _("&File"));
+    menuBar->Append(menuNav, _("&Navigate"));
 
     // ... and attach this menu bar to the frame
-      SetMenuBar(menuBar);
-   
-      CreateStatusBar(1);
-
-      {
-      wxConfig *cfg = new wxConfig("wxHtmlTest");
-      html = new wxHtmlWindow(this);
-      html -> SetRelatedFrame(this, "HTML : %s");
-      html -> SetRelatedStatusBar(0);
-      html -> ReadCustomization(cfg);
-      delete cfg;
-      html -> LoadPage("test.htm");
-      }
-   }
+    SetMenuBar(menuBar);
+
+    SetIcon(wxIcon(sample_xpm));
+
+#if wxUSE_ACCEL
+    // Create convenient accelerators for Back and Forward navigation
+    wxAcceleratorEntry entries[2];
+    entries[0].Set(wxACCEL_ALT, WXK_LEFT, ID_Back);
+    entries[1].Set(wxACCEL_ALT, WXK_RIGHT, ID_Forward);
+
+    wxAcceleratorTable accel(WXSIZEOF(entries), entries);
+    SetAcceleratorTable(accel);
+#endif // wxUSE_ACCEL
+
+#if wxUSE_STATUSBAR
+    CreateStatusBar(2);
+#endif // wxUSE_STATUSBAR
+
+    m_Processor = new BoldProcessor;
+    m_Processor->Enable(false);
+    m_Html = new MyHtmlWindow(this);
+    m_Html->SetRelatedFrame(this, _("HTML : %s"));
+#if wxUSE_STATUSBAR
+    m_Html->SetRelatedStatusBar(1);
+#endif // wxUSE_STATUSBAR
+    m_Html->ReadCustomization(wxConfig::Get());
+    m_Html->LoadFile(wxFileName(wxT("test.htm")));
+    m_Html->AddProcessor(m_Processor);
+
+    wxTextCtrl *text = new wxTextCtrl(this, wxID_ANY, wxT(""),
+                                      wxDefaultPosition, wxDefaultSize,
+                                      wxTE_MULTILINE);
+
+    delete wxLog::SetActiveTarget(new wxLogTextCtrl(text));
+
+    wxSizer *sz = new wxBoxSizer(wxVERTICAL);
+    sz->Add(m_Html, 3, wxGROW);
+    sz->Add(text, 1, wxGROW);
+    SetSizer(sz);
+}
 
 
 // event handlers
 
-   void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
-   {
-    // TRUE is to force the frame to close
-    wxLogDebug("about to save config...");
-    wxConfig *cfg = new wxConfig("wxHtmlTest");
-    html -> WriteCustomization(cfg);
-    delete cfg;
-      Close(TRUE);
-   }
+void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
+{
+    m_Html->WriteCustomization(wxConfig::Get());
+    delete wxConfig::Set(NULL);
+
+    // true is to force the frame to close
+    Close(true);
+}
+
+void MyFrame::OnPageOpen(wxCommandEvent& WXUNUSED(event))
+{
+#if wxUSE_FILEDLG
+    wxString p = wxFileSelector(_("Open HTML document"), wxEmptyString,
+        wxEmptyString, wxEmptyString, wxT("HTML files|*.htm;*.html"));
+
+    if (!p.empty())
+    {
+#if wxUSE_STOPWATCH
+        wxStopWatch sw;
+#endif
+        m_Html->LoadFile(wxFileName(p));
+#if wxUSE_STOPWATCH
+        wxLogStatus("Loaded \"%s\" in %lums", p, sw.Time());
+#endif
+    }
+#endif // wxUSE_FILEDLG
+}
+
+void MyFrame::OnDefaultLocalBrowser(wxCommandEvent& WXUNUSED(event))
+{
+    wxString page = m_Html->GetOpenedPage();
+    if (!page.empty())
+    {
+        wxLaunchDefaultBrowser(page);
+    }
+}
+
+void MyFrame::OnDefaultWebBrowser(wxCommandEvent& WXUNUSED(event))
+{
+    wxString page = m_Html->GetOpenedPage();
+    if (!page.empty())
+    {
+        wxLaunchDefaultBrowser(wxT("http://www.google.com"));
+    }
+}
+
+void MyFrame::OnBack(wxCommandEvent& WXUNUSED(event))
+{
+    if (!m_Html->HistoryBack())
+    {
+        wxMessageBox(_("You reached prehistory era!"));
+    }
+}
+
+void MyFrame::OnForward(wxCommandEvent& WXUNUSED(event))
+{
+    if (!m_Html->HistoryForward())
+    {
+        wxMessageBox(_("No more items in history!"));
+    }
+}
+
+void MyFrame::OnProcessor(wxCommandEvent& WXUNUSED(event))
+{
+    m_Processor->Enable(!m_Processor->IsEnabled());
+    m_Html->LoadPage(m_Html->GetOpenedPage());
+}
+
+void MyFrame::OnDrawCustomBg(wxCommandEvent& event)
+{
+    m_Html->DrawCustomBg(event.IsChecked());
+}
+
+void MyFrame::OnHtmlLinkClicked(wxHtmlLinkEvent &event)
+{
+    wxLogMessage(wxT("The url '%s' has been clicked!"), event.GetLinkInfo().GetHref().c_str());
+
+    // skipping this event the default behaviour (load the clicked URL)
+    // will happen...
+    event.Skip();
+}
+
+void MyFrame::OnHtmlCellHover(wxHtmlCellEvent &event)
+{
+    wxLogMessage(wxT("Mouse moved over cell %p at %d;%d"),
+                 event.GetCell(), event.GetPoint().x, event.GetPoint().y);
+}
+
+void MyFrame::OnHtmlCellClicked(wxHtmlCellEvent &event)
+{
+    wxLogMessage(wxT("Click over cell %p at %d;%d"),
+                 event.GetCell(), event.GetPoint().x, event.GetPoint().y);
+
+    // if we don't skip the event, OnHtmlLinkClicked won't be called!
+    event.Skip();
+}
+
+wxHtmlOpeningStatus MyHtmlWindow::OnOpeningURL(wxHtmlURLType WXUNUSED(type),
+                                               const wxString& url,
+                                               wxString *WXUNUSED(redirect)) const
+{
+    GetRelatedFrame()->SetStatusText(url + wxT(" lately opened"),1);
+    return wxHTML_OPEN;
+}
+
+BEGIN_EVENT_TABLE(MyHtmlWindow, wxHtmlWindow)
+#if wxUSE_CLIPBOARD
+    EVT_TEXT_COPY(wxID_ANY, MyHtmlWindow::OnClipboardEvent)
+#endif // wxUSE_CLIPBOARD
+    EVT_ERASE_BACKGROUND(MyHtmlWindow::OnEraseBgEvent)
+END_EVENT_TABLE()
+
+#if wxUSE_CLIPBOARD
+void MyHtmlWindow::OnClipboardEvent(wxClipboardTextEvent& WXUNUSED(event))
+{
+    // explicitly call wxHtmlWindow::CopySelection() method
+    // and show the first 100 characters of the text copied in the status bar
+    if ( CopySelection() )
+    {
+        wxTextDataObject data;
+        if ( wxTheClipboard && wxTheClipboard->Open() && wxTheClipboard->GetData(data) )
+        {
+            const wxString text = data.GetText();
+            const size_t maxTextLength = 100;
+
+            wxLogStatus(wxString::Format(wxT("Clipboard: '%s%s'"),
+                        wxString(text, maxTextLength).c_str(),
+                        (text.length() > maxTextLength) ? wxT("...")
+                                                        : wxT("")));
+            wxTheClipboard->Close();
+
+            return;
+        }
+    }
+
+    wxLogStatus(wxT("Clipboard: nothing"));
+}
+#endif // wxUSE_CLIPBOARD
 
-   void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
-   {
-   html -> LoadPage("fft.html");
-   }
+void MyHtmlWindow::OnEraseBgEvent(wxEraseEvent& event)
+{
+    if ( !m_drawCustomBg )
+    {
+        event.Skip();
+        return;
+    }
 
+    // draw a background grid to show that this handler is indeed executed
 
+    wxDC& dc = *event.GetDC();
+    dc.SetPen(*wxBLUE_PEN);
+    dc.Clear();
 
-   void MyFrame::OnBack(wxCommandEvent& WXUNUSED(event))
-   {
-   if (!html -> HistoryBack()) wxMessageBox("You reached prehistory era!");
-   }
+    const wxSize size = GetVirtualSize();
+    for ( int x = 0; x < size.x; x += 15 )
+    {
+        dc.DrawLine(x, 0, x, size.y);
+    }
 
+    for ( int y = 0; y < size.y; y += 15 )
+    {
+        dc.DrawLine(0, y, size.x, y);
+    }
+}
 
-   void MyFrame::OnForward(wxCommandEvent& WXUNUSED(event))
-   {
-   if (!html -> HistoryForward()) wxMessageBox("No more items in history!");
-   }