1 /////////////////////////////////////////////////////////////////////////////
3 // Purpose: Drag and drop sample
4 // Author: Vadim Zeitlin
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 #include "wx/wxprec.h"
23 #include "wx/dataobj.h"
25 #include "wx/clipbrd.h"
26 #include "wx/colordlg.h"
27 #include "wx/metafile.h"
28 #include "wx/dirctrl.h"
30 #if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__)
31 #include "../sample.xpm"
32 #if wxUSE_DRAG_AND_DROP
33 #include "dnd_copy.xpm"
34 #include "dnd_move.xpm"
35 #include "dnd_none.xpm"
39 #if wxUSE_DRAG_AND_DROP
41 // ----------------------------------------------------------------------------
42 // Derive two simple classes which just put in the listbox the strings (text or
43 // file names) we drop on them
44 // ----------------------------------------------------------------------------
46 class DnDText
: public wxTextDropTarget
49 DnDText(wxListBox
*pOwner
) { m_pOwner
= pOwner
; }
51 virtual bool OnDropText(wxCoord x
, wxCoord y
, const wxString
& text
);
57 class DnDFile
: public wxFileDropTarget
60 DnDFile(wxListBox
*pOwner
= NULL
) { m_pOwner
= pOwner
; }
62 virtual bool OnDropFiles(wxCoord x
, wxCoord y
,
63 const wxArrayString
& filenames
);
69 // ----------------------------------------------------------------------------
70 // Define a custom dtop target accepting URLs
71 // ----------------------------------------------------------------------------
73 class URLDropTarget
: public wxDropTarget
76 URLDropTarget() { SetDataObject(new wxURLDataObject
); }
78 void OnDropURL(wxCoord
WXUNUSED(x
), wxCoord
WXUNUSED(y
), const wxString
& text
)
80 // of course, a real program would do something more useful here...
81 wxMessageBox(text
, _T("wxDnD sample: got URL"),
82 wxICON_INFORMATION
| wxOK
);
85 // URLs can't be moved, only copied
86 virtual wxDragResult
OnDragOver(wxCoord
WXUNUSED(x
), wxCoord
WXUNUSED(y
),
87 wxDragResult
WXUNUSED(def
))
89 return wxDragLink
; // At least IE 5.x needs wxDragLink, the
90 // other browsers on MSW seem okay with it too.
93 // translate this to calls to OnDropURL() just for convenience
94 virtual wxDragResult
OnData(wxCoord x
, wxCoord y
, wxDragResult def
)
99 OnDropURL(x
, y
, ((wxURLDataObject
*)m_dataObject
)->GetURL());
105 #endif // wxUSE_DRAG_AND_DROP
107 // ----------------------------------------------------------------------------
108 // Define a new application type
109 // ----------------------------------------------------------------------------
111 class DnDApp
: public wxApp
114 virtual bool OnInit();
117 IMPLEMENT_APP(DnDApp
)
119 #if wxUSE_DRAG_AND_DROP || wxUSE_CLIPBOARD
121 // ----------------------------------------------------------------------------
122 // Define canvas class to show a bitmap
123 // ----------------------------------------------------------------------------
125 class DnDCanvasBitmap
: public wxScrolledWindow
128 DnDCanvasBitmap(wxWindow
*parent
) : wxScrolledWindow(parent
) { }
130 void SetBitmap(const wxBitmap
& bitmap
)
134 SetScrollbars(10, 10,
135 m_bitmap
.GetWidth() / 10, m_bitmap
.GetHeight() / 10);
140 void OnPaint(wxPaintEvent
& WXUNUSED(event
))
148 dc
.DrawBitmap(m_bitmap
, 0, 0);
155 DECLARE_EVENT_TABLE()
160 // and the same thing fo metafiles
161 class DnDCanvasMetafile
: public wxScrolledWindow
164 DnDCanvasMetafile(wxWindow
*parent
) : wxScrolledWindow(parent
) { }
166 void SetMetafile(const wxMetafile
& metafile
)
168 m_metafile
= metafile
;
170 SetScrollbars(10, 10,
171 m_metafile
.GetWidth() / 10, m_metafile
.GetHeight() / 10);
176 void OnPaint(wxPaintEvent
&)
180 if ( m_metafile
.Ok() )
184 m_metafile
.Play(&dc
);
189 wxMetafile m_metafile
;
191 DECLARE_EVENT_TABLE()
194 #endif // wxUSE_METAFILE
196 // ----------------------------------------------------------------------------
197 // Define a new frame type for the main frame
198 // ----------------------------------------------------------------------------
200 class DnDFrame
: public wxFrame
206 void OnPaint(wxPaintEvent
& event
);
207 void OnSize(wxSizeEvent
& event
);
208 void OnQuit(wxCommandEvent
& event
);
209 void OnAbout(wxCommandEvent
& event
);
210 void OnDrag(wxCommandEvent
& event
);
211 void OnDragMoveByDefault(wxCommandEvent
& event
);
212 void OnDragMoveAllow(wxCommandEvent
& event
);
213 void OnNewFrame(wxCommandEvent
& event
);
214 void OnHelp (wxCommandEvent
& event
);
216 void OnLogClear(wxCommandEvent
& event
);
219 void OnCopy(wxCommandEvent
& event
);
220 void OnPaste(wxCommandEvent
& event
);
222 void OnCopyBitmap(wxCommandEvent
& event
);
223 void OnPasteBitmap(wxCommandEvent
& event
);
226 void OnPasteMetafile(wxCommandEvent
& event
);
227 #endif // wxUSE_METAFILE
229 void OnCopyFiles(wxCommandEvent
& event
);
231 void OnUsePrimary(wxCommandEvent
& event
);
233 void OnLeftDown(wxMouseEvent
& event
);
234 void OnRightDown(wxMouseEvent
& event
);
236 #if wxUSE_DRAG_AND_DROP
237 void OnBeginDrag(wxTreeEvent
& event
);
238 #endif // wxUSE_DRAG_AND_DROP
240 void OnUpdateUIMoveByDefault(wxUpdateUIEvent
& event
);
242 void OnUpdateUIPasteText(wxUpdateUIEvent
& event
);
243 void OnUpdateUIPasteBitmap(wxUpdateUIEvent
& event
);
246 #if wxUSE_DRAG_AND_DROP
247 // show the result of a dnd operation in the status bar
248 void LogDragResult(wxDragResult result
);
249 #endif // wxUSE_DRAG_AND_DROP
253 wxListBox
*m_ctrlFile
,
255 wxGenericDirCtrl
*m_ctrlDir
;
258 wxTextCtrl
*m_ctrlLog
;
264 // move the text by default (or copy)?
265 bool m_moveByDefault
;
267 // allow moving the text at all?
274 DECLARE_EVENT_TABLE()
277 // ----------------------------------------------------------------------------
278 // A shape is an example of application-specific data which may be transported
279 // via drag-and-drop or clipboard: in our case, we have different geometric
280 // shapes, each one with its own colour and position
281 // ----------------------------------------------------------------------------
283 #if wxUSE_DRAG_AND_DROP
296 DnDShape(const wxPoint
& pos
,
299 : m_pos(pos
), m_size(size
), m_col(col
)
303 // this is for debugging - lets us see when exactly an object is freed
304 // (this may be later than you think if it's on the clipboard, for example)
305 virtual ~DnDShape() { }
307 // the functions used for drag-and-drop: they dump and restore a shape into
308 // some bitwise-copiable data (might use streams too...)
309 // ------------------------------------------------------------------------
311 // restore from buffer
312 static DnDShape
*New(const void *buf
);
314 virtual size_t GetDataSize() const
316 return sizeof(ShapeDump
);
319 virtual void GetDataHere(void *buf
) const
321 ShapeDump
& dump
= *(ShapeDump
*)buf
;
326 dump
.r
= m_col
.Red();
327 dump
.g
= m_col
.Green();
328 dump
.b
= m_col
.Blue();
333 const wxPoint
& GetPosition() const { return m_pos
; }
334 const wxColour
& GetColour() const { return m_col
; }
335 const wxSize
& GetSize() const { return m_size
; }
337 void Move(const wxPoint
& pos
) { m_pos
= pos
; }
339 // to implement in derived classes
340 virtual Kind
GetKind() const = 0;
342 virtual void Draw(wxDC
& dc
)
344 dc
.SetPen(wxPen(m_col
, 1, wxSOLID
));
348 //get a point 1 up and 1 left, otherwise the mid-point of a triangle is on the line
349 wxPoint
GetCentre() const
350 { return wxPoint(m_pos
.x
+ m_size
.x
/ 2 - 1, m_pos
.y
+ m_size
.y
/ 2 - 1); }
354 wxCoord x
, y
, // position
357 unsigned char r
, g
, b
; // colour
365 class DnDTriangularShape
: public DnDShape
368 DnDTriangularShape(const wxPoint
& pos
,
371 : DnDShape(pos
, size
, col
)
373 wxLogMessage(wxT("DnDTriangularShape is being created"));
376 virtual ~DnDTriangularShape()
378 wxLogMessage(wxT("DnDTriangularShape is being deleted"));
381 virtual Kind
GetKind() const { return Triangle
; }
382 virtual void Draw(wxDC
& dc
)
386 // well, it's a bit difficult to describe a triangle by position and
387 // size, but we're not doing geometry here, do we? ;-)
389 wxPoint
p2(m_pos
.x
+ m_size
.x
, m_pos
.y
);
390 wxPoint
p3(m_pos
.x
, m_pos
.y
+ m_size
.y
);
396 //works in multicolor modes; on GTK (at least) will fail in 16-bit color
397 dc
.SetBrush(wxBrush(m_col
, wxSOLID
));
398 dc
.FloodFill(GetCentre(), m_col
, wxFLOOD_BORDER
);
402 class DnDRectangularShape
: public DnDShape
405 DnDRectangularShape(const wxPoint
& pos
,
408 : DnDShape(pos
, size
, col
)
410 wxLogMessage(wxT("DnDRectangularShape is being created"));
413 virtual ~DnDRectangularShape()
415 wxLogMessage(wxT("DnDRectangularShape is being deleted"));
418 virtual Kind
GetKind() const { return Rectangle
; }
419 virtual void Draw(wxDC
& dc
)
424 wxPoint
p2(p1
.x
+ m_size
.x
, p1
.y
);
425 wxPoint
p3(p2
.x
, p2
.y
+ m_size
.y
);
426 wxPoint
p4(p1
.x
, p3
.y
);
433 dc
.SetBrush(wxBrush(m_col
, wxSOLID
));
434 dc
.FloodFill(GetCentre(), m_col
, wxFLOOD_BORDER
);
438 class DnDEllipticShape
: public DnDShape
441 DnDEllipticShape(const wxPoint
& pos
,
444 : DnDShape(pos
, size
, col
)
446 wxLogMessage(wxT("DnDEllipticShape is being created"));
449 virtual ~DnDEllipticShape()
451 wxLogMessage(wxT("DnDEllipticShape is being deleted"));
454 virtual Kind
GetKind() const { return Ellipse
; }
455 virtual void Draw(wxDC
& dc
)
459 dc
.DrawEllipse(m_pos
, m_size
);
461 dc
.SetBrush(wxBrush(m_col
, wxSOLID
));
462 dc
.FloodFill(GetCentre(), m_col
, wxFLOOD_BORDER
);
466 // ----------------------------------------------------------------------------
467 // A wxDataObject specialisation for the application-specific data
468 // ----------------------------------------------------------------------------
470 static const wxChar
*shapeFormatId
= wxT("wxShape");
472 class DnDShapeDataObject
: public wxDataObject
475 // ctor doesn't copy the pointer, so it shouldn't go away while this object
477 DnDShapeDataObject(DnDShape
*shape
= (DnDShape
*)NULL
)
481 // we need to copy the shape because the one we're handled may be
482 // deleted while it's still on the clipboard (for example) - and we
483 // reuse the serialisation methods here to copy it
484 void *buf
= malloc(shape
->DnDShape::GetDataSize());
485 shape
->GetDataHere(buf
);
486 m_shape
= DnDShape::New(buf
);
496 // this string should uniquely identify our format, but is otherwise
498 m_formatShape
.SetId(shapeFormatId
);
500 // we don't draw the shape to a bitmap until it's really needed (i.e.
501 // we're asked to do so)
504 m_hasMetaFile
= false;
505 #endif // wxUSE_METAFILE
508 virtual ~DnDShapeDataObject() { delete m_shape
; }
510 // after a call to this function, the shape is owned by the caller and it
511 // is responsible for deleting it!
513 // NB: a better solution would be to make DnDShapes ref counted and this
514 // is what should probably be done in a real life program, otherwise
515 // the ownership problems become too complicated really fast
518 DnDShape
*shape
= m_shape
;
520 m_shape
= (DnDShape
*)NULL
;
523 m_hasMetaFile
= false;
524 #endif // wxUSE_METAFILE
529 // implement base class pure virtuals
530 // ----------------------------------
532 virtual wxDataFormat
GetPreferredFormat(Direction
WXUNUSED(dir
)) const
534 return m_formatShape
;
537 virtual size_t GetFormatCount(Direction dir
) const
539 // our custom format is supported by both GetData() and SetData()
543 // but the bitmap format(s) are only supported for output
544 nFormats
+= m_dobjBitmap
.GetFormatCount(dir
);
547 nFormats
+= m_dobjMetaFile
.GetFormatCount(dir
);
548 #endif // wxUSE_METAFILE
554 virtual void GetAllFormats(wxDataFormat
*formats
, Direction dir
) const
556 formats
[0] = m_formatShape
;
559 // in Get direction we additionally support bitmaps and metafiles
561 m_dobjBitmap
.GetAllFormats(&formats
[1], dir
);
564 // don't assume that m_dobjBitmap has only 1 format
565 m_dobjMetaFile
.GetAllFormats(&formats
[1 +
566 m_dobjBitmap
.GetFormatCount(dir
)], dir
);
567 #endif // wxUSE_METAFILE
571 virtual size_t GetDataSize(const wxDataFormat
& format
) const
573 if ( format
== m_formatShape
)
575 return m_shape
->GetDataSize();
578 else if ( m_dobjMetaFile
.IsSupported(format
) )
580 if ( !m_hasMetaFile
)
583 return m_dobjMetaFile
.GetDataSize(format
);
585 #endif // wxUSE_METAFILE
588 wxASSERT_MSG( m_dobjBitmap
.IsSupported(format
),
589 wxT("unexpected format") );
594 return m_dobjBitmap
.GetDataSize();
598 virtual bool GetDataHere(const wxDataFormat
& format
, void *pBuf
) const
600 if ( format
== m_formatShape
)
602 m_shape
->GetDataHere(pBuf
);
607 else if ( m_dobjMetaFile
.IsSupported(format
) )
609 if ( !m_hasMetaFile
)
612 return m_dobjMetaFile
.GetDataHere(format
, pBuf
);
614 #endif // wxUSE_METAFILE
617 wxASSERT_MSG( m_dobjBitmap
.IsSupported(format
),
618 wxT("unexpected format") );
623 return m_dobjBitmap
.GetDataHere(pBuf
);
627 virtual bool SetData(const wxDataFormat
& format
,
628 size_t WXUNUSED(len
), const void *buf
)
630 wxCHECK_MSG( format
== m_formatShape
, false,
631 wxT( "unsupported format") );
634 m_shape
= DnDShape::New(buf
);
636 // the shape has changed
640 m_hasMetaFile
= false;
641 #endif // wxUSE_METAFILE
647 // creates a bitmap and assigns it to m_dobjBitmap (also sets m_hasBitmap)
648 void CreateBitmap() const;
650 void CreateMetaFile() const;
651 #endif // wxUSE_METAFILE
653 wxDataFormat m_formatShape
; // our custom format
655 wxBitmapDataObject m_dobjBitmap
; // it handles bitmaps
656 bool m_hasBitmap
; // true if m_dobjBitmap has valid bitmap
659 wxMetaFileDataObject m_dobjMetaFile
;// handles metafiles
660 bool m_hasMetaFile
; // true if we have valid metafile
661 #endif // wxUSE_METAFILE
663 DnDShape
*m_shape
; // our data
666 // ----------------------------------------------------------------------------
667 // A dialog to edit shape properties
668 // ----------------------------------------------------------------------------
670 class DnDShapeDialog
: public wxDialog
673 DnDShapeDialog(wxFrame
*parent
, DnDShape
*shape
);
675 DnDShape
*GetShape() const;
677 virtual bool TransferDataToWindow();
678 virtual bool TransferDataFromWindow();
680 void OnColour(wxCommandEvent
& event
);
687 DnDShape::Kind m_shapeKind
;
699 DECLARE_EVENT_TABLE()
702 // ----------------------------------------------------------------------------
703 // A frame for the shapes which can be drag-and-dropped between frames
704 // ----------------------------------------------------------------------------
706 class DnDShapeFrame
: public wxFrame
709 DnDShapeFrame(wxFrame
*parent
);
712 void SetShape(DnDShape
*shape
);
713 virtual bool SetShape(const wxRegion
®ion
)
715 return wxFrame::SetShape( region
);
719 void OnNewShape(wxCommandEvent
& event
);
720 void OnEditShape(wxCommandEvent
& event
);
721 void OnClearShape(wxCommandEvent
& event
);
723 void OnCopyShape(wxCommandEvent
& event
);
724 void OnPasteShape(wxCommandEvent
& event
);
726 void OnUpdateUICopy(wxUpdateUIEvent
& event
);
727 void OnUpdateUIPaste(wxUpdateUIEvent
& event
);
729 void OnDrag(wxMouseEvent
& event
);
730 void OnPaint(wxPaintEvent
& event
);
731 void OnDrop(wxCoord x
, wxCoord y
, DnDShape
*shape
);
736 static DnDShapeFrame
*ms_lastDropTarget
;
738 DECLARE_EVENT_TABLE()
741 // ----------------------------------------------------------------------------
742 // wxDropTarget derivation for DnDShapes
743 // ----------------------------------------------------------------------------
745 class DnDShapeDropTarget
: public wxDropTarget
748 DnDShapeDropTarget(DnDShapeFrame
*frame
)
749 : wxDropTarget(new DnDShapeDataObject
)
754 // override base class (pure) virtuals
755 virtual wxDragResult
OnEnter(wxCoord x
, wxCoord y
, wxDragResult def
)
758 m_frame
->SetStatusText(_T("Mouse entered the frame"));
759 #endif // wxUSE_STATUSBAR
760 return OnDragOver(x
, y
, def
);
762 virtual void OnLeave()
765 m_frame
->SetStatusText(_T("Mouse left the frame"));
766 #endif // wxUSE_STATUSBAR
768 virtual wxDragResult
OnData(wxCoord x
, wxCoord y
, wxDragResult def
)
772 wxLogError(wxT("Failed to get drag and drop data"));
777 m_frame
->OnDrop(x
, y
,
778 ((DnDShapeDataObject
*)GetDataObject())->GetShape());
784 DnDShapeFrame
*m_frame
;
787 #endif // wxUSE_DRAG_AND_DROP
789 // ----------------------------------------------------------------------------
790 // functions prototypes
791 // ----------------------------------------------------------------------------
793 static void ShowBitmap(const wxBitmap
& bitmap
);
796 static void ShowMetaFile(const wxMetaFile
& metafile
);
797 #endif // wxUSE_METAFILE
799 // ----------------------------------------------------------------------------
800 // IDs for the menu commands
801 // ----------------------------------------------------------------------------
820 Menu_Shape_New
= 500,
823 Menu_ShapeClipboard_Copy
,
824 Menu_ShapeClipboard_Paste
,
828 BEGIN_EVENT_TABLE(DnDFrame
, wxFrame
)
829 EVT_MENU(Menu_Quit
, DnDFrame::OnQuit
)
830 EVT_MENU(Menu_About
, DnDFrame::OnAbout
)
831 EVT_MENU(Menu_Drag
, DnDFrame::OnDrag
)
832 EVT_MENU(Menu_DragMoveDef
, DnDFrame::OnDragMoveByDefault
)
833 EVT_MENU(Menu_DragMoveAllow
,DnDFrame::OnDragMoveAllow
)
834 EVT_MENU(Menu_NewFrame
, DnDFrame::OnNewFrame
)
835 EVT_MENU(Menu_Help
, DnDFrame::OnHelp
)
837 EVT_MENU(Menu_Clear
, DnDFrame::OnLogClear
)
839 EVT_MENU(Menu_Copy
, DnDFrame::OnCopy
)
840 EVT_MENU(Menu_Paste
, DnDFrame::OnPaste
)
841 EVT_MENU(Menu_CopyBitmap
, DnDFrame::OnCopyBitmap
)
842 EVT_MENU(Menu_PasteBitmap
,DnDFrame::OnPasteBitmap
)
844 EVT_MENU(Menu_PasteMFile
, DnDFrame::OnPasteMetafile
)
845 #endif // wxUSE_METAFILE
846 EVT_MENU(Menu_CopyFiles
, DnDFrame::OnCopyFiles
)
847 EVT_MENU(Menu_UsePrimary
, DnDFrame::OnUsePrimary
)
849 EVT_UPDATE_UI(Menu_DragMoveDef
, DnDFrame::OnUpdateUIMoveByDefault
)
851 EVT_UPDATE_UI(Menu_Paste
, DnDFrame::OnUpdateUIPasteText
)
852 EVT_UPDATE_UI(Menu_PasteBitmap
, DnDFrame::OnUpdateUIPasteBitmap
)
854 EVT_LEFT_DOWN( DnDFrame::OnLeftDown
)
855 EVT_RIGHT_DOWN( DnDFrame::OnRightDown
)
856 EVT_PAINT( DnDFrame::OnPaint
)
857 EVT_SIZE( DnDFrame::OnSize
)
860 #if wxUSE_DRAG_AND_DROP
862 BEGIN_EVENT_TABLE(DnDShapeFrame
, wxFrame
)
863 EVT_MENU(Menu_Shape_New
, DnDShapeFrame::OnNewShape
)
864 EVT_MENU(Menu_Shape_Edit
, DnDShapeFrame::OnEditShape
)
865 EVT_MENU(Menu_Shape_Clear
, DnDShapeFrame::OnClearShape
)
867 EVT_MENU(Menu_ShapeClipboard_Copy
, DnDShapeFrame::OnCopyShape
)
868 EVT_MENU(Menu_ShapeClipboard_Paste
, DnDShapeFrame::OnPasteShape
)
870 EVT_UPDATE_UI(Menu_ShapeClipboard_Copy
, DnDShapeFrame::OnUpdateUICopy
)
871 EVT_UPDATE_UI(Menu_ShapeClipboard_Paste
, DnDShapeFrame::OnUpdateUIPaste
)
873 EVT_LEFT_DOWN(DnDShapeFrame::OnDrag
)
875 EVT_PAINT(DnDShapeFrame::OnPaint
)
878 BEGIN_EVENT_TABLE(DnDShapeDialog
, wxDialog
)
879 EVT_BUTTON(Button_Colour
, DnDShapeDialog::OnColour
)
882 #endif // wxUSE_DRAG_AND_DROP
884 BEGIN_EVENT_TABLE(DnDCanvasBitmap
, wxScrolledWindow
)
885 EVT_PAINT(DnDCanvasBitmap::OnPaint
)
889 BEGIN_EVENT_TABLE(DnDCanvasMetafile
, wxScrolledWindow
)
890 EVT_PAINT(DnDCanvasMetafile::OnPaint
)
892 #endif // wxUSE_METAFILE
894 #endif // wxUSE_DRAG_AND_DROP
896 // ============================================================================
898 // ============================================================================
900 // `Main program' equivalent, creating windows and returning main app frame
901 bool DnDApp::OnInit()
903 if ( !wxApp::OnInit() )
906 #if wxUSE_DRAG_AND_DROP || wxUSE_CLIPBOARD
907 // switch on trace messages
909 #if defined(__WXGTK__)
910 wxLog::AddTraceMask(_T("clipboard"));
911 #elif defined(__WXMSW__)
912 wxLog::AddTraceMask(wxTRACE_OleCalls
);
917 wxImage::AddHandler( new wxPNGHandler
);
920 // create the main frame window
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
933 : wxFrame(NULL
, wxID_ANY
, _T("Drag-and-Drop/Clipboard wxWidgets Sample"),
935 m_strText(_T("wxWidgets drag & drop works :-)"))
938 // frame icon and status bar
939 SetIcon(wxICON(sample
));
943 #endif // wxUSE_STATUSBAR
946 wxMenu
*file_menu
= new wxMenu
;
947 file_menu
->Append(Menu_Drag
, _T("&Test drag..."));
948 file_menu
->AppendCheckItem(Menu_DragMoveDef
, _T("&Move by default"));
949 file_menu
->AppendCheckItem(Menu_DragMoveAllow
, _T("&Allow moving"));
950 file_menu
->AppendSeparator();
951 file_menu
->Append(Menu_NewFrame
, _T("&New frame\tCtrl-N"));
952 file_menu
->AppendSeparator();
953 file_menu
->Append(Menu_Quit
, _T("E&xit\tCtrl-Q"));
956 wxMenu
*log_menu
= new wxMenu
;
957 log_menu
->Append(Menu_Clear
, _T("Clear\tCtrl-L"));
960 wxMenu
*help_menu
= new wxMenu
;
961 help_menu
->Append(Menu_Help
, _T("&Help..."));
962 help_menu
->AppendSeparator();
963 help_menu
->Append(Menu_About
, _T("&About"));
965 wxMenu
*clip_menu
= new wxMenu
;
966 clip_menu
->Append(Menu_Copy
, _T("&Copy text\tCtrl-C"));
967 clip_menu
->Append(Menu_Paste
, _T("&Paste text\tCtrl-V"));
968 clip_menu
->AppendSeparator();
969 clip_menu
->Append(Menu_CopyBitmap
, _T("Copy &bitmap\tCtrl-Shift-C"));
970 clip_menu
->Append(Menu_PasteBitmap
, _T("Paste b&itmap\tCtrl-Shift-V"));
972 clip_menu
->AppendSeparator();
973 clip_menu
->Append(Menu_PasteMFile
, _T("Paste &metafile\tCtrl-M"));
974 #endif // wxUSE_METAFILE
975 clip_menu
->AppendSeparator();
976 clip_menu
->Append(Menu_CopyFiles
, _T("Copy &files\tCtrl-F"));
977 clip_menu
->AppendSeparator();
978 clip_menu
->AppendCheckItem(Menu_UsePrimary
, _T("Use &primary selection\tCtrl-P"));
980 wxMenuBar
*menu_bar
= new wxMenuBar
;
981 menu_bar
->Append(file_menu
, _T("&File"));
983 menu_bar
->Append(log_menu
, _T("&Log"));
985 menu_bar
->Append(clip_menu
, _T("&Clipboard"));
986 menu_bar
->Append(help_menu
, _T("&Help"));
988 SetMenuBar(menu_bar
);
990 // create the child controls
991 SetBackgroundColour(*wxWHITE
); // labels read better on this background
993 wxString
strFile(_T("Drop files here!")), strText(_T("Drop text on me"));
995 m_ctrlFile
= new wxListBox(this, wxID_ANY
, wxDefaultPosition
, wxDefaultSize
, 1, &strFile
,
996 wxLB_HSCROLL
| wxLB_ALWAYS_SB
);
997 m_ctrlText
= new wxListBox(this, wxID_ANY
, wxDefaultPosition
, wxDefaultSize
, 1, &strText
,
998 wxLB_HSCROLL
| wxLB_ALWAYS_SB
);
999 m_ctrlDir
= new wxGenericDirCtrl(this);
1002 m_ctrlLog
= new wxTextCtrl(this, wxID_ANY
, wxEmptyString
,
1003 wxDefaultPosition
, wxDefaultSize
,
1004 wxTE_MULTILINE
| wxTE_READONLY
|
1007 // redirect log messages to the text window
1008 m_pLog
= new wxLogTextCtrl(m_ctrlLog
);
1009 m_pLogPrev
= wxLog::SetActiveTarget(m_pLog
);
1012 #if wxUSE_DRAG_AND_DROP
1013 // associate drop targets with the controls
1014 m_ctrlFile
->SetDropTarget(new DnDFile(m_ctrlFile
));
1015 m_ctrlText
->SetDropTarget(new DnDText(m_ctrlText
));
1017 #if wxUSE_DRAG_AND_DROP
1021 wxEVT_COMMAND_TREE_BEGIN_DRAG
,
1022 wxTreeEventHandler(DnDFrame::OnBeginDrag
),
1026 #endif // wxUSE_DRAG_AND_DROP
1029 m_ctrlLog
->SetDropTarget(new URLDropTarget
);
1031 #endif // wxUSE_DRAG_AND_DROP
1033 wxBoxSizer
*sizer_top
= new wxBoxSizer( wxHORIZONTAL
);
1034 sizer_top
->Add(m_ctrlFile
, 1, wxEXPAND
);
1035 sizer_top
->Add(m_ctrlText
, 1, wxEXPAND
);
1037 wxBoxSizer
*sizerDirCtrl
= new wxBoxSizer(wxVERTICAL
);
1038 sizerDirCtrl
->Add(new wxStaticText(this, wxID_ANY
, "Drag files from here"),
1039 wxSizerFlags().Centre().Border());
1040 sizerDirCtrl
->Add(m_ctrlDir
, wxSizerFlags(1).Expand());
1041 sizer_top
->Add(sizerDirCtrl
, 1, wxEXPAND
);
1043 // make all columns of reasonable minimal size
1044 for ( unsigned n
= 0; n
< sizer_top
->GetChildren().size(); n
++ )
1045 sizer_top
->SetItemMinSize(n
, 200, 300);
1047 wxBoxSizer
*sizer
= new wxBoxSizer( wxVERTICAL
);
1048 sizer
->Add(sizer_top
, 1, wxEXPAND
);
1050 sizer
->Add(m_ctrlLog
, 2, wxEXPAND
);
1051 sizer
->SetItemMinSize(m_ctrlLog
, 450, 200);
1053 sizer
->AddSpacer(50);
1055 // copy data by default but allow moving it as well
1056 m_moveByDefault
= false;
1058 menu_bar
->Check(Menu_DragMoveAllow
, true);
1060 // set the correct size and show the frame
1061 SetSizerAndFit(sizer
);
1065 void DnDFrame::OnQuit(wxCommandEvent
& WXUNUSED(event
))
1070 void DnDFrame::OnSize(wxSizeEvent
& event
)
1077 void DnDFrame::OnPaint(wxPaintEvent
& WXUNUSED(event
))
1081 GetClientSize( &w
, &h
);
1084 // dc.Clear(); -- this kills wxGTK
1085 dc
.SetFont( wxFont( 24, wxDECORATIVE
, wxNORMAL
, wxNORMAL
, false, _T("charter") ) );
1086 dc
.DrawText( _T("Drag text from here!"), 100, h
-50 );
1089 void DnDFrame::OnUpdateUIMoveByDefault(wxUpdateUIEvent
& event
)
1091 // only can move by default if moving is allowed at all
1092 event
.Enable(m_moveAllow
);
1095 void DnDFrame::OnUpdateUIPasteText(wxUpdateUIEvent
& event
)
1098 // too many trace messages if we don't do it - this function is called
1103 event
.Enable( wxTheClipboard
->IsSupported(wxDF_TEXT
) );
1106 void DnDFrame::OnUpdateUIPasteBitmap(wxUpdateUIEvent
& event
)
1109 // too many trace messages if we don't do it - this function is called
1114 event
.Enable( wxTheClipboard
->IsSupported(wxDF_BITMAP
) );
1117 void DnDFrame::OnNewFrame(wxCommandEvent
& WXUNUSED(event
))
1119 #if wxUSE_DRAG_AND_DROP
1120 (new DnDShapeFrame(this))->Show(true);
1122 wxLogStatus(this, wxT("Double click the new frame to select a shape for it"));
1123 #endif // wxUSE_DRAG_AND_DROP
1126 void DnDFrame::OnDrag(wxCommandEvent
& WXUNUSED(event
))
1128 #if wxUSE_DRAG_AND_DROP
1129 wxString strText
= wxGetTextFromUser
1131 _T("After you enter text in this dialog, press any mouse\n")
1132 _T("button in the bottom (empty) part of the frame and \n")
1133 _T("drag it anywhere - you will be in fact dragging the\n")
1134 _T("text object containing this text"),
1135 _T("Please enter some text"), m_strText
, this
1138 m_strText
= strText
;
1139 #endif // wxUSE_DRAG_AND_DROP
1142 void DnDFrame::OnDragMoveByDefault(wxCommandEvent
& event
)
1144 m_moveByDefault
= event
.IsChecked();
1147 void DnDFrame::OnDragMoveAllow(wxCommandEvent
& event
)
1149 m_moveAllow
= event
.IsChecked();
1152 void DnDFrame::OnAbout(wxCommandEvent
& WXUNUSED(event
))
1154 wxMessageBox(_T("Drag-&-Drop Demo\n")
1155 _T("Please see \"Help|Help...\" for details\n")
1156 _T("Copyright (c) 1998 Vadim Zeitlin"),
1158 wxICON_INFORMATION
| wxOK
,
1162 void DnDFrame::OnHelp(wxCommandEvent
& /* event */)
1164 wxMessageDialog
dialog(this,
1165 _T("This small program demonstrates drag & drop support in wxWidgets. The program window\n")
1166 _T("consists of 3 parts: the bottom pane is for debug messages, so that you can see what's\n")
1167 _T("going on inside. The top part is split into 2 listboxes, the left one accepts files\n")
1168 _T("and the right one accepts text.\n")
1170 _T("To test wxDropTarget: open wordpad (write.exe), select some text in it and drag it to\n")
1171 _T("the right listbox (you'll notice the usual visual feedback, i.e. the cursor will change).\n")
1172 _T("Also, try dragging some files (you can select several at once) from Windows Explorer (or \n")
1173 _T("File Manager) to the left pane. Hold down Ctrl/Shift keys when you drop text (doesn't \n")
1174 _T("work with files) and see what changes.\n")
1176 _T("To test wxDropSource: just press any mouse button on the empty zone of the window and drag\n")
1177 _T("it to wordpad or any other droptarget accepting text (and of course you can just drag it\n")
1178 _T("to the right pane). Due to a lot of trace messages, the cursor might take some time to \n")
1179 _T("change, don't release the mouse button until it does. You can change the string being\n")
1180 _T("dragged in in \"File|Test drag...\" dialog.\n")
1183 _T("Please send all questions/bug reports/suggestions &c to \n")
1184 _T("Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>"),
1191 void DnDFrame::OnLogClear(wxCommandEvent
& /* event */ )
1194 m_ctrlText
->Clear();
1195 m_ctrlFile
->Clear();
1199 #if wxUSE_DRAG_AND_DROP
1201 void DnDFrame::LogDragResult(wxDragResult result
)
1207 case wxDragError
: pc
= _T("Error!"); break;
1208 case wxDragNone
: pc
= _T("Nothing"); break;
1209 case wxDragCopy
: pc
= _T("Copied"); break;
1210 case wxDragMove
: pc
= _T("Moved"); break;
1211 case wxDragCancel
: pc
= _T("Cancelled"); break;
1212 default: pc
= _T("Huh?"); break;
1215 SetStatusText(wxString(_T("Drag result: ")) + pc
);
1217 wxUnusedVar(result
);
1218 #endif // wxUSE_STATUSBAR
1221 #endif // wxUSE_DRAG_AND_DROP
1223 void DnDFrame::OnLeftDown(wxMouseEvent
&WXUNUSED(event
) )
1225 #if wxUSE_DRAG_AND_DROP
1226 if ( !m_strText
.empty() )
1228 // start drag operation
1229 wxTextDataObject
textData(m_strText
);
1230 wxDropSource
source(textData
, this,
1231 wxDROP_ICON(dnd_copy
),
1232 wxDROP_ICON(dnd_move
),
1233 wxDROP_ICON(dnd_none
));
1236 if ( m_moveByDefault
)
1237 flags
|= wxDrag_DefaultMove
;
1238 else if ( m_moveAllow
)
1239 flags
|= wxDrag_AllowMove
;
1241 LogDragResult(source
.DoDragDrop(flags
));
1243 #endif // wxUSE_DRAG_AND_DROP
1246 void DnDFrame::OnRightDown(wxMouseEvent
&event
)
1248 wxMenu
menu(_T("Dnd sample menu"));
1250 menu
.Append(Menu_Drag
, _T("&Test drag..."));
1251 menu
.AppendSeparator();
1252 menu
.Append(Menu_About
, _T("&About"));
1254 PopupMenu( &menu
, event
.GetX(), event
.GetY() );
1257 DnDFrame::~DnDFrame()
1260 if ( m_pLog
!= NULL
) {
1261 if ( wxLog::SetActiveTarget(m_pLogPrev
) == m_pLog
)
1267 void DnDFrame::OnUsePrimary(wxCommandEvent
& event
)
1269 const bool usePrimary
= event
.IsChecked();
1270 wxTheClipboard
->UsePrimarySelection(usePrimary
);
1272 wxLogStatus(_T("Now using %s selection"), usePrimary
? _T("primary")
1276 #if wxUSE_DRAG_AND_DROP
1278 void DnDFrame::OnBeginDrag(wxTreeEvent
& WXUNUSED(event
))
1280 wxFileDataObject data
;
1281 data
.AddFile(m_ctrlDir
->GetPath());
1283 wxDropSource
dragSource(this);
1284 dragSource
.SetData(data
);
1286 LogDragResult(dragSource
.DoDragDrop());
1289 #endif // wxUSE_DRAG_AND_DROP
1291 // ---------------------------------------------------------------------------
1293 // ---------------------------------------------------------------------------
1295 void DnDFrame::OnCopyBitmap(wxCommandEvent
& WXUNUSED(event
))
1297 // PNG support is not always compiled in under Windows, so use BMP there
1299 wxFileDialog
dialog(this, _T("Open a PNG file"), wxEmptyString
, wxEmptyString
, _T("PNG files (*.png)|*.png"), 0);
1301 wxFileDialog
dialog(this, _T("Open a BMP file"), wxEmptyString
, wxEmptyString
, _T("BMP files (*.bmp)|*.bmp"), 0);
1304 if (dialog
.ShowModal() != wxID_OK
)
1306 wxLogMessage( _T("Aborted file open") );
1310 if (dialog
.GetPath().empty())
1312 wxLogMessage( _T("Returned empty string.") );
1316 if (!wxFileExists(dialog
.GetPath()))
1318 wxLogMessage( _T("File doesn't exist.") );
1323 image
.LoadFile( dialog
.GetPath(),
1332 wxLogError( _T("Invalid image file...") );
1336 wxLogStatus( _T("Decoding image file...") );
1339 wxBitmap
bitmap( image
);
1341 if ( !wxTheClipboard
->Open() )
1343 wxLogError(_T("Can't open clipboard."));
1348 wxLogMessage( _T("Creating wxBitmapDataObject...") );
1351 if ( !wxTheClipboard
->AddData(new wxBitmapDataObject(bitmap
)) )
1353 wxLogError(_T("Can't copy image to the clipboard."));
1357 wxLogMessage(_T("Image has been put on the clipboard.") );
1358 wxLogMessage(_T("You can paste it now and look at it.") );
1361 wxTheClipboard
->Close();
1364 void DnDFrame::OnPasteBitmap(wxCommandEvent
& WXUNUSED(event
))
1366 if ( !wxTheClipboard
->Open() )
1368 wxLogError(_T("Can't open clipboard."));
1373 if ( !wxTheClipboard
->IsSupported(wxDF_BITMAP
) )
1375 wxLogWarning(_T("No bitmap on clipboard"));
1377 wxTheClipboard
->Close();
1381 wxBitmapDataObject data
;
1382 if ( !wxTheClipboard
->GetData(data
) )
1384 wxLogError(_T("Can't paste bitmap from the clipboard"));
1388 const wxBitmap
& bmp
= data
.GetBitmap();
1390 wxLogMessage(_T("Bitmap %dx%d pasted from the clipboard"),
1391 bmp
.GetWidth(), bmp
.GetHeight());
1395 wxTheClipboard
->Close();
1400 void DnDFrame::OnPasteMetafile(wxCommandEvent
& WXUNUSED(event
))
1402 if ( !wxTheClipboard
->Open() )
1404 wxLogError(_T("Can't open clipboard."));
1409 if ( !wxTheClipboard
->IsSupported(wxDF_METAFILE
) )
1411 wxLogWarning(_T("No metafile on clipboard"));
1415 wxMetaFileDataObject data
;
1416 if ( !wxTheClipboard
->GetData(data
) )
1418 wxLogError(_T("Can't paste metafile from the clipboard"));
1422 const wxMetaFile
& mf
= data
.GetMetafile();
1424 wxLogMessage(_T("Metafile %dx%d pasted from the clipboard"),
1425 mf
.GetWidth(), mf
.GetHeight());
1431 wxTheClipboard
->Close();
1434 #endif // wxUSE_METAFILE
1436 // ----------------------------------------------------------------------------
1438 // ----------------------------------------------------------------------------
1440 void DnDFrame::OnCopyFiles(wxCommandEvent
& WXUNUSED(event
))
1443 wxFileDialog
dialog(this, _T("Select a file to copy"), wxEmptyString
, wxEmptyString
,
1444 _T("All files (*.*)|*.*"), 0);
1446 wxArrayString filenames
;
1447 while ( dialog
.ShowModal() == wxID_OK
)
1449 filenames
.Add(dialog
.GetPath());
1452 if ( !filenames
.IsEmpty() )
1454 wxFileDataObject
*dobj
= new wxFileDataObject
;
1455 size_t count
= filenames
.GetCount();
1456 for ( size_t n
= 0; n
< count
; n
++ )
1458 dobj
->AddFile(filenames
[n
]);
1461 wxClipboardLocker locker
;
1464 wxLogError(wxT("Can't open clipboard"));
1468 if ( !wxTheClipboard
->AddData(dobj
) )
1470 wxLogError(wxT("Can't copy file(s) to the clipboard"));
1474 wxLogStatus(this, wxT("%d file%s copied to the clipboard"),
1475 count
, count
== 1 ? wxEmptyString
: wxEmptyString
);
1481 wxLogStatus(this, wxT("Aborted"));
1484 wxLogError(wxT("Sorry, not implemented"));
1488 // ---------------------------------------------------------------------------
1490 // ---------------------------------------------------------------------------
1492 void DnDFrame::OnCopy(wxCommandEvent
& WXUNUSED(event
))
1494 if ( !wxTheClipboard
->Open() )
1496 wxLogError(_T("Can't open clipboard."));
1501 if ( !wxTheClipboard
->AddData(new wxTextDataObject(m_strText
)) )
1503 wxLogError(_T("Can't copy data to the clipboard"));
1507 wxLogMessage(_T("Text '%s' put on the clipboard"), m_strText
.c_str());
1510 wxTheClipboard
->Close();
1513 void DnDFrame::OnPaste(wxCommandEvent
& WXUNUSED(event
))
1515 if ( !wxTheClipboard
->Open() )
1517 wxLogError(_T("Can't open clipboard."));
1522 if ( !wxTheClipboard
->IsSupported(wxDF_TEXT
) )
1524 wxLogWarning(_T("No text data on clipboard"));
1526 wxTheClipboard
->Close();
1530 wxTextDataObject text
;
1531 if ( !wxTheClipboard
->GetData(text
) )
1533 wxLogError(_T("Can't paste data from the clipboard"));
1537 wxLogMessage(_T("Text '%s' pasted from the clipboard"),
1538 text
.GetText().c_str());
1541 wxTheClipboard
->Close();
1544 #if wxUSE_DRAG_AND_DROP
1546 // ----------------------------------------------------------------------------
1547 // Notifications called by the base class
1548 // ----------------------------------------------------------------------------
1550 bool DnDText::OnDropText(wxCoord
, wxCoord
, const wxString
& text
)
1552 m_pOwner
->Append(text
);
1557 bool DnDFile::OnDropFiles(wxCoord
, wxCoord
, const wxArrayString
& filenames
)
1559 size_t nFiles
= filenames
.GetCount();
1561 str
.Printf( _T("%d files dropped"), (int)nFiles
);
1563 if (m_pOwner
!= NULL
)
1565 m_pOwner
->Append(str
);
1566 for ( size_t n
= 0; n
< nFiles
; n
++ )
1567 m_pOwner
->Append(filenames
[n
]);
1573 // ----------------------------------------------------------------------------
1575 // ----------------------------------------------------------------------------
1577 DnDShapeDialog::DnDShapeDialog(wxFrame
*parent
, DnDShape
*shape
)
1578 :wxDialog( parent
, 6001, wxT("Choose Shape"), wxPoint( 10, 10 ),
1580 wxDEFAULT_DIALOG_STYLE
| wxRAISED_BORDER
| wxRESIZE_BORDER
)
1583 wxBoxSizer
* topSizer
= new wxBoxSizer( wxVERTICAL
);
1586 wxBoxSizer
* shapesSizer
= new wxBoxSizer( wxHORIZONTAL
);
1587 const wxString choices
[] = { wxT("None"), wxT("Triangle"),
1588 wxT("Rectangle"), wxT("Ellipse") };
1590 m_radio
= new wxRadioBox( this, wxID_ANY
, wxT("&Shape"),
1591 wxDefaultPosition
, wxDefaultSize
, 4, choices
, 4,
1592 wxRA_SPECIFY_COLS
);
1593 shapesSizer
->Add( m_radio
, 0, wxGROW
|wxALL
, 5 );
1594 topSizer
->Add( shapesSizer
, 0, wxALL
, 2 );
1597 wxStaticBox
* box
= new wxStaticBox( this, wxID_ANY
, wxT("&Attributes") );
1598 wxStaticBoxSizer
* attrSizer
= new wxStaticBoxSizer( box
, wxHORIZONTAL
);
1599 wxFlexGridSizer
* xywhSizer
= new wxFlexGridSizer( 4, 2 );
1603 st
= new wxStaticText( this, wxID_ANY
, wxT("Position &X:") );
1604 m_textX
= new wxTextCtrl( this, wxID_ANY
, wxEmptyString
, wxDefaultPosition
,
1606 xywhSizer
->Add( st
, 1, wxGROW
|wxALL
, 2 );
1607 xywhSizer
->Add( m_textX
, 1, wxGROW
|wxALL
, 2 );
1609 st
= new wxStaticText( this, wxID_ANY
, wxT("Size &width:") );
1610 m_textW
= new wxTextCtrl( this, wxID_ANY
, wxEmptyString
, wxDefaultPosition
,
1612 xywhSizer
->Add( st
, 1, wxGROW
|wxALL
, 2 );
1613 xywhSizer
->Add( m_textW
, 1, wxGROW
|wxALL
, 2 );
1615 st
= new wxStaticText( this, wxID_ANY
, wxT("&Y:") );
1616 m_textY
= new wxTextCtrl( this, wxID_ANY
, wxEmptyString
, wxDefaultPosition
,
1618 xywhSizer
->Add( st
, 1, wxALL
|wxALIGN_RIGHT
, 2 );
1619 xywhSizer
->Add( m_textY
, 1, wxGROW
|wxALL
, 2 );
1621 st
= new wxStaticText( this, wxID_ANY
, wxT("&height:") );
1622 m_textH
= new wxTextCtrl( this, wxID_ANY
, wxEmptyString
, wxDefaultPosition
,
1624 xywhSizer
->Add( st
, 1, wxALL
|wxALIGN_RIGHT
, 2 );
1625 xywhSizer
->Add( m_textH
, 1, wxGROW
|wxALL
, 2 );
1627 wxButton
* col
= new wxButton( this, Button_Colour
, wxT("&Colour...") );
1628 attrSizer
->Add( xywhSizer
, 1, wxGROW
);
1629 attrSizer
->Add( col
, 0, wxALL
|wxALIGN_CENTRE_VERTICAL
, 2 );
1630 topSizer
->Add( attrSizer
, 0, wxGROW
|wxALL
, 5 );
1633 wxBoxSizer
* buttonSizer
= new wxBoxSizer( wxHORIZONTAL
);
1635 bt
= new wxButton( this, wxID_OK
, wxT("Ok") );
1636 buttonSizer
->Add( bt
, 0, wxALL
, 2 );
1637 bt
= new wxButton( this, wxID_CANCEL
, wxT("Cancel") );
1638 buttonSizer
->Add( bt
, 0, wxALL
, 2 );
1639 topSizer
->Add( buttonSizer
, 0, wxALL
|wxALIGN_RIGHT
, 2 );
1641 SetSizerAndFit( topSizer
);
1644 DnDShape
*DnDShapeDialog::GetShape() const
1646 switch ( m_shapeKind
)
1649 case DnDShape::None
: return NULL
;
1650 case DnDShape::Triangle
: return new DnDTriangularShape(m_pos
, m_size
, m_col
);
1651 case DnDShape::Rectangle
: return new DnDRectangularShape(m_pos
, m_size
, m_col
);
1652 case DnDShape::Ellipse
: return new DnDEllipticShape(m_pos
, m_size
, m_col
);
1656 bool DnDShapeDialog::TransferDataToWindow()
1661 m_radio
->SetSelection(m_shape
->GetKind());
1662 m_pos
= m_shape
->GetPosition();
1663 m_size
= m_shape
->GetSize();
1664 m_col
= m_shape
->GetColour();
1668 m_radio
->SetSelection(DnDShape::None
);
1669 m_pos
= wxPoint(1, 1);
1670 m_size
= wxSize(100, 100);
1673 m_textX
->SetValue(wxString() << m_pos
.x
);
1674 m_textY
->SetValue(wxString() << m_pos
.y
);
1675 m_textW
->SetValue(wxString() << m_size
.x
);
1676 m_textH
->SetValue(wxString() << m_size
.y
);
1681 bool DnDShapeDialog::TransferDataFromWindow()
1683 m_shapeKind
= (DnDShape::Kind
)m_radio
->GetSelection();
1685 m_pos
.x
= wxAtoi(m_textX
->GetValue());
1686 m_pos
.y
= wxAtoi(m_textY
->GetValue());
1687 m_size
.x
= wxAtoi(m_textW
->GetValue());
1688 m_size
.y
= wxAtoi(m_textH
->GetValue());
1690 if ( !m_pos
.x
|| !m_pos
.y
|| !m_size
.x
|| !m_size
.y
)
1692 wxMessageBox(_T("All sizes and positions should be non null!"),
1693 _T("Invalid shape"), wxICON_HAND
| wxOK
, this);
1701 void DnDShapeDialog::OnColour(wxCommandEvent
& WXUNUSED(event
))
1704 data
.SetChooseFull(true);
1705 for (int i
= 0; i
< 16; i
++)
1707 wxColour
colour((unsigned char)(i
*16), (unsigned char)(i
*16), (unsigned char)(i
*16));
1708 data
.SetCustomColour(i
, colour
);
1711 wxColourDialog
dialog(this, &data
);
1712 if ( dialog
.ShowModal() == wxID_OK
)
1714 m_col
= dialog
.GetColourData().GetColour();
1718 // ----------------------------------------------------------------------------
1720 // ----------------------------------------------------------------------------
1722 DnDShapeFrame
*DnDShapeFrame::ms_lastDropTarget
= NULL
;
1724 DnDShapeFrame::DnDShapeFrame(wxFrame
*parent
)
1725 : wxFrame(parent
, wxID_ANY
, _T("Shape Frame"))
1729 #endif // wxUSE_STATUSBAR
1731 wxMenu
*menuShape
= new wxMenu
;
1732 menuShape
->Append(Menu_Shape_New
, _T("&New default shape\tCtrl-S"));
1733 menuShape
->Append(Menu_Shape_Edit
, _T("&Edit shape\tCtrl-E"));
1734 menuShape
->AppendSeparator();
1735 menuShape
->Append(Menu_Shape_Clear
, _T("&Clear shape\tCtrl-L"));
1737 wxMenu
*menuClipboard
= new wxMenu
;
1738 menuClipboard
->Append(Menu_ShapeClipboard_Copy
, _T("&Copy\tCtrl-C"));
1739 menuClipboard
->Append(Menu_ShapeClipboard_Paste
, _T("&Paste\tCtrl-V"));
1741 wxMenuBar
*menubar
= new wxMenuBar
;
1742 menubar
->Append(menuShape
, _T("&Shape"));
1743 menubar
->Append(menuClipboard
, _T("&Clipboard"));
1745 SetMenuBar(menubar
);
1748 SetStatusText(_T("Press Ctrl-S to create a new shape"));
1749 #endif // wxUSE_STATUSBAR
1751 SetDropTarget(new DnDShapeDropTarget(this));
1755 SetBackgroundColour(*wxWHITE
);
1758 DnDShapeFrame::~DnDShapeFrame()
1764 void DnDShapeFrame::SetShape(DnDShape
*shape
)
1773 void DnDShapeFrame::OnDrag(wxMouseEvent
& event
)
1782 // start drag operation
1783 DnDShapeDataObject
shapeData(m_shape
);
1784 wxDropSource
source(shapeData
, this);
1786 const wxChar
*pc
= NULL
;
1787 switch ( source
.DoDragDrop(true) )
1791 wxLogError(wxT("An error occurred during drag and drop operation"));
1796 SetStatusText(_T("Nothing happened"));
1797 #endif // wxUSE_STATUSBAR
1806 if ( ms_lastDropTarget
!= this )
1808 // don't delete the shape if we dropped it on ourselves!
1815 SetStatusText(_T("Drag and drop operation cancelled"));
1816 #endif // wxUSE_STATUSBAR
1823 SetStatusText(wxString(_T("Shape successfully ")) + pc
);
1824 #endif // wxUSE_STATUSBAR
1826 //else: status text already set
1829 void DnDShapeFrame::OnDrop(wxCoord x
, wxCoord y
, DnDShape
*shape
)
1831 ms_lastDropTarget
= this;
1837 s
.Printf(wxT("Shape dropped at (%d, %d)"), pt
.x
, pt
.y
);
1839 #endif // wxUSE_STATUSBAR
1845 void DnDShapeFrame::OnEditShape(wxCommandEvent
& WXUNUSED(event
))
1847 DnDShapeDialog
dlg(this, m_shape
);
1848 if ( dlg
.ShowModal() == wxID_OK
)
1850 SetShape(dlg
.GetShape());
1855 SetStatusText(_T("You can now drag the shape to another frame"));
1857 #endif // wxUSE_STATUSBAR
1861 void DnDShapeFrame::OnNewShape(wxCommandEvent
& WXUNUSED(event
))
1863 SetShape(new DnDEllipticShape(wxPoint(10, 10), wxSize(80, 60), *wxRED
));
1866 SetStatusText(_T("You can now drag the shape to another frame"));
1867 #endif // wxUSE_STATUSBAR
1870 void DnDShapeFrame::OnClearShape(wxCommandEvent
& WXUNUSED(event
))
1875 void DnDShapeFrame::OnCopyShape(wxCommandEvent
& WXUNUSED(event
))
1879 wxClipboardLocker clipLocker
;
1882 wxLogError(wxT("Can't open the clipboard"));
1887 wxTheClipboard
->AddData(new DnDShapeDataObject(m_shape
));
1891 void DnDShapeFrame::OnPasteShape(wxCommandEvent
& WXUNUSED(event
))
1893 wxClipboardLocker clipLocker
;
1896 wxLogError(wxT("Can't open the clipboard"));
1901 DnDShapeDataObject
shapeDataObject(NULL
);
1902 if ( wxTheClipboard
->GetData(shapeDataObject
) )
1904 SetShape(shapeDataObject
.GetShape());
1908 wxLogStatus(wxT("No shape on the clipboard"));
1912 void DnDShapeFrame::OnUpdateUICopy(wxUpdateUIEvent
& event
)
1914 event
.Enable( m_shape
!= NULL
);
1917 void DnDShapeFrame::OnUpdateUIPaste(wxUpdateUIEvent
& event
)
1919 event
.Enable( wxTheClipboard
->IsSupported(wxDataFormat(shapeFormatId
)) );
1922 void DnDShapeFrame::OnPaint(wxPaintEvent
& event
)
1936 // ----------------------------------------------------------------------------
1938 // ----------------------------------------------------------------------------
1940 DnDShape
*DnDShape::New(const void *buf
)
1942 const ShapeDump
& dump
= *(const ShapeDump
*)buf
;
1946 return new DnDTriangularShape(wxPoint(dump
.x
, dump
.y
),
1947 wxSize(dump
.w
, dump
.h
),
1948 wxColour(dump
.r
, dump
.g
, dump
.b
));
1951 return new DnDRectangularShape(wxPoint(dump
.x
, dump
.y
),
1952 wxSize(dump
.w
, dump
.h
),
1953 wxColour(dump
.r
, dump
.g
, dump
.b
));
1956 return new DnDEllipticShape(wxPoint(dump
.x
, dump
.y
),
1957 wxSize(dump
.w
, dump
.h
),
1958 wxColour(dump
.r
, dump
.g
, dump
.b
));
1961 wxFAIL_MSG(wxT("invalid shape!"));
1966 // ----------------------------------------------------------------------------
1967 // DnDShapeDataObject
1968 // ----------------------------------------------------------------------------
1972 void DnDShapeDataObject::CreateMetaFile() const
1974 wxPoint pos
= m_shape
->GetPosition();
1975 wxSize size
= m_shape
->GetSize();
1977 wxMetaFileDC
dcMF(wxEmptyString
, pos
.x
+ size
.x
, pos
.y
+ size
.y
);
1979 m_shape
->Draw(dcMF
);
1981 wxMetafile
*mf
= dcMF
.Close();
1983 DnDShapeDataObject
*self
= (DnDShapeDataObject
*)this; // const_cast
1984 self
->m_dobjMetaFile
.SetMetafile(*mf
);
1985 self
->m_hasMetaFile
= true;
1990 #endif // wxUSE_METAFILE
1992 void DnDShapeDataObject::CreateBitmap() const
1994 wxPoint pos
= m_shape
->GetPosition();
1995 wxSize size
= m_shape
->GetSize();
1996 int x
= pos
.x
+ size
.x
,
1998 wxBitmap
bitmap(x
, y
);
2000 dc
.SelectObject(bitmap
);
2001 dc
.SetBrush(wxBrush(wxT("white"), wxSOLID
));
2004 dc
.SelectObject(wxNullBitmap
);
2006 DnDShapeDataObject
*self
= (DnDShapeDataObject
*)this; // const_cast
2007 self
->m_dobjBitmap
.SetBitmap(bitmap
);
2008 self
->m_hasBitmap
= true;
2011 #endif // wxUSE_DRAG_AND_DROP
2013 // ----------------------------------------------------------------------------
2015 // ----------------------------------------------------------------------------
2017 static void ShowBitmap(const wxBitmap
& bitmap
)
2019 wxFrame
*frame
= new wxFrame(NULL
, wxID_ANY
, _T("Bitmap view"));
2021 frame
->CreateStatusBar();
2022 #endif // wxUSE_STATUSBAR
2023 DnDCanvasBitmap
*canvas
= new DnDCanvasBitmap(frame
);
2024 canvas
->SetBitmap(bitmap
);
2026 int w
= bitmap
.GetWidth(),
2027 h
= bitmap
.GetHeight();
2029 frame
->SetStatusText(wxString::Format(_T("%dx%d"), w
, h
));
2030 #endif // wxUSE_STATUSBAR
2032 frame
->SetClientSize(w
> 100 ? 100 : w
, h
> 100 ? 100 : h
);
2038 static void ShowMetaFile(const wxMetaFile
& metafile
)
2040 wxFrame
*frame
= new wxFrame(NULL
, wxID_ANY
, _T("Metafile view"));
2041 frame
->CreateStatusBar();
2042 DnDCanvasMetafile
*canvas
= new DnDCanvasMetafile(frame
);
2043 canvas
->SetMetafile(metafile
);
2045 wxSize size
= metafile
.GetSize();
2046 frame
->SetStatusText(wxString::Format(_T("%dx%d"), size
.x
, size
.y
));
2048 frame
->SetClientSize(size
.x
> 100 ? 100 : size
.x
,
2049 size
.y
> 100 ? 100 : size
.y
);
2053 #endif // wxUSE_METAFILE
2055 #endif // wxUSE_DRAG_AND_DROP || wxUSE_CLIPBOARD