]> git.saurik.com Git - wxWidgets.git/blob - samples/dnd/dnd.cpp
More-or-less finished reasonably cool wxToolBar class with tooltips.
[wxWidgets.git] / samples / dnd / dnd.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: dnd.cpp
3 // Purpose: Drag and drop sample
4 // Author: Vadim Zeitlin
5 // Modified by:
6 // Created: 04/01/98
7 // RCS-ID:
8 // Copyright:
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 #include "wx/wxprec.h"
13
14 #ifdef __BORLANDC__
15 #pragma hdrstop
16 #endif
17
18 #ifndef WX_PRECOMP
19 #include "wx/wx.h"
20 #endif
21
22 #include "wx/intl.h"
23 #include "wx/log.h"
24
25 #include "wx/dnd.h"
26
27 #ifdef __WXGTK__
28 #include "mondrian.xpm"
29 #endif
30
31 // ----------------------------------------------------------------------------
32 // Derive 2 simple classes which just put in the listbox the strings (text or
33 // file names) we drop on them
34 // ----------------------------------------------------------------------------
35 class DnDText : public wxTextDropTarget
36 {
37 public:
38 DnDText(wxListBox *pOwner) { m_pOwner = pOwner; }
39
40 virtual bool OnDropText(long x, long y, const char *psz);
41
42 private:
43 wxListBox *m_pOwner;
44 };
45
46 class DnDFile : public wxFileDropTarget
47 {
48 public:
49 DnDFile(wxListBox *pOwner) { m_pOwner = pOwner; }
50
51 virtual bool OnDropFiles(long x, long y,
52 size_t nFiles, const char * const aszFiles[]);
53
54 private:
55 wxListBox *m_pOwner;
56 };
57
58 // ----------------------------------------------------------------------------
59 // Define a new application type
60 // ----------------------------------------------------------------------------
61 class DnDApp : public wxApp
62 {
63 public:
64 bool OnInit();
65 };
66
67 IMPLEMENT_APP(DnDApp);
68
69 // ----------------------------------------------------------------------------
70 // Define a new frame type
71 // ----------------------------------------------------------------------------
72 class DnDFrame : public wxFrame
73 {
74 public:
75 DnDFrame(wxFrame *frame, char *title, int x, int y, int w, int h);
76 ~DnDFrame();
77
78 void OnPaint(wxPaintEvent& event);
79 void OnQuit (wxCommandEvent& event);
80 void OnAbout(wxCommandEvent& event);
81 void OnDrag (wxCommandEvent& event);
82 void OnHelp (wxCommandEvent& event);
83 void OnLogClear(wxCommandEvent& event);
84
85 void OnLeftDown(wxMouseEvent& event);
86 void OnRightDown(wxMouseEvent& event);
87
88 bool OnClose();
89
90 DECLARE_EVENT_TABLE()
91
92 private:
93 wxListBox *m_ctrlFile,
94 *m_ctrlText;
95 wxTextCtrl *m_ctrlLog;
96
97 wxLog *m_pLog, *m_pLogPrev;
98
99 wxString m_strText;
100 };
101
102 // ----------------------------------------------------------------------------
103 // IDs for the menu commands
104 // ----------------------------------------------------------------------------
105 enum
106 {
107 Menu_Quit = 1,
108 Menu_Drag,
109 Menu_About = 101,
110 Menu_Help,
111 Menu_Clear,
112 };
113
114 BEGIN_EVENT_TABLE(DnDFrame, wxFrame)
115 EVT_MENU(Menu_Quit, DnDFrame::OnQuit)
116 EVT_MENU(Menu_About, DnDFrame::OnAbout)
117 EVT_MENU(Menu_Drag, DnDFrame::OnDrag)
118 EVT_MENU(Menu_Help, DnDFrame::OnHelp)
119 EVT_MENU(Menu_Clear, DnDFrame::OnLogClear)
120 EVT_LEFT_DOWN(OnLeftDown)
121 EVT_RIGHT_DOWN(OnRightDown)
122 END_EVENT_TABLE()
123
124 // `Main program' equivalent, creating windows and returning main app frame
125 bool DnDApp::OnInit(void)
126 {
127 // create the main frame window
128 DnDFrame *frame = new DnDFrame((wxFrame *) NULL, "Drag & Drop wxWindows App",
129 50, 50, 450, 340);
130
131 // activate it
132 frame->Show(TRUE);
133
134 SetTopWindow(frame);
135
136 return TRUE;
137 }
138
139 DnDFrame::DnDFrame(wxFrame *frame, char *title, int x, int y, int w, int h)
140 : wxFrame(frame, -1, title, wxPoint(x, y), wxSize(w, h)),
141 m_strText("wxWindows drag & drop works :-)")
142
143 {
144
145 #ifdef __WXMSW__
146 // frame icon and status bar
147 SetIcon(wxIcon("mondrian"));
148 #else
149 SetIcon(wxIcon(mondrian_xpm));
150 #endif
151
152 // const int widths[] = { -1 };
153 CreateStatusBar();
154
155 // construct menu
156 wxMenu *file_menu = new wxMenu;
157 file_menu->Append(Menu_Drag, "&Test drag...");
158 file_menu->AppendSeparator();
159 file_menu->Append(Menu_Quit, "E&xit");
160
161 wxMenu *log_menu = new wxMenu;
162 log_menu->Append(Menu_Clear, "Clear");
163
164 wxMenu *help_menu = new wxMenu;
165 help_menu->Append(Menu_Help, "&Help...");
166 help_menu->AppendSeparator();
167 help_menu->Append(Menu_About, "&About");
168
169 wxMenuBar *menu_bar = new wxMenuBar;
170 menu_bar->Append(file_menu, "&File");
171 menu_bar->Append(log_menu, "&Log");
172 menu_bar->Append(help_menu, "&Help");
173
174 SetMenuBar(menu_bar);
175
176 // make a panel with 3 subwindows
177 wxPoint pos(0, 0);
178 wxSize size(400, 200);
179
180 wxString strFile("Drop files here!"), strText("Drop text on me");
181
182 m_ctrlFile = new wxListBox(this, -1, pos, size, 1, &strFile, wxLB_HSCROLL);
183 m_ctrlText = new wxListBox(this, -1, pos, size, 1, &strText, wxLB_HSCROLL);
184
185 m_ctrlLog = new wxTextCtrl(this, -1, "", pos, size,
186 wxTE_MULTILINE | wxTE_READONLY |
187 wxSUNKEN_BORDER| wxHSCROLL);
188
189 // redirect log messages to the text window (don't forget to delete it!)
190 m_pLog = new wxLogTextCtrl(m_ctrlLog);
191 m_pLogPrev = wxLog::SetActiveTarget(m_pLog);
192
193 // associate drop targets with 2 text controls
194 m_ctrlFile->SetDropTarget(new DnDFile(m_ctrlFile));
195 m_ctrlText->SetDropTarget(new DnDText(m_ctrlText));
196
197 wxLayoutConstraints *c;
198
199 // Top-left listbox
200 c = new wxLayoutConstraints;
201 c->left.SameAs (this, wxLeft);
202 c->top.SameAs (this, wxTop);
203 c->right.PercentOf(this, wxRight, 50);
204 c->height.PercentOf(this, wxHeight, 40);
205 m_ctrlFile->SetConstraints(c);
206
207 // Top-right listbox
208 c = new wxLayoutConstraints;
209 c->left.SameAs (m_ctrlFile, wxRight);
210 c->top.SameAs (this, wxTop);
211 c->right.SameAs (this, wxRight);
212 c->height.PercentOf(this, wxHeight, 40);
213 m_ctrlText->SetConstraints(c);
214
215 // Lower text control
216 c = new wxLayoutConstraints;
217 c->left.SameAs (this, wxLeft);
218 c->right.SameAs (this, wxRight);
219 c->height.PercentOf(this, wxHeight, 40);
220 c->top.SameAs(m_ctrlText, wxBottom);
221
222 m_ctrlLog->SetConstraints(c);
223
224 SetAutoLayout(TRUE);
225 }
226
227 void DnDFrame::OnQuit(wxCommandEvent& /* event */)
228 {
229 Close(TRUE);
230 }
231
232 void DnDFrame::OnDrag(wxCommandEvent& /* event */)
233 {
234 wxString strText = wxGetTextFromUser
235 (
236 "After you enter text in this dialog, press any mouse\n"
237 "button in the bottom (empty) part of the frame and \n"
238 "drag it anywhere - you will be in fact dragging the\n"
239 "text object containing this text",
240 "Please enter some text", m_strText, this
241 );
242
243 m_strText = strText;
244 }
245
246 void DnDFrame::OnAbout(wxCommandEvent& /* event */)
247 {
248 wxMessageDialog dialog(this,
249 "Drag-&-Drop Demo\n"
250 "Please see \"Help|Help...\" for details\n"
251 "Copyright (c) 1998 Vadim Zeitlin",
252 "About wxDnD");
253
254 dialog.ShowModal();
255 }
256
257 void DnDFrame::OnHelp(wxCommandEvent& /* event */)
258 {
259 wxMessageDialog dialog(this,
260 "This small program demonstrates drag & drop support in wxWindows. The program window\n"
261 "consists of 3 parts: the bottom pane is for debug messages, so that you can see what's\n"
262 "going on inside. The top part is split into 2 listboxes, the left one accepts files\n"
263 "and the right one accepts text.\n"
264 "\n"
265 "To test wxDropTarget: open wordpad (write.exe), select some text in it and drag it to\n"
266 "the right listbox (you'll notice the usual visual feedback, i.e. the cursor will change).\n"
267 "Also, try dragging some files (you can select several at once) from Windows Explorer (or \n"
268 "File Manager) to the left pane. Hold down Ctrl/Shift keys when you drop text (doesn't \n"
269 "work with files) and see what changes.\n"
270 "\n"
271 "To test wxDropSource: just press any mouse button on the empty zone of the window and drag\n"
272 "it to wordpad or any other droptarget accepting text (and of course you can just drag it\n"
273 "to the right pane). Due to a lot of trace messages, the cursor might take some time to \n"
274 "change, don't release the mouse button until it does. You can change the string being\n"
275 "dragged in in \"File|Test drag...\" dialog.\n"
276 "\n"
277 "\n"
278 "Please send all questions/bug reports/suggestions &c to \n"
279 "Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>",
280 "wxDnD Help");
281
282 dialog.ShowModal();
283 }
284
285 void DnDFrame::OnLogClear(wxCommandEvent& /* event */ )
286 {
287 m_ctrlLog->Clear();
288 }
289
290 bool DnDFrame::OnClose()
291 {
292 return TRUE;
293 }
294
295 void DnDFrame::OnLeftDown(wxMouseEvent &WXUNUSED(event) )
296 {
297 if ( !m_strText.IsEmpty() ) {
298 // start drag operation
299
300 wxTextDataObject data(m_strText);
301 wxDropSource dragSource(data, this);
302 const char *pc;
303
304 switch ( dragSource.DoDragDrop(TRUE) ) {
305 case wxDragError: pc = "Error!"; break;
306 case wxDragNone: pc = "Nothing"; break;
307 case wxDragCopy: pc = "Copied"; break;
308 case wxDragMove: pc = "Moved"; break;
309 case wxDragCancel: pc = "Cancelled"; break;
310 default: pc = "Huh?"; break;
311 }
312
313 SetStatusText(wxString("Drag result: ") + pc);
314 }
315 }
316
317 void DnDFrame::OnRightDown(wxMouseEvent &event )
318 {
319 wxMenu *menu = new wxMenu;
320
321 menu->Append(Menu_Drag, "&Test drag...");
322 menu->Append(Menu_About, "&About");
323 menu->Append(Menu_Quit, "E&xit");
324
325 PopupMenu( menu, event.GetX(), event.GetY() );
326 }
327
328 DnDFrame::~DnDFrame()
329 {
330 if ( m_pLog != NULL ) {
331 if ( wxLog::SetActiveTarget(m_pLogPrev) == m_pLog )
332 delete m_pLog;
333 }
334 }
335
336 // ----------------------------------------------------------------------------
337 // Notifications called by the base class
338 // ----------------------------------------------------------------------------
339 bool DnDText::OnDropText(long, long, const char *psz)
340 {
341 m_pOwner->Append(psz);
342
343 return TRUE;
344 }
345
346 bool DnDFile::OnDropFiles(long, long, size_t nFiles,
347 const char * const aszFiles[])
348 {
349 wxString str;
350 str.Printf("%d files dropped", nFiles);
351 m_pOwner->Append(str);
352 for ( size_t n = 0; n < nFiles; n++ ) {
353 m_pOwner->Append(aszFiles[n]);
354 }
355
356 return TRUE;
357 }