1 /////////////////////////////////////////////////////////////////////////////
3 // Purpose: Drag and drop sample
4 // Author: Vadim Zeitlin
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 #include "wx/wxprec.h"
26 #include "wx/dirdlg.h"
27 #include "wx/filedlg.h"
29 #include "wx/clipbrd.h"
30 #include "wx/colordlg.h"
32 #include "wx/dataobj.h"
35 #include "wx/metafile.h"
36 #endif // wxUSE_METAFILES
38 #if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__)
39 #include "../sample.xpm"
40 #if wxUSE_DRAG_AND_DROP
41 #include "dnd_copy.xpm"
42 #include "dnd_move.xpm"
43 #include "dnd_none.xpm"
47 #if wxUSE_DRAG_AND_DROP
49 // ----------------------------------------------------------------------------
50 // Derive two simple classes which just put in the listbox the strings (text or
51 // file names) we drop on them
52 // ----------------------------------------------------------------------------
54 class DnDText
: public wxTextDropTarget
57 DnDText(wxListBox
*pOwner
) { m_pOwner
= pOwner
; }
59 virtual bool OnDropText(wxCoord x
, wxCoord y
, const wxString
& text
);
65 class DnDFile
: public wxFileDropTarget
68 DnDFile(wxListBox
*pOwner
) { m_pOwner
= pOwner
; }
70 virtual bool OnDropFiles(wxCoord x
, wxCoord y
,
71 const wxArrayString
& filenames
);
77 // ----------------------------------------------------------------------------
78 // Define a custom dtop target accepting URLs
79 // ----------------------------------------------------------------------------
81 class URLDropTarget
: public wxDropTarget
84 URLDropTarget() { SetDataObject(new wxURLDataObject
); }
86 void OnDropURL(wxCoord
WXUNUSED(x
), wxCoord
WXUNUSED(y
), const wxString
& text
)
88 // of course, a real program would do something more useful here...
89 wxMessageBox(text
, _T("wxDnD sample: got URL"),
90 wxICON_INFORMATION
| wxOK
);
93 // URLs can't be moved, only copied
94 virtual wxDragResult
OnDragOver(wxCoord
WXUNUSED(x
), wxCoord
WXUNUSED(y
),
95 wxDragResult
WXUNUSED(def
))
97 return wxDragLink
; // At least IE 5.x needs wxDragLink, the
98 // other browsers on MSW seem okay with it too.
101 // translate this to calls to OnDropURL() just for convenience
102 virtual wxDragResult
OnData(wxCoord x
, wxCoord y
, wxDragResult def
)
107 OnDropURL(x
, y
, ((wxURLDataObject
*)m_dataObject
)->GetURL());
113 #endif // wxUSE_DRAG_AND_DROP
115 // ----------------------------------------------------------------------------
116 // Define a new application type
117 // ----------------------------------------------------------------------------
119 class DnDApp
: public wxApp
122 virtual bool OnInit();
125 IMPLEMENT_APP(DnDApp
);
127 #if wxUSE_DRAG_AND_DROP || wxUSE_CLIPBOARD
129 // ----------------------------------------------------------------------------
130 // Define canvas class to show a bitmap
131 // ----------------------------------------------------------------------------
133 class DnDCanvasBitmap
: public wxScrolledWindow
136 DnDCanvasBitmap(wxWindow
*parent
) : wxScrolledWindow(parent
) { }
138 void SetBitmap(const wxBitmap
& bitmap
)
142 SetScrollbars(10, 10,
143 m_bitmap
.GetWidth() / 10, m_bitmap
.GetHeight() / 10);
148 void OnPaint(wxPaintEvent
& WXUNUSED(event
))
156 dc
.DrawBitmap(m_bitmap
, 0, 0);
163 DECLARE_EVENT_TABLE()
168 // and the same thing fo metafiles
169 class DnDCanvasMetafile
: public wxScrolledWindow
172 DnDCanvasMetafile(wxWindow
*parent
) : wxScrolledWindow(parent
) { }
174 void SetMetafile(const wxMetafile
& metafile
)
176 m_metafile
= metafile
;
178 SetScrollbars(10, 10,
179 m_metafile
.GetWidth() / 10, m_metafile
.GetHeight() / 10);
184 void OnPaint(wxPaintEvent
& event
)
188 if ( m_metafile
.Ok() )
192 m_metafile
.Play(&dc
);
197 wxMetafile m_metafile
;
199 DECLARE_EVENT_TABLE()
202 #endif // wxUSE_METAFILES
204 // ----------------------------------------------------------------------------
205 // Define a new frame type for the main frame
206 // ----------------------------------------------------------------------------
208 class DnDFrame
: public wxFrame
211 DnDFrame(wxFrame
*frame
, wxChar
*title
, int x
, int y
, int w
, int h
);
214 void OnPaint(wxPaintEvent
& event
);
215 void OnSize(wxSizeEvent
& event
);
216 void OnQuit(wxCommandEvent
& event
);
217 void OnAbout(wxCommandEvent
& event
);
218 void OnDrag(wxCommandEvent
& event
);
219 void OnDragMoveByDefault(wxCommandEvent
& event
);
220 void OnDragMoveAllow(wxCommandEvent
& event
);
221 void OnNewFrame(wxCommandEvent
& event
);
222 void OnHelp (wxCommandEvent
& event
);
224 void OnLogClear(wxCommandEvent
& event
);
227 void OnCopy(wxCommandEvent
& event
);
228 void OnPaste(wxCommandEvent
& event
);
230 void OnCopyBitmap(wxCommandEvent
& event
);
231 void OnPasteBitmap(wxCommandEvent
& event
);
234 void OnPasteMetafile(wxCommandEvent
& event
);
235 #endif // wxUSE_METAFILES
237 void OnCopyFiles(wxCommandEvent
& event
);
239 void OnLeftDown(wxMouseEvent
& event
);
240 void OnRightDown(wxMouseEvent
& event
);
242 void OnUpdateUIMoveByDefault(wxUpdateUIEvent
& event
);
244 void OnUpdateUIPasteText(wxUpdateUIEvent
& event
);
245 void OnUpdateUIPasteBitmap(wxUpdateUIEvent
& event
);
247 DECLARE_EVENT_TABLE()
251 wxListBox
*m_ctrlFile
,
255 wxTextCtrl
*m_ctrlLog
;
261 // move the text by default (or copy)?
262 bool m_moveByDefault
;
264 // allow moving the text at all?
271 // ----------------------------------------------------------------------------
272 // A shape is an example of application-specific data which may be transported
273 // via drag-and-drop or clipboard: in our case, we have different geometric
274 // shapes, each one with its own colour and position
275 // ----------------------------------------------------------------------------
277 #if wxUSE_DRAG_AND_DROP
290 DnDShape(const wxPoint
& pos
,
293 : m_pos(pos
), m_size(size
), m_col(col
)
297 // this is for debugging - lets us see when exactly an object is freed
298 // (this may be later than you think if it's on the clipboard, for example)
299 virtual ~DnDShape() { }
301 // the functions used for drag-and-drop: they dump and restore a shape into
302 // some bitwise-copiable data (might use streams too...)
303 // ------------------------------------------------------------------------
305 // restore from buffer
306 static DnDShape
*New(const void *buf
);
308 virtual size_t GetDataSize() const
310 return sizeof(ShapeDump
);
313 virtual void GetDataHere(void *buf
) const
315 ShapeDump
& dump
= *(ShapeDump
*)buf
;
320 dump
.r
= m_col
.Red();
321 dump
.g
= m_col
.Green();
322 dump
.b
= m_col
.Blue();
327 const wxPoint
& GetPosition() const { return m_pos
; }
328 const wxColour
& GetColour() const { return m_col
; }
329 const wxSize
& GetSize() const { return m_size
; }
331 void Move(const wxPoint
& pos
) { m_pos
= pos
; }
333 // to implement in derived classes
334 virtual Kind
GetKind() const = 0;
336 virtual void Draw(wxDC
& dc
)
338 dc
.SetPen(wxPen(m_col
, 1, wxSOLID
));
342 //get a point 1 up and 1 left, otherwise the mid-point of a triangle is on the line
343 wxPoint
GetCentre() const
344 { return wxPoint(m_pos
.x
+ m_size
.x
/ 2 - 1, m_pos
.y
+ m_size
.y
/ 2 - 1); }
348 wxCoord x
, y
, // position
351 unsigned char r
, g
, b
; // colour
359 class DnDTriangularShape
: public DnDShape
362 DnDTriangularShape(const wxPoint
& pos
,
365 : DnDShape(pos
, size
, col
)
367 wxLogMessage(wxT("DnDTriangularShape is being created"));
370 virtual ~DnDTriangularShape()
372 wxLogMessage(wxT("DnDTriangularShape is being deleted"));
375 virtual Kind
GetKind() const { return Triangle
; }
376 virtual void Draw(wxDC
& dc
)
380 // well, it's a bit difficult to describe a triangle by position and
381 // size, but we're not doing geometry here, do we? ;-)
383 wxPoint
p2(m_pos
.x
+ m_size
.x
, m_pos
.y
);
384 wxPoint
p3(m_pos
.x
, m_pos
.y
+ m_size
.y
);
390 //works in multicolor modes; on GTK (at least) will fail in 16-bit color
391 dc
.SetBrush(wxBrush(m_col
, wxSOLID
));
392 dc
.FloodFill(GetCentre(), m_col
, wxFLOOD_BORDER
);
396 class DnDRectangularShape
: public DnDShape
399 DnDRectangularShape(const wxPoint
& pos
,
402 : DnDShape(pos
, size
, col
)
404 wxLogMessage(wxT("DnDRectangularShape is being created"));
407 virtual ~DnDRectangularShape()
409 wxLogMessage(wxT("DnDRectangularShape is being deleted"));
412 virtual Kind
GetKind() const { return Rectangle
; }
413 virtual void Draw(wxDC
& dc
)
418 wxPoint
p2(p1
.x
+ m_size
.x
, p1
.y
);
419 wxPoint
p3(p2
.x
, p2
.y
+ m_size
.y
);
420 wxPoint
p4(p1
.x
, p3
.y
);
427 dc
.SetBrush(wxBrush(m_col
, wxSOLID
));
428 dc
.FloodFill(GetCentre(), m_col
, wxFLOOD_BORDER
);
432 class DnDEllipticShape
: public DnDShape
435 DnDEllipticShape(const wxPoint
& pos
,
438 : DnDShape(pos
, size
, col
)
440 wxLogMessage(wxT("DnDEllipticShape is being created"));
443 virtual ~DnDEllipticShape()
445 wxLogMessage(wxT("DnDEllipticShape is being deleted"));
448 virtual Kind
GetKind() const { return Ellipse
; }
449 virtual void Draw(wxDC
& dc
)
453 dc
.DrawEllipse(m_pos
, m_size
);
455 dc
.SetBrush(wxBrush(m_col
, wxSOLID
));
456 dc
.FloodFill(GetCentre(), m_col
, wxFLOOD_BORDER
);
460 // ----------------------------------------------------------------------------
461 // A wxDataObject specialisation for the application-specific data
462 // ----------------------------------------------------------------------------
464 static const wxChar
*shapeFormatId
= wxT("wxShape");
466 class DnDShapeDataObject
: public wxDataObject
469 // ctor doesn't copy the pointer, so it shouldn't go away while this object
471 DnDShapeDataObject(DnDShape
*shape
= (DnDShape
*)NULL
)
475 // we need to copy the shape because the one we're handled may be
476 // deleted while it's still on the clipboard (for example) - and we
477 // reuse the serialisation methods here to copy it
478 void *buf
= malloc(shape
->DnDShape::GetDataSize());
479 shape
->GetDataHere(buf
);
480 m_shape
= DnDShape::New(buf
);
490 // this string should uniquely identify our format, but is otherwise
492 m_formatShape
.SetId(shapeFormatId
);
494 // we don't draw the shape to a bitmap until it's really needed (i.e.
495 // we're asked to do so)
498 m_hasMetaFile
= false;
499 #endif // wxUSE_METAFILES
502 virtual ~DnDShapeDataObject() { delete m_shape
; }
504 // after a call to this function, the shape is owned by the caller and it
505 // is responsible for deleting it!
507 // NB: a better solution would be to make DnDShapes ref counted and this
508 // is what should probably be done in a real life program, otherwise
509 // the ownership problems become too complicated really fast
512 DnDShape
*shape
= m_shape
;
514 m_shape
= (DnDShape
*)NULL
;
517 m_hasMetaFile
= false;
518 #endif // wxUSE_METAFILES
523 // implement base class pure virtuals
524 // ----------------------------------
526 virtual wxDataFormat
GetPreferredFormat(Direction
WXUNUSED(dir
)) const
528 return m_formatShape
;
531 virtual size_t GetFormatCount(Direction dir
) const
533 // our custom format is supported by both GetData() and SetData()
537 // but the bitmap format(s) are only supported for output
538 nFormats
+= m_dobjBitmap
.GetFormatCount(dir
);
541 nFormats
+= m_dobjMetaFile
.GetFormatCount(dir
);
542 #endif // wxUSE_METAFILES
548 virtual void GetAllFormats(wxDataFormat
*formats
, Direction dir
) const
550 formats
[0] = m_formatShape
;
553 // in Get direction we additionally support bitmaps and metafiles
555 m_dobjBitmap
.GetAllFormats(&formats
[1], dir
);
558 // don't assume that m_dobjBitmap has only 1 format
559 m_dobjMetaFile
.GetAllFormats(&formats
[1 +
560 m_dobjBitmap
.GetFormatCount(dir
)], dir
);
561 #endif // wxUSE_METAFILES
565 virtual size_t GetDataSize(const wxDataFormat
& format
) const
567 if ( format
== m_formatShape
)
569 return m_shape
->GetDataSize();
572 else if ( m_dobjMetaFile
.IsSupported(format
) )
574 if ( !m_hasMetaFile
)
577 return m_dobjMetaFile
.GetDataSize(format
);
579 #endif // wxUSE_METAFILES
582 wxASSERT_MSG( m_dobjBitmap
.IsSupported(format
),
583 wxT("unexpected format") );
588 return m_dobjBitmap
.GetDataSize();
592 virtual bool GetDataHere(const wxDataFormat
& format
, void *pBuf
) const
594 if ( format
== m_formatShape
)
596 m_shape
->GetDataHere(pBuf
);
601 else if ( m_dobjMetaFile
.IsSupported(format
) )
603 if ( !m_hasMetaFile
)
606 return m_dobjMetaFile
.GetDataHere(format
, pBuf
);
608 #endif // wxUSE_METAFILES
611 wxASSERT_MSG( m_dobjBitmap
.IsSupported(format
),
612 wxT("unexpected format") );
617 return m_dobjBitmap
.GetDataHere(pBuf
);
621 virtual bool SetData(const wxDataFormat
& format
,
622 size_t WXUNUSED(len
), const void *buf
)
624 wxCHECK_MSG( format
== m_formatShape
, false,
625 wxT( "unsupported format") );
628 m_shape
= DnDShape::New(buf
);
630 // the shape has changed
634 m_hasMetaFile
= false;
635 #endif // wxUSE_METAFILES
641 // creates a bitmap and assigns it to m_dobjBitmap (also sets m_hasBitmap)
642 void CreateBitmap() const;
644 void CreateMetaFile() const;
645 #endif // wxUSE_METAFILES
647 wxDataFormat m_formatShape
; // our custom format
649 wxBitmapDataObject m_dobjBitmap
; // it handles bitmaps
650 bool m_hasBitmap
; // true if m_dobjBitmap has valid bitmap
653 wxMetaFileDataObject m_dobjMetaFile
;// handles metafiles
654 bool m_hasMetaFile
; // true if we have valid metafile
655 #endif // wxUSE_METAFILES
657 DnDShape
*m_shape
; // our data
660 // ----------------------------------------------------------------------------
661 // A dialog to edit shape properties
662 // ----------------------------------------------------------------------------
664 class DnDShapeDialog
: public wxDialog
667 DnDShapeDialog(wxFrame
*parent
, DnDShape
*shape
);
669 DnDShape
*GetShape() const;
671 virtual bool TransferDataToWindow();
672 virtual bool TransferDataFromWindow();
674 void OnColour(wxCommandEvent
& event
);
681 DnDShape::Kind m_shapeKind
;
693 DECLARE_EVENT_TABLE()
696 // ----------------------------------------------------------------------------
697 // A frame for the shapes which can be drag-and-dropped between frames
698 // ----------------------------------------------------------------------------
700 class DnDShapeFrame
: public wxFrame
703 DnDShapeFrame(wxFrame
*parent
);
706 void SetShape(DnDShape
*shape
);
707 virtual bool SetShape(const wxRegion
®ion
)
709 return wxFrame::SetShape( region
);
713 void OnNewShape(wxCommandEvent
& event
);
714 void OnEditShape(wxCommandEvent
& event
);
715 void OnClearShape(wxCommandEvent
& event
);
717 void OnCopyShape(wxCommandEvent
& event
);
718 void OnPasteShape(wxCommandEvent
& event
);
720 void OnUpdateUICopy(wxUpdateUIEvent
& event
);
721 void OnUpdateUIPaste(wxUpdateUIEvent
& event
);
723 void OnDrag(wxMouseEvent
& event
);
724 void OnPaint(wxPaintEvent
& event
);
725 void OnDrop(wxCoord x
, wxCoord y
, DnDShape
*shape
);
730 static DnDShapeFrame
*ms_lastDropTarget
;
732 DECLARE_EVENT_TABLE()
735 // ----------------------------------------------------------------------------
736 // wxDropTarget derivation for DnDShapes
737 // ----------------------------------------------------------------------------
739 class DnDShapeDropTarget
: public wxDropTarget
742 DnDShapeDropTarget(DnDShapeFrame
*frame
)
743 : wxDropTarget(new DnDShapeDataObject
)
748 // override base class (pure) virtuals
749 virtual wxDragResult
OnEnter(wxCoord x
, wxCoord y
, wxDragResult def
)
752 m_frame
->SetStatusText(_T("Mouse entered the frame"));
753 #endif // wxUSE_STATUSBAR
754 return OnDragOver(x
, y
, def
);
756 virtual void OnLeave()
759 m_frame
->SetStatusText(_T("Mouse left the frame"));
760 #endif // wxUSE_STATUSBAR
762 virtual wxDragResult
OnData(wxCoord x
, wxCoord y
, wxDragResult def
)
766 wxLogError(wxT("Failed to get drag and drop data"));
771 m_frame
->OnDrop(x
, y
,
772 ((DnDShapeDataObject
*)GetDataObject())->GetShape());
778 DnDShapeFrame
*m_frame
;
781 #endif // wxUSE_DRAG_AND_DROP
783 // ----------------------------------------------------------------------------
784 // functions prototypes
785 // ----------------------------------------------------------------------------
787 static void ShowBitmap(const wxBitmap
& bitmap
);
790 static void ShowMetaFile(const wxMetaFile
& metafile
);
791 #endif // wxUSE_METAFILES
793 // ----------------------------------------------------------------------------
794 // IDs for the menu commands
795 // ----------------------------------------------------------------------------
813 Menu_Shape_New
= 500,
816 Menu_ShapeClipboard_Copy
,
817 Menu_ShapeClipboard_Paste
,
821 BEGIN_EVENT_TABLE(DnDFrame
, wxFrame
)
822 EVT_MENU(Menu_Quit
, DnDFrame::OnQuit
)
823 EVT_MENU(Menu_About
, DnDFrame::OnAbout
)
824 EVT_MENU(Menu_Drag
, DnDFrame::OnDrag
)
825 EVT_MENU(Menu_DragMoveDef
, DnDFrame::OnDragMoveByDefault
)
826 EVT_MENU(Menu_DragMoveAllow
,DnDFrame::OnDragMoveAllow
)
827 EVT_MENU(Menu_NewFrame
, DnDFrame::OnNewFrame
)
828 EVT_MENU(Menu_Help
, DnDFrame::OnHelp
)
830 EVT_MENU(Menu_Clear
, DnDFrame::OnLogClear
)
832 EVT_MENU(Menu_Copy
, DnDFrame::OnCopy
)
833 EVT_MENU(Menu_Paste
, DnDFrame::OnPaste
)
834 EVT_MENU(Menu_CopyBitmap
, DnDFrame::OnCopyBitmap
)
835 EVT_MENU(Menu_PasteBitmap
,DnDFrame::OnPasteBitmap
)
837 EVT_MENU(Menu_PasteMFile
, DnDFrame::OnPasteMetafile
)
838 #endif // wxUSE_METAFILES
839 EVT_MENU(Menu_CopyFiles
, DnDFrame::OnCopyFiles
)
841 EVT_UPDATE_UI(Menu_DragMoveDef
, DnDFrame::OnUpdateUIMoveByDefault
)
843 EVT_UPDATE_UI(Menu_Paste
, DnDFrame::OnUpdateUIPasteText
)
844 EVT_UPDATE_UI(Menu_PasteBitmap
, DnDFrame::OnUpdateUIPasteBitmap
)
846 EVT_LEFT_DOWN( DnDFrame::OnLeftDown
)
847 EVT_RIGHT_DOWN( DnDFrame::OnRightDown
)
848 EVT_PAINT( DnDFrame::OnPaint
)
849 EVT_SIZE( DnDFrame::OnSize
)
852 #if wxUSE_DRAG_AND_DROP
854 BEGIN_EVENT_TABLE(DnDShapeFrame
, wxFrame
)
855 EVT_MENU(Menu_Shape_New
, DnDShapeFrame::OnNewShape
)
856 EVT_MENU(Menu_Shape_Edit
, DnDShapeFrame::OnEditShape
)
857 EVT_MENU(Menu_Shape_Clear
, DnDShapeFrame::OnClearShape
)
859 EVT_MENU(Menu_ShapeClipboard_Copy
, DnDShapeFrame::OnCopyShape
)
860 EVT_MENU(Menu_ShapeClipboard_Paste
, DnDShapeFrame::OnPasteShape
)
862 EVT_UPDATE_UI(Menu_ShapeClipboard_Copy
, DnDShapeFrame::OnUpdateUICopy
)
863 EVT_UPDATE_UI(Menu_ShapeClipboard_Paste
, DnDShapeFrame::OnUpdateUIPaste
)
865 EVT_LEFT_DOWN(DnDShapeFrame::OnDrag
)
867 EVT_PAINT(DnDShapeFrame::OnPaint
)
870 BEGIN_EVENT_TABLE(DnDShapeDialog
, wxDialog
)
871 EVT_BUTTON(Button_Colour
, DnDShapeDialog::OnColour
)
874 #endif // wxUSE_DRAG_AND_DROP
876 BEGIN_EVENT_TABLE(DnDCanvasBitmap
, wxScrolledWindow
)
877 EVT_PAINT(DnDCanvasBitmap::OnPaint
)
881 BEGIN_EVENT_TABLE(DnDCanvasMetafile
, wxScrolledWindow
)
882 EVT_PAINT(DnDCanvasMetafile::OnPaint
)
884 #endif // wxUSE_METAFILES
886 #endif // wxUSE_DRAG_AND_DROP
888 // ============================================================================
890 // ============================================================================
892 // `Main program' equivalent, creating windows and returning main app frame
893 bool DnDApp::OnInit()
895 #if wxUSE_DRAG_AND_DROP || wxUSE_CLIPBOARD
896 // switch on trace messages
898 #if defined(__WXGTK__)
899 wxLog::AddTraceMask(_T("clipboard"));
900 #elif defined(__WXMSW__)
901 wxLog::AddTraceMask(wxTRACE_OleCalls
);
906 wxImage::AddHandler( new wxPNGHandler
);
909 // under X we usually want to use the primary selection by default (which
910 // is shared with other apps)
911 wxTheClipboard
->UsePrimarySelection();
913 // create the main frame window
914 DnDFrame
*frame
= new DnDFrame((wxFrame
*) NULL
,
915 _T("Drag-and-Drop/Clipboard wxWidgets Sample"),
925 wxMessageBox( _T("This sample has to be compiled with wxUSE_DRAG_AND_DROP"), _T("Building error"), wxOK
);
927 #endif // wxUSE_DRAG_AND_DROP
930 #if wxUSE_DRAG_AND_DROP || wxUSE_CLIPBOARD
932 DnDFrame::DnDFrame(wxFrame
*frame
, wxChar
*title
, int x
, int y
, int w
, int h
)
933 : wxFrame(frame
, wxID_ANY
, title
, wxPoint(x
, y
), wxSize(w
, h
)),
934 m_strText(_T("wxWidgets drag & drop works :-)"))
937 // frame icon and status bar
938 SetIcon(wxICON(sample
));
942 #endif // wxUSE_STATUSBAR
945 wxMenu
*file_menu
= new wxMenu
;
946 file_menu
->Append(Menu_Drag
, _T("&Test drag..."));
947 file_menu
->AppendCheckItem(Menu_DragMoveDef
, _T("&Move by default"));
948 file_menu
->AppendCheckItem(Menu_DragMoveAllow
, _T("&Allow moving"));
949 file_menu
->AppendSeparator();
950 file_menu
->Append(Menu_NewFrame
, _T("&New frame\tCtrl-N"));
951 file_menu
->AppendSeparator();
952 file_menu
->Append(Menu_Quit
, _T("E&xit\tCtrl-Q"));
955 wxMenu
*log_menu
= new wxMenu
;
956 log_menu
->Append(Menu_Clear
, _T("Clear\tCtrl-L"));
959 wxMenu
*help_menu
= new wxMenu
;
960 help_menu
->Append(Menu_Help
, _T("&Help..."));
961 help_menu
->AppendSeparator();
962 help_menu
->Append(Menu_About
, _T("&About"));
964 wxMenu
*clip_menu
= new wxMenu
;
965 clip_menu
->Append(Menu_Copy
, _T("&Copy text\tCtrl-C"));
966 clip_menu
->Append(Menu_Paste
, _T("&Paste text\tCtrl-V"));
967 clip_menu
->AppendSeparator();
968 clip_menu
->Append(Menu_CopyBitmap
, _T("Copy &bitmap\tCtrl-Shift-C"));
969 clip_menu
->Append(Menu_PasteBitmap
, _T("Paste b&itmap\tCtrl-Shift-V"));
971 clip_menu
->AppendSeparator();
972 clip_menu
->Append(Menu_PasteMFile
, _T("Paste &metafile\tCtrl-M"));
973 #endif // wxUSE_METAFILES
974 clip_menu
->AppendSeparator();
975 clip_menu
->Append(Menu_CopyFiles
, _T("Copy &files\tCtrl-F"));
977 wxMenuBar
*menu_bar
= new wxMenuBar
;
978 menu_bar
->Append(file_menu
, _T("&File"));
980 menu_bar
->Append(log_menu
, _T("&Log"));
982 menu_bar
->Append(clip_menu
, _T("&Clipboard"));
983 menu_bar
->Append(help_menu
, _T("&Help"));
985 SetMenuBar(menu_bar
);
987 // make a panel with 3 subwindows
988 wxString
strFile(_T("Drop files here!")), strText(_T("Drop text on me"));
990 m_ctrlFile
= new wxListBox(this, wxID_ANY
, wxDefaultPosition
, wxDefaultSize
, 1, &strFile
,
991 wxLB_HSCROLL
| wxLB_ALWAYS_SB
);
992 m_ctrlText
= new wxListBox(this, wxID_ANY
, wxDefaultPosition
, wxDefaultSize
, 1, &strText
,
993 wxLB_HSCROLL
| wxLB_ALWAYS_SB
);
996 m_ctrlLog
= new wxTextCtrl(this, wxID_ANY
, _T(""), wxDefaultPosition
, wxDefaultSize
,
997 wxTE_MULTILINE
| wxTE_READONLY
|
1000 // redirect log messages to the text window
1001 m_pLog
= new wxLogTextCtrl(m_ctrlLog
);
1002 m_pLogPrev
= wxLog::SetActiveTarget(m_pLog
);
1005 #if wxUSE_DRAG_AND_DROP
1006 // associate drop targets with the controls
1007 m_ctrlFile
->SetDropTarget(new DnDFile(m_ctrlFile
));
1008 m_ctrlText
->SetDropTarget(new DnDText(m_ctrlText
));
1010 m_ctrlLog
->SetDropTarget(new URLDropTarget
);
1012 #endif // wxUSE_DRAG_AND_DROP
1014 wxBoxSizer
*sizer_top
= new wxBoxSizer( wxHORIZONTAL
);
1015 sizer_top
->Add(m_ctrlFile
, 1, wxEXPAND
);
1016 sizer_top
->Add(m_ctrlText
, 1, wxEXPAND
);
1018 wxBoxSizer
*sizer
= new wxBoxSizer( wxVERTICAL
);
1019 sizer
->Add(sizer_top
, 1, wxEXPAND
);
1021 sizer
->Add(m_ctrlLog
, 2, wxEXPAND
);
1022 sizer
->SetItemMinSize(m_ctrlLog
, 450, 0);
1024 sizer
->AddSpacer(50);
1027 sizer
->SetSizeHints( this );
1029 // copy data by default but allow moving it as well
1030 m_moveByDefault
= false;
1032 menu_bar
->Check(Menu_DragMoveAllow
, true);
1035 void DnDFrame::OnQuit(wxCommandEvent
& WXUNUSED(event
))
1040 void DnDFrame::OnSize(wxSizeEvent
& event
)
1047 void DnDFrame::OnPaint(wxPaintEvent
& WXUNUSED(event
))
1051 GetClientSize( &w
, &h
);
1054 // dc.Clear(); -- this kills wxGTK
1055 dc
.SetFont( wxFont( 24, wxDECORATIVE
, wxNORMAL
, wxNORMAL
, false, _T("charter") ) );
1056 dc
.DrawText( _T("Drag text from here!"), 100, h
-50 );
1059 void DnDFrame::OnUpdateUIMoveByDefault(wxUpdateUIEvent
& event
)
1061 // only can move by default if moving is allowed at all
1062 event
.Enable(m_moveAllow
);
1065 void DnDFrame::OnUpdateUIPasteText(wxUpdateUIEvent
& event
)
1068 // too many trace messages if we don't do it - this function is called
1073 event
.Enable( wxTheClipboard
->IsSupported(wxDF_TEXT
) );
1076 void DnDFrame::OnUpdateUIPasteBitmap(wxUpdateUIEvent
& event
)
1079 // too many trace messages if we don't do it - this function is called
1084 event
.Enable( wxTheClipboard
->IsSupported(wxDF_BITMAP
) );
1087 void DnDFrame::OnNewFrame(wxCommandEvent
& WXUNUSED(event
))
1089 #if wxUSE_DRAG_AND_DROP
1090 (new DnDShapeFrame(this))->Show(true);
1092 wxLogStatus(this, wxT("Double click the new frame to select a shape for it"));
1093 #endif // wxUSE_DRAG_AND_DROP
1096 void DnDFrame::OnDrag(wxCommandEvent
& WXUNUSED(event
))
1098 #if wxUSE_DRAG_AND_DROP
1099 wxString strText
= wxGetTextFromUser
1101 _T("After you enter text in this dialog, press any mouse\n")
1102 _T("button in the bottom (empty) part of the frame and \n")
1103 _T("drag it anywhere - you will be in fact dragging the\n")
1104 _T("text object containing this text"),
1105 _T("Please enter some text"), m_strText
, this
1108 m_strText
= strText
;
1109 #endif // wxUSE_DRAG_AND_DROP
1112 void DnDFrame::OnDragMoveByDefault(wxCommandEvent
& event
)
1114 m_moveByDefault
= event
.IsChecked();
1117 void DnDFrame::OnDragMoveAllow(wxCommandEvent
& event
)
1119 m_moveAllow
= event
.IsChecked();
1122 void DnDFrame::OnAbout(wxCommandEvent
& WXUNUSED(event
))
1124 wxMessageBox(_T("Drag-&-Drop Demo\n")
1125 _T("Please see \"Help|Help...\" for details\n")
1126 _T("Copyright (c) 1998 Vadim Zeitlin"),
1128 wxICON_INFORMATION
| wxOK
,
1132 void DnDFrame::OnHelp(wxCommandEvent
& /* event */)
1134 wxMessageDialog
dialog(this,
1135 _T("This small program demonstrates drag & drop support in wxWidgets. The program window\n")
1136 _T("consists of 3 parts: the bottom pane is for debug messages, so that you can see what's\n")
1137 _T("going on inside. The top part is split into 2 listboxes, the left one accepts files\n")
1138 _T("and the right one accepts text.\n")
1140 _T("To test wxDropTarget: open wordpad (write.exe), select some text in it and drag it to\n")
1141 _T("the right listbox (you'll notice the usual visual feedback, i.e. the cursor will change).\n")
1142 _T("Also, try dragging some files (you can select several at once) from Windows Explorer (or \n")
1143 _T("File Manager) to the left pane. Hold down Ctrl/Shift keys when you drop text (doesn't \n")
1144 _T("work with files) and see what changes.\n")
1146 _T("To test wxDropSource: just press any mouse button on the empty zone of the window and drag\n")
1147 _T("it to wordpad or any other droptarget accepting text (and of course you can just drag it\n")
1148 _T("to the right pane). Due to a lot of trace messages, the cursor might take some time to \n")
1149 _T("change, don't release the mouse button until it does. You can change the string being\n")
1150 _T("dragged in in \"File|Test drag...\" dialog.\n")
1153 _T("Please send all questions/bug reports/suggestions &c to \n")
1154 _T("Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>"),
1161 void DnDFrame::OnLogClear(wxCommandEvent
& /* event */ )
1164 m_ctrlText
->Clear();
1165 m_ctrlFile
->Clear();
1169 void DnDFrame::OnLeftDown(wxMouseEvent
&WXUNUSED(event
) )
1171 #if wxUSE_DRAG_AND_DROP
1172 if ( !m_strText
.IsEmpty() )
1174 // start drag operation
1175 wxTextDataObject
textData(m_strText
);
1177 wxFileDataObject textData;
1178 textData.AddFile( "/file1.txt" );
1179 textData.AddFile( "/file2.txt" );
1181 wxDropSource
source(textData
, this,
1182 wxDROP_ICON(dnd_copy
),
1183 wxDROP_ICON(dnd_move
),
1184 wxDROP_ICON(dnd_none
));
1187 if ( m_moveByDefault
)
1188 flags
|= wxDrag_DefaultMove
;
1189 else if ( m_moveAllow
)
1190 flags
|= wxDrag_AllowMove
;
1192 wxDragResult result
= source
.DoDragDrop(flags
);
1198 case wxDragError
: pc
= _T("Error!"); break;
1199 case wxDragNone
: pc
= _T("Nothing"); break;
1200 case wxDragCopy
: pc
= _T("Copied"); break;
1201 case wxDragMove
: pc
= _T("Moved"); break;
1202 case wxDragCancel
: pc
= _T("Cancelled"); break;
1203 default: pc
= _T("Huh?"); break;
1206 SetStatusText(wxString(_T("Drag result: ")) + pc
);
1208 wxUnusedVar(result
);
1209 #endif // wxUSE_STATUSBAR
1211 #endif // wxUSE_DRAG_AND_DROP
1214 void DnDFrame::OnRightDown(wxMouseEvent
&event
)
1216 wxMenu
menu(_T("Dnd sample menu"));
1218 menu
.Append(Menu_Drag
, _T("&Test drag..."));
1219 menu
.AppendSeparator();
1220 menu
.Append(Menu_About
, _T("&About"));
1222 PopupMenu( &menu
, event
.GetX(), event
.GetY() );
1225 DnDFrame::~DnDFrame()
1228 if ( m_pLog
!= NULL
) {
1229 if ( wxLog::SetActiveTarget(m_pLogPrev
) == m_pLog
)
1235 // ---------------------------------------------------------------------------
1237 // ---------------------------------------------------------------------------
1239 void DnDFrame::OnCopyBitmap(wxCommandEvent
& WXUNUSED(event
))
1241 // PNG support is not always compiled in under Windows, so use BMP there
1243 wxFileDialog
dialog(this, _T("Open a PNG file"), _T(""), _T(""), _T("PNG files (*.png)|*.png"), 0);
1245 wxFileDialog
dialog(this, _T("Open a BMP file"), _T(""), _T(""), _T("BMP files (*.bmp)|*.bmp"), 0);
1248 if (dialog
.ShowModal() != wxID_OK
)
1250 wxLogMessage( _T("Aborted file open") );
1254 if (dialog
.GetPath().IsEmpty())
1256 wxLogMessage( _T("Returned empty string.") );
1260 if (!wxFileExists(dialog
.GetPath()))
1262 wxLogMessage( _T("File doesn't exist.") );
1267 image
.LoadFile( dialog
.GetPath(),
1276 wxLogError( _T("Invalid image file...") );
1280 wxLogStatus( _T("Decoding image file...") );
1283 wxBitmap
bitmap( image
);
1285 if ( !wxTheClipboard
->Open() )
1287 wxLogError(_T("Can't open clipboard."));
1292 wxLogMessage( _T("Creating wxBitmapDataObject...") );
1295 if ( !wxTheClipboard
->AddData(new wxBitmapDataObject(bitmap
)) )
1297 wxLogError(_T("Can't copy image to the clipboard."));
1301 wxLogMessage(_T("Image has been put on the clipboard.") );
1302 wxLogMessage(_T("You can paste it now and look at it.") );
1305 wxTheClipboard
->Close();
1308 void DnDFrame::OnPasteBitmap(wxCommandEvent
& WXUNUSED(event
))
1310 if ( !wxTheClipboard
->Open() )
1312 wxLogError(_T("Can't open clipboard."));
1317 if ( !wxTheClipboard
->IsSupported(wxDF_BITMAP
) )
1319 wxLogWarning(_T("No bitmap on clipboard"));
1321 wxTheClipboard
->Close();
1325 wxBitmapDataObject data
;
1326 if ( !wxTheClipboard
->GetData(data
) )
1328 wxLogError(_T("Can't paste bitmap from the clipboard"));
1332 const wxBitmap
& bmp
= data
.GetBitmap();
1334 wxLogMessage(_T("Bitmap %dx%d pasted from the clipboard"),
1335 bmp
.GetWidth(), bmp
.GetHeight());
1339 wxTheClipboard
->Close();
1344 void DnDFrame::OnPasteMetafile(wxCommandEvent
& WXUNUSED(event
))
1346 if ( !wxTheClipboard
->Open() )
1348 wxLogError(_T("Can't open clipboard."));
1353 if ( !wxTheClipboard
->IsSupported(wxDF_METAFILE
) )
1355 wxLogWarning(_T("No metafile on clipboard"));
1359 wxMetaFileDataObject data
;
1360 if ( !wxTheClipboard
->GetData(data
) )
1362 wxLogError(_T("Can't paste metafile from the clipboard"));
1366 const wxMetaFile
& mf
= data
.GetMetafile();
1368 wxLogMessage(_T("Metafile %dx%d pasted from the clipboard"),
1369 mf
.GetWidth(), mf
.GetHeight());
1375 wxTheClipboard
->Close();
1378 #endif // wxUSE_METAFILES
1380 // ----------------------------------------------------------------------------
1382 // ----------------------------------------------------------------------------
1384 void DnDFrame::OnCopyFiles(wxCommandEvent
& WXUNUSED(event
))
1387 wxFileDialog
dialog(this, _T("Select a file to copy"), _T(""), _T(""),
1388 _T("All files (*.*)|*.*"), 0);
1390 wxArrayString filenames
;
1391 while ( dialog
.ShowModal() == wxID_OK
)
1393 filenames
.Add(dialog
.GetPath());
1396 if ( !filenames
.IsEmpty() )
1398 wxFileDataObject
*dobj
= new wxFileDataObject
;
1399 size_t count
= filenames
.GetCount();
1400 for ( size_t n
= 0; n
< count
; n
++ )
1402 dobj
->AddFile(filenames
[n
]);
1405 wxClipboardLocker locker
;
1408 wxLogError(wxT("Can't open clipboard"));
1412 if ( !wxTheClipboard
->AddData(dobj
) )
1414 wxLogError(wxT("Can't copy file(s) to the clipboard"));
1418 wxLogStatus(this, wxT("%d file%s copied to the clipboard"),
1419 count
, count
== 1 ? wxT("") : wxT("s"));
1425 wxLogStatus(this, wxT("Aborted"));
1428 wxLogError(wxT("Sorry, not implemented"));
1432 // ---------------------------------------------------------------------------
1434 // ---------------------------------------------------------------------------
1436 void DnDFrame::OnCopy(wxCommandEvent
& WXUNUSED(event
))
1438 if ( !wxTheClipboard
->Open() )
1440 wxLogError(_T("Can't open clipboard."));
1445 if ( !wxTheClipboard
->AddData(new wxTextDataObject(m_strText
)) )
1447 wxLogError(_T("Can't copy data to the clipboard"));
1451 wxLogMessage(_T("Text '%s' put on the clipboard"), m_strText
.c_str());
1454 wxTheClipboard
->Close();
1457 void DnDFrame::OnPaste(wxCommandEvent
& WXUNUSED(event
))
1459 if ( !wxTheClipboard
->Open() )
1461 wxLogError(_T("Can't open clipboard."));
1466 if ( !wxTheClipboard
->IsSupported(wxDF_TEXT
) )
1468 wxLogWarning(_T("No text data on clipboard"));
1470 wxTheClipboard
->Close();
1474 wxTextDataObject text
;
1475 if ( !wxTheClipboard
->GetData(text
) )
1477 wxLogError(_T("Can't paste data from the clipboard"));
1481 wxLogMessage(_T("Text '%s' pasted from the clipboard"),
1482 text
.GetText().c_str());
1485 wxTheClipboard
->Close();
1488 #if wxUSE_DRAG_AND_DROP
1490 // ----------------------------------------------------------------------------
1491 // Notifications called by the base class
1492 // ----------------------------------------------------------------------------
1494 bool DnDText::OnDropText(wxCoord
, wxCoord
, const wxString
& text
)
1496 m_pOwner
->Append(text
);
1501 bool DnDFile::OnDropFiles(wxCoord
, wxCoord
, const wxArrayString
& filenames
)
1503 size_t nFiles
= filenames
.GetCount();
1505 str
.Printf( _T("%d files dropped"), (int)nFiles
);
1506 m_pOwner
->Append(str
);
1507 for ( size_t n
= 0; n
< nFiles
; n
++ ) {
1508 m_pOwner
->Append(filenames
[n
]);
1514 // ----------------------------------------------------------------------------
1516 // ----------------------------------------------------------------------------
1518 DnDShapeDialog::DnDShapeDialog(wxFrame
*parent
, DnDShape
*shape
)
1519 :wxDialog( parent
, 6001, wxT("Choose Shape"), wxPoint( 10, 10 ),
1521 wxRAISED_BORDER
|wxCAPTION
|wxTHICK_FRAME
|wxSYSTEM_MENU
)
1524 wxBoxSizer
* topSizer
= new wxBoxSizer( wxVERTICAL
);
1527 wxBoxSizer
* shapesSizer
= new wxBoxSizer( wxHORIZONTAL
);
1528 const wxString choices
[] = { wxT("None"), wxT("Triangle"),
1529 wxT("Rectangle"), wxT("Ellipse") };
1531 m_radio
= new wxRadioBox( this, wxID_ANY
, wxT("&Shape"),
1532 wxDefaultPosition
, wxDefaultSize
, 4, choices
, 4,
1533 wxRA_SPECIFY_COLS
);
1534 shapesSizer
->Add( m_radio
, 0, wxGROW
|wxALL
, 5 );
1535 topSizer
->Add( shapesSizer
, 0, wxALL
, 2 );
1538 wxStaticBox
* box
= new wxStaticBox( this, wxID_ANY
, wxT("&Attributes") );
1539 wxStaticBoxSizer
* attrSizer
= new wxStaticBoxSizer( box
, wxHORIZONTAL
);
1540 wxFlexGridSizer
* xywhSizer
= new wxFlexGridSizer( 4, 2 );
1544 st
= new wxStaticText( this, wxID_ANY
, wxT("Position &X:") );
1545 m_textX
= new wxTextCtrl( this, wxID_ANY
, wxEmptyString
, wxDefaultPosition
,
1547 xywhSizer
->Add( st
, 1, wxGROW
|wxALL
, 2 );
1548 xywhSizer
->Add( m_textX
, 1, wxGROW
|wxALL
, 2 );
1550 st
= new wxStaticText( this, wxID_ANY
, wxT("Size &width:") );
1551 m_textW
= new wxTextCtrl( this, wxID_ANY
, wxEmptyString
, wxDefaultPosition
,
1553 xywhSizer
->Add( st
, 1, wxGROW
|wxALL
, 2 );
1554 xywhSizer
->Add( m_textW
, 1, wxGROW
|wxALL
, 2 );
1556 st
= new wxStaticText( this, wxID_ANY
, wxT("&Y:") );
1557 m_textY
= new wxTextCtrl( this, wxID_ANY
, wxEmptyString
, wxDefaultPosition
,
1559 xywhSizer
->Add( st
, 1, wxALL
|wxALIGN_RIGHT
, 2 );
1560 xywhSizer
->Add( m_textY
, 1, wxGROW
|wxALL
, 2 );
1562 st
= new wxStaticText( this, wxID_ANY
, wxT("&height:") );
1563 m_textH
= new wxTextCtrl( this, wxID_ANY
, wxEmptyString
, wxDefaultPosition
,
1565 xywhSizer
->Add( st
, 1, wxALL
|wxALIGN_RIGHT
, 2 );
1566 xywhSizer
->Add( m_textH
, 1, wxGROW
|wxALL
, 2 );
1568 wxButton
* col
= new wxButton( this, Button_Colour
, wxT("&Colour...") );
1569 attrSizer
->Add( xywhSizer
, 1, wxGROW
);
1570 attrSizer
->Add( col
, 0, wxALL
|wxALIGN_CENTRE_VERTICAL
, 2 );
1571 topSizer
->Add( attrSizer
, 0, wxGROW
|wxALL
, 5 );
1574 wxBoxSizer
* buttonSizer
= new wxBoxSizer( wxHORIZONTAL
);
1576 bt
= new wxButton( this, wxID_OK
, wxT("Ok") );
1577 buttonSizer
->Add( bt
, 0, wxALL
, 2 );
1578 bt
= new wxButton( this, wxID_CANCEL
, wxT("Cancel") );
1579 buttonSizer
->Add( bt
, 0, wxALL
, 2 );
1580 topSizer
->Add( buttonSizer
, 0, wxALL
|wxALIGN_RIGHT
, 2 );
1582 SetSizer( topSizer
);
1583 topSizer
->Fit( this );
1586 DnDShape
*DnDShapeDialog::GetShape() const
1588 switch ( m_shapeKind
)
1591 case DnDShape::None
: return NULL
;
1592 case DnDShape::Triangle
: return new DnDTriangularShape(m_pos
, m_size
, m_col
);
1593 case DnDShape::Rectangle
: return new DnDRectangularShape(m_pos
, m_size
, m_col
);
1594 case DnDShape::Ellipse
: return new DnDEllipticShape(m_pos
, m_size
, m_col
);
1598 bool DnDShapeDialog::TransferDataToWindow()
1603 m_radio
->SetSelection(m_shape
->GetKind());
1604 m_pos
= m_shape
->GetPosition();
1605 m_size
= m_shape
->GetSize();
1606 m_col
= m_shape
->GetColour();
1610 m_radio
->SetSelection(DnDShape::None
);
1611 m_pos
= wxPoint(1, 1);
1612 m_size
= wxSize(100, 100);
1615 m_textX
->SetValue(wxString() << m_pos
.x
);
1616 m_textY
->SetValue(wxString() << m_pos
.y
);
1617 m_textW
->SetValue(wxString() << m_size
.x
);
1618 m_textH
->SetValue(wxString() << m_size
.y
);
1623 bool DnDShapeDialog::TransferDataFromWindow()
1625 m_shapeKind
= (DnDShape::Kind
)m_radio
->GetSelection();
1627 m_pos
.x
= wxAtoi(m_textX
->GetValue());
1628 m_pos
.y
= wxAtoi(m_textY
->GetValue());
1629 m_size
.x
= wxAtoi(m_textW
->GetValue());
1630 m_size
.y
= wxAtoi(m_textH
->GetValue());
1632 if ( !m_pos
.x
|| !m_pos
.y
|| !m_size
.x
|| !m_size
.y
)
1634 wxMessageBox(_T("All sizes and positions should be non null!"),
1635 _T("Invalid shape"), wxICON_HAND
| wxOK
, this);
1643 void DnDShapeDialog::OnColour(wxCommandEvent
& WXUNUSED(event
))
1646 data
.SetChooseFull(true);
1647 for (int i
= 0; i
< 16; i
++)
1649 wxColour
colour((unsigned char)(i
*16), (unsigned char)(i
*16), (unsigned char)(i
*16));
1650 data
.SetCustomColour(i
, colour
);
1653 wxColourDialog
dialog(this, &data
);
1654 if ( dialog
.ShowModal() == wxID_OK
)
1656 m_col
= dialog
.GetColourData().GetColour();
1660 // ----------------------------------------------------------------------------
1662 // ----------------------------------------------------------------------------
1664 DnDShapeFrame
*DnDShapeFrame::ms_lastDropTarget
= NULL
;
1666 DnDShapeFrame::DnDShapeFrame(wxFrame
*parent
)
1667 : wxFrame(parent
, wxID_ANY
, _T("Shape Frame"))
1671 #endif // wxUSE_STATUSBAR
1673 wxMenu
*menuShape
= new wxMenu
;
1674 menuShape
->Append(Menu_Shape_New
, _T("&New default shape\tCtrl-S"));
1675 menuShape
->Append(Menu_Shape_Edit
, _T("&Edit shape\tCtrl-E"));
1676 menuShape
->AppendSeparator();
1677 menuShape
->Append(Menu_Shape_Clear
, _T("&Clear shape\tCtrl-L"));
1679 wxMenu
*menuClipboard
= new wxMenu
;
1680 menuClipboard
->Append(Menu_ShapeClipboard_Copy
, _T("&Copy\tCtrl-C"));
1681 menuClipboard
->Append(Menu_ShapeClipboard_Paste
, _T("&Paste\tCtrl-V"));
1683 wxMenuBar
*menubar
= new wxMenuBar
;
1684 menubar
->Append(menuShape
, _T("&Shape"));
1685 menubar
->Append(menuClipboard
, _T("&Clipboard"));
1687 SetMenuBar(menubar
);
1690 SetStatusText(_T("Press Ctrl-S to create a new shape"));
1691 #endif // wxUSE_STATUSBAR
1693 SetDropTarget(new DnDShapeDropTarget(this));
1697 SetBackgroundColour(*wxWHITE
);
1700 DnDShapeFrame::~DnDShapeFrame()
1706 void DnDShapeFrame::SetShape(DnDShape
*shape
)
1715 void DnDShapeFrame::OnDrag(wxMouseEvent
& event
)
1724 // start drag operation
1725 DnDShapeDataObject
shapeData(m_shape
);
1726 wxDropSource
source(shapeData
, this);
1728 const wxChar
*pc
= NULL
;
1729 switch ( source
.DoDragDrop(true) )
1733 wxLogError(wxT("An error occurred during drag and drop operation"));
1738 SetStatusText(_T("Nothing happened"));
1739 #endif // wxUSE_STATUSBAR
1748 if ( ms_lastDropTarget
!= this )
1750 // don't delete the shape if we dropped it on ourselves!
1757 SetStatusText(_T("Drag and drop operation cancelled"));
1758 #endif // wxUSE_STATUSBAR
1765 SetStatusText(wxString(_T("Shape successfully ")) + pc
);
1766 #endif // wxUSE_STATUSBAR
1768 //else: status text already set
1771 void DnDShapeFrame::OnDrop(wxCoord x
, wxCoord y
, DnDShape
*shape
)
1773 ms_lastDropTarget
= this;
1779 s
.Printf(wxT("Shape dropped at (%d, %d)"), pt
.x
, pt
.y
);
1781 #endif // wxUSE_STATUSBAR
1787 void DnDShapeFrame::OnEditShape(wxCommandEvent
& WXUNUSED(event
))
1789 DnDShapeDialog
dlg(this, m_shape
);
1790 if ( dlg
.ShowModal() == wxID_OK
)
1792 SetShape(dlg
.GetShape());
1797 SetStatusText(_T("You can now drag the shape to another frame"));
1799 #endif // wxUSE_STATUSBAR
1803 void DnDShapeFrame::OnNewShape(wxCommandEvent
& WXUNUSED(event
))
1805 SetShape(new DnDEllipticShape(wxPoint(10, 10), wxSize(80, 60), *wxRED
));
1808 SetStatusText(_T("You can now drag the shape to another frame"));
1809 #endif // wxUSE_STATUSBAR
1812 void DnDShapeFrame::OnClearShape(wxCommandEvent
& WXUNUSED(event
))
1817 void DnDShapeFrame::OnCopyShape(wxCommandEvent
& WXUNUSED(event
))
1821 wxClipboardLocker clipLocker
;
1824 wxLogError(wxT("Can't open the clipboard"));
1829 wxTheClipboard
->AddData(new DnDShapeDataObject(m_shape
));
1833 void DnDShapeFrame::OnPasteShape(wxCommandEvent
& WXUNUSED(event
))
1835 wxClipboardLocker clipLocker
;
1838 wxLogError(wxT("Can't open the clipboard"));
1843 DnDShapeDataObject
shapeDataObject(NULL
);
1844 if ( wxTheClipboard
->GetData(shapeDataObject
) )
1846 SetShape(shapeDataObject
.GetShape());
1850 wxLogStatus(wxT("No shape on the clipboard"));
1854 void DnDShapeFrame::OnUpdateUICopy(wxUpdateUIEvent
& event
)
1856 event
.Enable( m_shape
!= NULL
);
1859 void DnDShapeFrame::OnUpdateUIPaste(wxUpdateUIEvent
& event
)
1861 event
.Enable( wxTheClipboard
->IsSupported(wxDataFormat(shapeFormatId
)) );
1864 void DnDShapeFrame::OnPaint(wxPaintEvent
& event
)
1878 // ----------------------------------------------------------------------------
1880 // ----------------------------------------------------------------------------
1882 DnDShape
*DnDShape::New(const void *buf
)
1884 const ShapeDump
& dump
= *(const ShapeDump
*)buf
;
1888 return new DnDTriangularShape(wxPoint(dump
.x
, dump
.y
),
1889 wxSize(dump
.w
, dump
.h
),
1890 wxColour(dump
.r
, dump
.g
, dump
.b
));
1893 return new DnDRectangularShape(wxPoint(dump
.x
, dump
.y
),
1894 wxSize(dump
.w
, dump
.h
),
1895 wxColour(dump
.r
, dump
.g
, dump
.b
));
1898 return new DnDEllipticShape(wxPoint(dump
.x
, dump
.y
),
1899 wxSize(dump
.w
, dump
.h
),
1900 wxColour(dump
.r
, dump
.g
, dump
.b
));
1903 wxFAIL_MSG(wxT("invalid shape!"));
1908 // ----------------------------------------------------------------------------
1909 // DnDShapeDataObject
1910 // ----------------------------------------------------------------------------
1914 void DnDShapeDataObject::CreateMetaFile() const
1916 wxPoint pos
= m_shape
->GetPosition();
1917 wxSize size
= m_shape
->GetSize();
1919 wxMetaFileDC
dcMF(wxEmptyString
, pos
.x
+ size
.x
, pos
.y
+ size
.y
);
1921 m_shape
->Draw(dcMF
);
1923 wxMetafile
*mf
= dcMF
.Close();
1925 DnDShapeDataObject
*self
= (DnDShapeDataObject
*)this; // const_cast
1926 self
->m_dobjMetaFile
.SetMetafile(*mf
);
1927 self
->m_hasMetaFile
= true;
1932 #endif // wxUSE_METAFILES
1934 void DnDShapeDataObject::CreateBitmap() const
1936 wxPoint pos
= m_shape
->GetPosition();
1937 wxSize size
= m_shape
->GetSize();
1938 int x
= pos
.x
+ size
.x
,
1940 wxBitmap
bitmap(x
, y
);
1942 dc
.SelectObject(bitmap
);
1943 dc
.SetBrush(wxBrush(wxT("white"), wxSOLID
));
1946 dc
.SelectObject(wxNullBitmap
);
1948 DnDShapeDataObject
*self
= (DnDShapeDataObject
*)this; // const_cast
1949 self
->m_dobjBitmap
.SetBitmap(bitmap
);
1950 self
->m_hasBitmap
= true;
1953 #endif // wxUSE_DRAG_AND_DROP
1955 // ----------------------------------------------------------------------------
1957 // ----------------------------------------------------------------------------
1959 static void ShowBitmap(const wxBitmap
& bitmap
)
1961 wxFrame
*frame
= new wxFrame(NULL
, wxID_ANY
, _T("Bitmap view"));
1963 frame
->CreateStatusBar();
1964 #endif // wxUSE_STATUSBAR
1965 DnDCanvasBitmap
*canvas
= new DnDCanvasBitmap(frame
);
1966 canvas
->SetBitmap(bitmap
);
1968 int w
= bitmap
.GetWidth(),
1969 h
= bitmap
.GetHeight();
1971 frame
->SetStatusText(wxString::Format(_T("%dx%d"), w
, h
));
1972 #endif // wxUSE_STATUSBAR
1974 frame
->SetClientSize(w
> 100 ? 100 : w
, h
> 100 ? 100 : h
);
1980 static void ShowMetaFile(const wxMetaFile
& metafile
)
1982 wxFrame
*frame
= new wxFrame(NULL
, wxID_ANY
, _T("Metafile view"));
1983 frame
->CreateStatusBar();
1984 DnDCanvasMetafile
*canvas
= new DnDCanvasMetafile(frame
);
1985 canvas
->SetMetafile(metafile
);
1987 wxSize size
= metafile
.GetSize();
1988 frame
->SetStatusText(wxString::Format(_T("%dx%d"), size
.x
, size
.y
));
1990 frame
->SetClientSize(size
.x
> 100 ? 100 : size
.x
,
1991 size
.y
> 100 ? 100 : size
.y
);
1995 #endif // wxUSE_METAFILES
1997 #endif // wxUSE_DRAG_AND_DROP || wxUSE_CLIPBOARD