added wxTLW for MSW

git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@11685 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
This commit is contained in:
Vadim Zeitlin
2001-09-24 00:34:14 +00:00
parent c2fd78b10f
commit 82c9f85ce5
20 changed files with 592 additions and 509 deletions

View File

@@ -35,6 +35,10 @@
#include "wx/wx.h"
#endif
#include "wx/dynarray.h"
WX_DEFINE_ARRAY(wxWindow *, wxArrayLboxes);
// ----------------------------------------------------------------------------
// resources
// ----------------------------------------------------------------------------
@@ -70,8 +74,13 @@ public:
// event handlers (these functions should _not_ be virtual)
void OnQuit(wxCommandEvent& event);
void OnAbout(wxCommandEvent& event);
void OnCreateLbox(wxCommandEvent& event);
void OnDeleteLbox(wxCommandEvent& event);
private:
wxArrayLboxes m_lboxes;
wxCoord m_pos;
// any class wishing to process wxWindows events must use this macro
DECLARE_EVENT_TABLE()
};
@@ -85,9 +94,14 @@ enum
{
// menu items
Minimal_Quit = 1,
Minimal_About
Minimal_About,
Minimal_CreateLbox,
Minimal_DeleteLbox,
};
static const size_t NUM_LBOXES = 10;
static const wxCoord POS_STEP = 5;
// ----------------------------------------------------------------------------
// event tables and other macros for wxWindows
// ----------------------------------------------------------------------------
@@ -98,6 +112,8 @@ enum
BEGIN_EVENT_TABLE(MyFrame, wxFrame)
EVT_MENU(Minimal_Quit, MyFrame::OnQuit)
EVT_MENU(Minimal_About, MyFrame::OnAbout)
EVT_MENU(Minimal_CreateLbox, MyFrame::OnCreateLbox)
EVT_MENU(Minimal_DeleteLbox, MyFrame::OnDeleteLbox)
END_EVENT_TABLE()
// Create a new application object: this macro will allow wxWindows to create
@@ -107,7 +123,6 @@ END_EVENT_TABLE()
// not wxApp)
IMPLEMENT_APP(MyApp)
// ============================================================================
// implementation
// ============================================================================
@@ -141,6 +156,8 @@ bool MyApp::OnInit()
MyFrame::MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size)
: wxFrame((wxFrame *)NULL, -1, title, pos, size)
{
m_pos = 0;
#ifdef __WXMAC__
// we need this in order to allow the about menu relocation, since ABOUT is
// not the default id of the about menu
@@ -157,6 +174,8 @@ MyFrame::MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size)
// the "About" item should be in the help menu
wxMenu *helpMenu = new wxMenu;
helpMenu->Append(Minimal_About, "&About...\tCtrl-A", "Show about dialog");
helpMenu->Append(Minimal_CreateLbox, "&Create 10 listboxes\tCtrl-C");
helpMenu->Append(Minimal_DeleteLbox, "&Delete 10 listboxes\tCtrl-D");
menuFile->Append(Minimal_Quit, "E&xit\tAlt-X", "Quit this program");
@@ -193,3 +212,28 @@ void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
wxMessageBox(msg, "About Minimal", wxOK | wxICON_INFORMATION, this);
}
void MyFrame::OnCreateLbox(wxCommandEvent& WXUNUSED(event))
{
for ( size_t n = 0; n < NUM_LBOXES; n++ )
{
m_lboxes.Add(new wxListBox(this, -1, wxPoint(m_pos, m_pos)));
m_pos += POS_STEP;
}
}
void MyFrame::OnDeleteLbox(wxCommandEvent& WXUNUSED(event))
{
size_t count = m_lboxes.GetCount();
if ( count < NUM_LBOXES )
return;
for ( size_t n = 0; n < NUM_LBOXES; n++ )
{
delete m_lboxes[--count];
m_lboxes.RemoveAt(count);
m_pos -= POS_STEP;
}
}