+/*
+ wxActiveX Library Licence, Version 3
+ ====================================
+
+ Copyright (C) 2003 Lindsay Mathieson [, ...]
+
+ Everyone is permitted to copy and distribute verbatim copies
+ of this licence document, but changing it is not allowed.
+
+ wxActiveX LIBRARY LICENCE
+ TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+ This library is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Library General Public Licence as published by
+ the Free Software Foundation; either version 2 of the Licence, or (at
+ your option) any later version.
+
+ This library is distributed in the hope that it will be useful, but
+ WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library
+ General Public Licence for more details.
+
+ You should have received a copy of the GNU Library General Public Licence
+ along with this software, usually in a file named COPYING.LIB. If not,
+ write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
+ Boston, MA 02111-1307 USA.
+
+ EXCEPTION NOTICE
+
+ 1. As a special exception, the copyright holders of this library give
+ permission for additional uses of the text contained in this release of
+ the library as licenced under the wxActiveX Library Licence, applying
+ either version 3 of the Licence, or (at your option) any later version of
+ the Licence as published by the copyright holders of version 3 of the
+ Licence document.
+
+ 2. The exception is that you may use, copy, link, modify and distribute
+ under the user's own terms, binary object code versions of works based
+ on the Library.
+
+ 3. If you copy code from files distributed under the terms of the GNU
+ General Public Licence or the GNU Library General Public Licence into a
+ copy of this library, as this licence permits, the exception does not
+ apply to the code that you add in this way. To avoid misleading anyone as
+ to the status of such modified files, you must delete this exception
+ notice from such code and/or adjust the licensing conditions notice
+ accordingly.
+
+ 4. If you write modifications of your own for this library, it is your
+ choice whether to permit this exception to apply to your modifications.
+ If you do not wish that, you must delete the exception notice from such
+ code and/or adjust the licensing conditions notice accordingly.
+*/
+
+// ----------------------------------------------------------------------------
+// headers
+// ----------------------------------------------------------------------------
+// For compilers that support precompilation, includes "wx/wx.h".
+#if defined(__WXGTK__) || defined(__WXMOTIF__)
+ #include "wx/wx.h"
+#endif
+#include "wx/wxprec.h"
+#include "wx/filedlg.h"
+#include "wxIEApp.h"
+#include "wxIEFrm.h"
+#include "wxActiveXFrame.h"
+#include <istream>
+#include <fstream>
+using namespace std;
+#include <exdispid.h>
+
+// ----------------------------------------------------------------------------
+// resources
+// ----------------------------------------------------------------------------
+// the application icon
+#if defined(__WXGTK__) || defined(__WXMOTIF__)
+ #include "wxIE.xpm"
+#endif
+
+// ----------------------------------------------------------------------------
+// constants
+// ----------------------------------------------------------------------------
+
+// IDs for the controls and the menu commands
+enum
+{
+ // menu items
+ FILE_QUIT = 1,
+ FILE_OPEN,
+ FILE_BROWSE,
+ FILE_HTML_EDITMODE,
+ FILE_TEST_HTML,
+ FILE_TEST_SELECT,
+ FILE_TEST_HTMLSELECT,
+ FILE_TEST_GETTEXT,
+ FILE_TEST_HTMLGETTEXT,
+ FILE_TEST_HOME,
+ FILE_TEST_ACTIVEX,
+ FILE_ABOUT,
+
+ // controls
+ ID_MSHTML = 501,
+ ID_PROGRESS_GAUGE
+};
+
+// ----------------------------------------------------------------------------
+// event tables and other macros for wxWindows
+// ----------------------------------------------------------------------------
+
+// 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(wxIEFrame, wxFrame)
+ EVT_SIZE(wxIEFrame::OnSize)
+ EVT_MENU(FILE_QUIT, wxIEFrame::OnQuit)
+ EVT_MENU(FILE_BROWSE, wxIEFrame::OnBrowse)
+ EVT_MENU(FILE_OPEN, wxIEFrame::OnOpen)
+ EVT_MENU(FILE_HTML_EDITMODE, wxIEFrame::OnEditMode)
+ EVT_UPDATE_UI(FILE_HTML_EDITMODE, wxIEFrame::OnEditModeUI)
+ EVT_MENU(FILE_TEST_HTML, wxIEFrame::OnTestHTML)
+ EVT_MENU(FILE_TEST_SELECT, wxIEFrame::OnTestSelect)
+ EVT_MENU(FILE_TEST_HTMLSELECT, wxIEFrame::OnTestHTMLSelect)
+ EVT_MENU(FILE_TEST_GETTEXT, wxIEFrame::OnTestGetText)
+ EVT_MENU(FILE_TEST_HTMLGETTEXT, wxIEFrame::OnTestHTMLGetText)
+ EVT_MENU(FILE_TEST_HOME, wxIEFrame::OnTestHome)
+ EVT_MENU(FILE_TEST_ACTIVEX, wxIEFrame::OnTestActiveX)
+ EVT_MENU(FILE_ABOUT, wxIEFrame::OnAbout)
+
+ // ActiveX Events
+ EVT_ACTIVEX_DISPID(ID_MSHTML, DISPID_STATUSTEXTCHANGE, OnMSHTMLStatusTextChangeX)
+ EVT_ACTIVEX(ID_MSHTML, "BeforeNavigate2", OnMSHTMLBeforeNavigate2X)
+ EVT_ACTIVEX(ID_MSHTML, "TitleChange", OnMSHTMLTitleChangeX)
+ EVT_ACTIVEX(ID_MSHTML, "NewWindow2", OnMSHTMLNewWindow2X)
+ EVT_ACTIVEX(ID_MSHTML, "ProgressChange", OnMSHTMLProgressChangeX)
+END_EVENT_TABLE()
+
+// ----------------------------------------------------------------------------
+// main frame
+// ----------------------------------------------------------------------------
+
+// frame constructor
+wxIEFrame::wxIEFrame(const wxString& title, const wxPoint& pos, const wxSize& size)
+ : wxFrame((wxFrame *)NULL, -1, title, pos, size)
+{
+ // set the frame icon
+ SetIcon(wxICON(wxIE));
+
+ // create a menu bar
+ wxMenu *menuFile = new wxMenu("", wxMENU_TEAROFF);
+
+ // the "About" item should be in the help menu
+ wxMenu *helpMenu = new wxMenu;
+ helpMenu->Append(FILE_ABOUT, "&About...\tCtrl-A", "Show about dialog");
+
+ menuFile->Append(FILE_TEST_HTML, "Test HTML", "Demonstrates LoadString()");
+ menuFile->Append(FILE_OPEN, "Open HTML File", "Demonstrates LoadStream(istream *)");
+ menuFile->Append(FILE_BROWSE, "Browse Web Page", "Demonstrates LoadUrl(url)");
+ menuFile->Append(FILE_HTML_EDITMODE, "Edit Mode", "Demonstrates editing html", true);
+ menuFile->AppendSeparator();
+ menuFile->Append(FILE_TEST_SELECT, "Get Selected Text", "Demonstrates GetStringSelection(false)");
+ menuFile->Append(FILE_TEST_HTMLSELECT, "Get HTML Selected Text", "Demonstrates GetStringSelection(true)");
+ menuFile->AppendSeparator();
+ menuFile->Append(FILE_TEST_GETTEXT, "Get Text", "Demonstrates GetText(false)");
+ menuFile->Append(FILE_TEST_HTMLGETTEXT, "Get HTML Text", "Demonstrates GetText(true)");
+ menuFile->Append(FILE_TEST_HOME, "Open Home Page", "Demonstrates GoHome()");
+ menuFile->AppendSeparator();
+ menuFile->Append(FILE_TEST_ACTIVEX, "Display a ActiveX control", "Demonstrates the Generic ActiveX Container");
+ menuFile->AppendSeparator();
+ menuFile->Append(FILE_QUIT, "E&xit\tAlt-X", "Quit this program");
+
+ // now append the freshly created menu to the menu bar...
+ wxMenuBar *menuBar = new wxMenuBar();
+ menuBar->Append(menuFile, "&File");
+ menuBar->Append(helpMenu, "&Help");
+
+ // ... and attach this menu bar to the frame
+ SetMenuBar(menuBar);
+
+ // create a status bar just for fun (by default with 1 pane only)
+ wxStatusBar * sb = CreateStatusBar(2);
+ SetStatusText("Ready");
+
+ // progress gauge (belongs to status bar)
+ m_gauge = new wxGauge(sb, ID_PROGRESS_GAUGE, 100);
+
+ // IE Control
+ m_ie = new wxIEHtmlWin(this, ID_MSHTML);
+
+}
+
+
+// event handlers
+
+void wxIEFrame::OnSize(wxSizeEvent& event)
+{
+ wxFrame::OnSize(event);
+
+ wxStatusBar* sb = GetStatusBar();
+ if (! sb)
+ return;
+
+ wxRect rc;
+ sb->GetFieldRect(1, rc);
+
+ m_gauge->SetSize(rc);
+};
+
+void wxIEFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
+{
+ // TRUE is to force the frame to close
+ Close(TRUE);
+}
+
+void wxIEFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
+{
+ wxString msg;
+ msg.Printf( _T("About wxIE...\n"));
+ wxMessageBox(msg, "About wxIE", wxOK | wxICON_INFORMATION, this);
+}
+
+void wxIEFrame::OnTestHTML(wxCommandEvent& WXUNUSED(event))
+{
+ wxString html =
+ "<HTML><BODY><H1>Hello World</H1>Plain Text</body></html>";
+ m_ie->LoadString(html);
+}
+
+
+void wxIEFrame::OnTestSelect(wxCommandEvent& WXUNUSED(event))
+{
+ wxString s = m_ie->GetStringSelection();
+
+ wxMessageBox(s);
+}
+
+void wxIEFrame::OnTestHTMLSelect(wxCommandEvent& WXUNUSED(event))
+{
+ wxString s = m_ie->GetStringSelection(true);
+
+ wxMessageBox(s);
+}
+
+void wxIEFrame::OnTestGetText(wxCommandEvent& WXUNUSED(event))
+{
+ wxString s = m_ie->GetText();
+
+ wxMessageBox(s);
+}
+
+void wxIEFrame::OnTestHTMLGetText(wxCommandEvent& WXUNUSED(event))
+{
+ wxString s = m_ie->GetText(true);
+
+ wxMessageBox(s);
+}
+
+void wxIEFrame::OnTestHome(wxCommandEvent& WXUNUSED(event))
+{
+ m_ie->GoHome();
+};
+
+
+void wxIEFrame::OnOpen(wxCommandEvent& WXUNUSED(event))
+{
+ wxFileDialog dlg(this, "Chooose a HTML File", "", "", "HTML files (*.html; *.htm)|*.html;*.htm|",wxOPEN);
+
+ if (dlg.ShowModal() == wxID_OK)
+ {
+ wxString fname = dlg.GetPath();
+
+ ifstream *is = new ifstream(fname.mb_str());
+ m_ie->LoadStream(is);
+ };
+}
+
+void wxIEFrame::OnEditMode(wxCommandEvent& WXUNUSED(event))
+{
+ m_ie->SetEditMode(! m_ie->GetEditMode());
+}
+
+void wxIEFrame::OnEditModeUI(wxUpdateUIEvent& event)
+{
+ if (m_ie)
+ event.Check(m_ie->GetEditMode());
+}
+
+void wxIEFrame::OnBrowse(wxCommandEvent& WXUNUSED(event))
+{
+ wxString url = wxGetTextFromUser("Enter URL:", "Browse", "", this);
+
+ m_ie->LoadUrl(url);
+}
+
+void wxIEFrame::OnMSHTMLStatusTextChangeX(wxActiveXEvent& event)
+{
+ SetStatusText(event["Text"]);
+};
+
+
+void wxIEFrame::OnMSHTMLBeforeNavigate2X(wxActiveXEvent& event)
+{
+ wxString url = event["Url"];
+ if (url == "about:blank")
+ return;
+
+ int rc = wxMessageBox(url, "Allow open url ?", wxYES_NO);
+
+ if (rc != wxYES)
+ event["Cancel"] = true;
+};
+
+void wxIEFrame::OnMSHTMLTitleChangeX(wxActiveXEvent& event)
+{
+ SetTitle(event["Text"]);
+};
+
+
+void wxIEFrame::OnMSHTMLNewWindow2X(wxActiveXEvent& event)
+{
+ int rc = wxMessageBox("New Window requested", "Allow New Window ?", wxYES_NO);
+
+ if (rc != wxYES)
+ event["Cancel"] = true;
+};
+
+
+void wxIEFrame::OnMSHTMLProgressChangeX(wxActiveXEvent& event)
+{
+ if ((long) event["ProgressMax"] != m_gauge->GetRange())
+ m_gauge->SetRange((long) event["ProgressMax"]);
+
+ m_gauge->SetValue((long) event["Progress"]);
+};
+
+void wxIEFrame::OnTestActiveX(wxCommandEvent& WXUNUSED(event))
+{
+// Some known prog ids
+//#define PROGID "Shell.Explorer"
+//#define PROGID CLSID_WebBrowser
+//#define PROGID CLSID_MozillaBrowser
+//#define PROGID CLSID_HTMLDocument
+//#define PROGID "MSCAL.Calendar"
+//#define PROGID "WordPad.Document"
+//#define PROGID "SoftwareFX.ChartFX"
+//#define PROGID "PDF.PdfCtrl"
+#define PROGID "ShockwaveFlash.ShockwaveFlash"
+
+ wxDialog dlg(this, -1, wxString(wxT("Test ActiveX")));
+
+ wxFlexGridSizer *sz = new wxFlexGridSizer(2);
+ sz->Add(new wxStaticText(&dlg, -1, wxT("Enter a ActiveX ProgId")), 0, wxALL, 5 );
+
+ wxComboBox *cb = new wxComboBox(&dlg, 101, "");
+ cb->Append(wxT("ShockwaveFlash.ShockwaveFlash"));
+ cb->Append(wxT("MSCAL.Calendar"));
+ cb->Append(wxT("Shell.Explorer"));
+ cb->Append(wxT("WordPad.Document.1"));
+ cb->Append(wxT("SoftwareFX.ChartFX.20"));
+ cb->Append(wxT("PDF.PdfCtrl.5"));
+ cb->SetSelection(0);
+
+ sz->Add(cb, 0, wxALL, 5 );
+
+ // next row
+ sz->Add(new wxButton(&dlg, wxID_CANCEL, "Cancel"), 0, wxALIGN_RIGHT|wxALL, 5 );
+ sz->Add(new wxButton(&dlg, wxID_OK, "Ok"), 0, wxALIGN_RIGHT|wxALL, 5 );
+
+ dlg.SetAutoLayout( TRUE );
+ dlg.SetSizer(sz);
+ sz->Fit(&dlg);
+ sz->SetSizeHints(&dlg);
+
+
+ if (dlg.ShowModal() == wxID_OK)
+ {
+ wxString progId = cb->GetValue();
+ wxActiveXFrame *frame = new wxActiveXFrame(this, progId);
+ frame->Show();
+ };
+}
+
projects / wxWidgets.git / blobdiff