]> git.saurik.com Git - wxWidgets.git/blob - samples/taskbar/tbtest.cpp
Add missing wxSTDCALL to fix wxWebView compilation with Borland.
[wxWidgets.git] / samples / taskbar / tbtest.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: tbtest.cpp
3 // Purpose: wxTaskBarIcon demo
4 // Author: Julian Smart
5 // Modified by:
6 // Created: 01/02/97
7 // RCS-ID: $Id$
8 // Copyright: (c)
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ============================================================================
13 // declarations
14 // ============================================================================
15
16 // ----------------------------------------------------------------------------
17 // headers
18 // ----------------------------------------------------------------------------
19
20 // For compilers that support precompilation, includes "wx.h".
21 #include "wx/wxprec.h"
22
23 #ifdef __BORLANDC__
24 #pragma hdrstop
25 #endif
26
27 #ifndef WX_PRECOMP
28 #include "wx/wx.h"
29 #endif
30
31 // the application icon (under Windows and OS/2 it is in resources)
32 #ifndef wxHAS_IMAGES_IN_RESOURCES
33 #include "../sample.xpm"
34 #endif
35
36 #include "smile.xpm"
37
38 #include "wx/taskbar.h"
39
40 #include "tbtest.h"
41
42 // ----------------------------------------------------------------------------
43 // global variables
44 // ----------------------------------------------------------------------------
45
46 static MyDialog *gs_dialog = NULL;
47
48 // ============================================================================
49 // implementation
50 // ============================================================================
51
52 // ----------------------------------------------------------------------------
53 // MyApp
54 // ----------------------------------------------------------------------------
55
56 IMPLEMENT_APP(MyApp)
57
58 bool MyApp::OnInit()
59 {
60 if ( !wxApp::OnInit() )
61 return false;
62
63 if ( !wxTaskBarIcon::IsAvailable() )
64 {
65 wxMessageBox
66 (
67 "There appears to be no system tray support in your current environment. This sample may not behave as expected.",
68 "Warning",
69 wxOK | wxICON_EXCLAMATION
70 );
71 }
72
73 // Create the main window
74 gs_dialog = new MyDialog(wxT("wxTaskBarIcon Test Dialog"));
75
76 gs_dialog->Show(true);
77
78 return true;
79 }
80
81
82 // ----------------------------------------------------------------------------
83 // MyDialog implementation
84 // ----------------------------------------------------------------------------
85
86 BEGIN_EVENT_TABLE(MyDialog, wxDialog)
87 EVT_BUTTON(wxID_ABOUT, MyDialog::OnAbout)
88 EVT_BUTTON(wxID_OK, MyDialog::OnOK)
89 EVT_BUTTON(wxID_EXIT, MyDialog::OnExit)
90 EVT_CLOSE(MyDialog::OnCloseWindow)
91 END_EVENT_TABLE()
92
93
94 MyDialog::MyDialog(const wxString& title)
95 : wxDialog(NULL, wxID_ANY, title)
96 {
97 wxSizer * const sizerTop = new wxBoxSizer(wxVERTICAL);
98
99 wxSizerFlags flags;
100 flags.Border(wxALL, 10);
101
102 sizerTop->Add(new wxStaticText
103 (
104 this,
105 wxID_ANY,
106 wxT("Press 'Hide me' to hide this window, Exit to quit.")
107 ), flags);
108
109 sizerTop->Add(new wxStaticText
110 (
111 this,
112 wxID_ANY,
113 wxT("Double-click on the taskbar icon to show me again.")
114 ), flags);
115
116 sizerTop->AddStretchSpacer()->SetMinSize(200, 50);
117
118 wxSizer * const sizerBtns = new wxBoxSizer(wxHORIZONTAL);
119 sizerBtns->Add(new wxButton(this, wxID_ABOUT, wxT("&About")), flags);
120 sizerBtns->Add(new wxButton(this, wxID_OK, wxT("&Hide")), flags);
121 sizerBtns->Add(new wxButton(this, wxID_EXIT, wxT("E&xit")), flags);
122
123 sizerTop->Add(sizerBtns, flags.Align(wxALIGN_CENTER_HORIZONTAL));
124 SetSizerAndFit(sizerTop);
125 Centre();
126
127 m_taskBarIcon = new MyTaskBarIcon();
128
129 // we should be able to show up to 128 characters on recent Windows versions
130 // (and 64 on Win9x)
131 if ( !m_taskBarIcon->SetIcon(wxICON(sample),
132 "wxTaskBarIcon Sample\n"
133 "With a very, very, very, very\n"
134 "long tooltip whose length is\n"
135 "greater than 64 characters.") )
136 {
137 wxLogError(wxT("Could not set icon."));
138 }
139
140 #if defined(__WXOSX__) && wxOSX_USE_COCOA
141 m_dockIcon = new MyTaskBarIcon(wxTaskBarIcon::DOCK);
142 if ( !m_dockIcon->SetIcon(wxICON(sample)) )
143 {
144 wxLogError(wxT("Could not set icon."));
145 }
146 #endif
147 }
148
149 MyDialog::~MyDialog()
150 {
151 delete m_taskBarIcon;
152 #if defined(__WXCOCOA__)
153 delete m_dockIcon;
154 #endif
155 }
156
157 void MyDialog::OnAbout(wxCommandEvent& WXUNUSED(event))
158 {
159 static const char * const title = "About wxWidgets Taskbar Sample";
160 static const char * const message
161 = "wxWidgets sample showing wxTaskBarIcon class\n"
162 "\n"
163 "(C) 1997 Julian Smart\n"
164 "(C) 2007 Vadim Zeitlin";
165
166 #if defined(__WXMSW__) && wxUSE_TASKBARICON_BALLOONS
167 m_taskBarIcon->ShowBalloon(title, message, 15000, wxICON_INFORMATION);
168 #else // !__WXMSW__
169 wxMessageBox(message, title, wxICON_INFORMATION|wxOK, this);
170 #endif // __WXMSW__/!__WXMSW__
171 }
172
173 void MyDialog::OnOK(wxCommandEvent& WXUNUSED(event))
174 {
175 Show(false);
176 }
177
178 void MyDialog::OnExit(wxCommandEvent& WXUNUSED(event))
179 {
180 Close(true);
181 }
182
183 void MyDialog::OnCloseWindow(wxCloseEvent& WXUNUSED(event))
184 {
185 Destroy();
186 }
187
188
189 // ----------------------------------------------------------------------------
190 // MyTaskBarIcon implementation
191 // ----------------------------------------------------------------------------
192
193 enum
194 {
195 PU_RESTORE = 10001,
196 PU_NEW_ICON,
197 PU_EXIT,
198 PU_CHECKMARK,
199 PU_SUB1,
200 PU_SUB2,
201 PU_SUBMAIN
202 };
203
204
205 BEGIN_EVENT_TABLE(MyTaskBarIcon, wxTaskBarIcon)
206 EVT_MENU(PU_RESTORE, MyTaskBarIcon::OnMenuRestore)
207 EVT_MENU(PU_EXIT, MyTaskBarIcon::OnMenuExit)
208 EVT_MENU(PU_NEW_ICON,MyTaskBarIcon::OnMenuSetNewIcon)
209 EVT_MENU(PU_CHECKMARK,MyTaskBarIcon::OnMenuCheckmark)
210 EVT_UPDATE_UI(PU_CHECKMARK,MyTaskBarIcon::OnMenuUICheckmark)
211 EVT_TASKBAR_LEFT_DCLICK (MyTaskBarIcon::OnLeftButtonDClick)
212 EVT_MENU(PU_SUB1, MyTaskBarIcon::OnMenuSub)
213 EVT_MENU(PU_SUB2, MyTaskBarIcon::OnMenuSub)
214 END_EVENT_TABLE()
215
216 void MyTaskBarIcon::OnMenuRestore(wxCommandEvent& )
217 {
218 gs_dialog->Show(true);
219 }
220
221 void MyTaskBarIcon::OnMenuExit(wxCommandEvent& )
222 {
223 gs_dialog->Close(true);
224 }
225
226 static bool check = true;
227
228 void MyTaskBarIcon::OnMenuCheckmark(wxCommandEvent& )
229 {
230 check = !check;
231 }
232
233 void MyTaskBarIcon::OnMenuUICheckmark(wxUpdateUIEvent &event)
234 {
235 event.Check(check);
236 }
237
238 void MyTaskBarIcon::OnMenuSetNewIcon(wxCommandEvent&)
239 {
240 wxIcon icon(smile_xpm);
241
242 if (!SetIcon(icon, wxT("wxTaskBarIcon Sample - a different icon")))
243 wxMessageBox(wxT("Could not set new icon."));
244 }
245
246 void MyTaskBarIcon::OnMenuSub(wxCommandEvent&)
247 {
248 wxMessageBox(wxT("You clicked on a submenu!"));
249 }
250
251 // Overridables
252 wxMenu *MyTaskBarIcon::CreatePopupMenu()
253 {
254 wxMenu *menu = new wxMenu;
255 menu->Append(PU_RESTORE, wxT("&Restore main window"));
256 menu->AppendSeparator();
257 menu->Append(PU_NEW_ICON, wxT("&Set New Icon"));
258 menu->AppendSeparator();
259 menu->AppendCheckItem(PU_CHECKMARK, wxT("Test &check mark"));
260 menu->AppendSeparator();
261 wxMenu *submenu = new wxMenu;
262 submenu->Append(PU_SUB1, wxT("One submenu"));
263 submenu->AppendSeparator();
264 submenu->Append(PU_SUB2, wxT("Another submenu"));
265 menu->Append(PU_SUBMAIN, wxT("Submenu"), submenu);
266 /* OSX has built-in quit menu for the dock menu, but not for the status item */
267 #ifdef __WXOSX__
268 if ( OSXIsStatusItem() )
269 #endif
270 {
271 menu->AppendSeparator();
272 menu->Append(PU_EXIT, wxT("E&xit"));
273 }
274 return menu;
275 }
276
277 void MyTaskBarIcon::OnLeftButtonDClick(wxTaskBarIconEvent&)
278 {
279 gs_dialog->Show(true);
280 }