+
+#if wxUSE_DRAG_AND_DROP
+
+DnDFrame::DnDFrame(wxFrame *frame, wxChar *title, int x, int y, int w, int h)
+ : wxFrame(frame, -1, title, wxPoint(x, y), wxSize(w, h)),
+ m_strText(_T("wxWindows drag & drop works :-)"))
+
+{
+ // frame icon and status bar
+ SetIcon(wxICON(mondrian));
+
+ CreateStatusBar();
+
+ // construct menu
+ wxMenu *file_menu = new wxMenu;
+ file_menu->Append(Menu_Drag, _T("&Test drag..."));
+ file_menu->AppendCheckItem(Menu_DragMoveDef, _T("&Move by default"));
+ file_menu->AppendCheckItem(Menu_DragMoveAllow, _T("&Allow moving"));
+ file_menu->AppendSeparator();
+ file_menu->Append(Menu_NewFrame, _T("&New frame\tCtrl-N"));
+ file_menu->AppendSeparator();
+ file_menu->Append(Menu_Quit, _T("E&xit\tCtrl-Q"));
+
+ wxMenu *log_menu = new wxMenu;
+ log_menu->Append(Menu_Clear, _T("Clear\tCtrl-L"));
+
+ wxMenu *help_menu = new wxMenu;
+ help_menu->Append(Menu_Help, _T("&Help..."));
+ help_menu->AppendSeparator();
+ help_menu->Append(Menu_About, _T("&About"));
+
+ wxMenu *clip_menu = new wxMenu;
+ clip_menu->Append(Menu_Copy, _T("&Copy text\tCtrl-C"));
+ clip_menu->Append(Menu_Paste, _T("&Paste text\tCtrl-V"));
+ clip_menu->AppendSeparator();
+ clip_menu->Append(Menu_CopyBitmap, _T("Copy &bitmap\tCtrl-Shift-C"));
+ clip_menu->Append(Menu_PasteBitmap, _T("Paste b&itmap\tCtrl-Shift-V"));
+#if wxUSE_METAFILES
+ clip_menu->AppendSeparator();
+ clip_menu->Append(Menu_PasteMFile, _T("Paste &metafile\tCtrl-M"));
+#endif // wxUSE_METAFILES
+ clip_menu->AppendSeparator();
+ clip_menu->Append(Menu_CopyFiles, _T("Copy &files\tCtrl-F"));
+
+ wxMenuBar *menu_bar = new wxMenuBar;
+ menu_bar->Append(file_menu, _T("&File"));
+ menu_bar->Append(log_menu, _T("&Log"));
+ menu_bar->Append(clip_menu, _T("&Clipboard"));
+ menu_bar->Append(help_menu, _T("&Help"));
+
+ SetMenuBar(menu_bar);
+
+ // make a panel with 3 subwindows
+ wxPoint pos(0, 0);
+ wxSize size(400, 200);
+
+ wxString strFile(_T("Drop files here!")), strText(_T("Drop text on me"));
+
+ m_ctrlFile = new wxListBox(this, -1, pos, size, 1, &strFile,
+ wxLB_HSCROLL | wxLB_ALWAYS_SB );
+ m_ctrlText = new wxListBox(this, -1, pos, size, 1, &strText,
+ wxLB_HSCROLL | wxLB_ALWAYS_SB );
+
+ m_ctrlLog = new wxTextCtrl(this, -1, _T(""), pos, size,
+ wxTE_MULTILINE | wxTE_READONLY |
+ wxSUNKEN_BORDER );
+
+ // redirect log messages to the text window
+ m_pLog = new wxLogTextCtrl(m_ctrlLog);
+ m_pLogPrev = wxLog::SetActiveTarget(m_pLog);
+
+ // associate drop targets with the controls
+ m_ctrlFile->SetDropTarget(new DnDFile(m_ctrlFile));
+ m_ctrlText->SetDropTarget(new DnDText(m_ctrlText));
+ m_ctrlLog->SetDropTarget(new URLDropTarget);
+
+ wxLayoutConstraints *c;
+
+ // Top-left listbox
+ c = new wxLayoutConstraints;
+ c->left.SameAs(this, wxLeft);
+ c->top.SameAs(this, wxTop);
+ c->right.PercentOf(this, wxRight, 50);
+ c->height.PercentOf(this, wxHeight, 30);
+ m_ctrlFile->SetConstraints(c);
+
+ // Top-right listbox
+ c = new wxLayoutConstraints;
+ c->left.SameAs (m_ctrlFile, wxRight);
+ c->top.SameAs (this, wxTop);
+ c->right.SameAs (this, wxRight);
+ c->height.PercentOf(this, wxHeight, 30);
+ m_ctrlText->SetConstraints(c);
+
+ // Lower text control
+ c = new wxLayoutConstraints;
+ c->left.SameAs (this, wxLeft);
+ c->right.SameAs (this, wxRight);
+ c->height.PercentOf(this, wxHeight, 50);
+ c->top.SameAs(m_ctrlText, wxBottom);
+ m_ctrlLog->SetConstraints(c);
+
+ SetAutoLayout(TRUE);
+
+ // copy data by default but allow moving it as well
+ m_moveByDefault = FALSE;
+ m_moveAllow = TRUE;
+ menu_bar->Check(Menu_DragMoveAllow, TRUE);
+}
+
+void DnDFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
+{
+ Close(TRUE);
+}
+
+void DnDFrame::OnSize(wxSizeEvent& event)
+{
+ Refresh();
+
+ event.Skip();
+}
+
+void DnDFrame::OnPaint(wxPaintEvent& WXUNUSED(event))
+{
+ int w = 0;
+ int h = 0;
+ GetClientSize( &w, &h );
+
+ wxPaintDC dc(this);
+ // dc.Clear(); -- this kills wxGTK
+ dc.SetFont( wxFont( 24, wxDECORATIVE, wxNORMAL, wxNORMAL, FALSE, _T("charter") ) );
+ dc.DrawText( _T("Drag text from here!"), 100, h-50 );
+}
+
+void DnDFrame::OnUpdateUIMoveByDefault(wxUpdateUIEvent& event)
+{
+ // only can move by default if moving is allowed at all
+ event.Enable(m_moveAllow);
+}
+
+void DnDFrame::OnUpdateUIPasteText(wxUpdateUIEvent& event)
+{
+#ifdef __WXDEBUG__
+ // too many trace messages if we don't do it - this function is called
+ // very often
+ wxLogNull nolog;
+#endif
+
+ event.Enable( wxTheClipboard->IsSupported(wxDF_TEXT) );
+}
+
+void DnDFrame::OnUpdateUIPasteBitmap(wxUpdateUIEvent& event)
+{
+#ifdef __WXDEBUG__
+ // too many trace messages if we don't do it - this function is called
+ // very often
+ wxLogNull nolog;
+#endif
+
+ event.Enable( wxTheClipboard->IsSupported(wxDF_BITMAP) );
+}
+
+void DnDFrame::OnNewFrame(wxCommandEvent& WXUNUSED(event))
+{
+ (new DnDShapeFrame(this))->Show(TRUE);
+
+ wxLogStatus(this, wxT("Double click the new frame to select a shape for it"));
+}
+
+void DnDFrame::OnDrag(wxCommandEvent& WXUNUSED(event))
+{
+ wxString strText = wxGetTextFromUser
+ (
+ _T("After you enter text in this dialog, press any mouse\n")
+ _T("button in the bottom (empty) part of the frame and \n")
+ _T("drag it anywhere - you will be in fact dragging the\n")
+ _T("text object containing this text"),
+ _T("Please enter some text"), m_strText, this
+ );
+
+ m_strText = strText;
+}
+
+void DnDFrame::OnDragMoveByDefault(wxCommandEvent& event)
+{
+ m_moveByDefault = event.IsChecked();
+}
+
+void DnDFrame::OnDragMoveAllow(wxCommandEvent& event)
+{
+ m_moveAllow = event.IsChecked();
+}
+
+void DnDFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
+{
+ wxMessageBox(_T("Drag-&-Drop Demo\n")
+ _T("Please see \"Help|Help...\" for details\n")
+ _T("Copyright (c) 1998 Vadim Zeitlin"),
+ _T("About wxDnD"),
+ wxICON_INFORMATION | wxOK,
+ this);
+}
+
+void DnDFrame::OnHelp(wxCommandEvent& /* event */)
+{
+ wxMessageDialog dialog(this,
+ _T("This small program demonstrates drag & drop support in wxWindows. The program window\n")
+ _T("consists of 3 parts: the bottom pane is for debug messages, so that you can see what's\n")
+ _T("going on inside. The top part is split into 2 listboxes, the left one accepts files\n")
+ _T("and the right one accepts text.\n")
+ _T("\n")
+ _T("To test wxDropTarget: open wordpad (write.exe), select some text in it and drag it to\n")
+ _T("the right listbox (you'll notice the usual visual feedback, i.e. the cursor will change).\n")
+ _T("Also, try dragging some files (you can select several at once) from Windows Explorer (or \n")
+ _T("File Manager) to the left pane. Hold down Ctrl/Shift keys when you drop text (doesn't \n")
+ _T("work with files) and see what changes.\n")
+ _T("\n")
+ _T("To test wxDropSource: just press any mouse button on the empty zone of the window and drag\n")
+ _T("it to wordpad or any other droptarget accepting text (and of course you can just drag it\n")
+ _T("to the right pane). Due to a lot of trace messages, the cursor might take some time to \n")
+ _T("change, don't release the mouse button until it does. You can change the string being\n")
+ _T("dragged in in \"File|Test drag...\" dialog.\n")
+ _T("\n")
+ _T("\n")
+ _T("Please send all questions/bug reports/suggestions &c to \n")
+ _T("Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>"),
+ _T("wxDnD Help"));
+
+ dialog.ShowModal();
+}
+
+void DnDFrame::OnLogClear(wxCommandEvent& /* event */ )
+{
+ m_ctrlLog->Clear();
+ m_ctrlText->Clear();
+ m_ctrlFile->Clear();
+}
+
+void DnDFrame::OnLeftDown(wxMouseEvent &WXUNUSED(event) )
+{
+ if ( !m_strText.IsEmpty() )
+ {
+ // start drag operation
+ wxTextDataObject textData(m_strText);
+/*
+ wxFileDataObject textData;
+ textData.AddFile( "/file1.txt" );
+ textData.AddFile( "/file2.txt" );
+*/
+ wxDropSource source(textData, this,
+ wxDROP_ICON(dnd_copy),
+ wxDROP_ICON(dnd_move),
+ wxDROP_ICON(dnd_none));
+
+ int flags = 0;
+ if ( m_moveByDefault )
+ flags |= wxDrag_DefaultMove;
+ else if ( m_moveAllow )
+ flags |= wxDrag_AllowMove;
+
+ const wxChar *pc;
+ switch ( source.DoDragDrop(flags) )
+ {
+ case wxDragError: pc = _T("Error!"); break;
+ case wxDragNone: pc = _T("Nothing"); break;
+ case wxDragCopy: pc = _T("Copied"); break;
+ case wxDragMove: pc = _T("Moved"); break;
+ case wxDragCancel: pc = _T("Cancelled"); break;
+ default: pc = _T("Huh?"); break;
+ }
+
+ SetStatusText(wxString(_T("Drag result: ")) + pc);
+ }
+}
+
+void DnDFrame::OnRightDown(wxMouseEvent &event )
+{
+ wxMenu menu(_T("Dnd sample menu"));
+
+ menu.Append(Menu_Drag, _T("&Test drag..."));
+ menu.AppendSeparator();
+ menu.Append(Menu_About, _T("&About"));
+
+ PopupMenu( &menu, event.GetX(), event.GetY() );
+}
+
+DnDFrame::~DnDFrame()
+{
+ if ( m_pLog != NULL ) {
+ if ( wxLog::SetActiveTarget(m_pLogPrev) == m_pLog )
+ delete m_pLog;
+ }
+}
+
+// ---------------------------------------------------------------------------
+// bitmap clipboard
+// ---------------------------------------------------------------------------
+
+void DnDFrame::OnCopyBitmap(wxCommandEvent& WXUNUSED(event))
+{
+ // PNG support is not always compiled in under Windows, so use BMP there
+#if wxUSE_LIBPNG
+ wxFileDialog dialog(this, _T("Open a PNG file"), _T(""), _T(""), _T("PNG files (*.png)|*.png"), 0);
+#else
+ wxFileDialog dialog(this, _T("Open a BMP file"), _T(""), _T(""), _T("BMP files (*.bmp)|*.bmp"), 0);
+#endif
+
+ if (dialog.ShowModal() != wxID_OK)
+ {
+ wxLogMessage( _T("Aborted file open") );
+ return;
+ }
+
+ if (dialog.GetPath().IsEmpty())
+ {
+ wxLogMessage( _T("Returned empty string.") );
+ return;
+ }
+
+ if (!wxFileExists(dialog.GetPath()))
+ {
+ wxLogMessage( _T("File doesn't exist.") );
+ return;
+ }
+
+ wxImage image;
+ image.LoadFile( dialog.GetPath(),
+#if wxUSE_LIBPNG
+ wxBITMAP_TYPE_PNG
+#else
+ wxBITMAP_TYPE_BMP
+#endif
+ );
+ if (!image.Ok())
+ {
+ wxLogError( _T("Invalid image file...") );
+ return;
+ }
+
+ wxLogStatus( _T("Decoding image file...") );
+ wxYield();
+
+ wxBitmap bitmap( image );
+
+ if ( !wxTheClipboard->Open() )
+ {
+ wxLogError(_T("Can't open clipboard."));
+
+ return;
+ }
+
+ wxLogMessage( _T("Creating wxBitmapDataObject...") );
+ wxYield();
+
+ if ( !wxTheClipboard->AddData(new wxBitmapDataObject(bitmap)) )
+ {
+ wxLogError(_T("Can't copy image to the clipboard."));
+ }
+ else
+ {
+ wxLogMessage(_T("Image has been put on the clipboard.") );
+ wxLogMessage(_T("You can paste it now and look at it.") );
+ }
+
+ wxTheClipboard->Close();
+}
+
+void DnDFrame::OnPasteBitmap(wxCommandEvent& WXUNUSED(event))
+{
+ if ( !wxTheClipboard->Open() )
+ {
+ wxLogError(_T("Can't open clipboard."));
+
+ return;
+ }
+
+ if ( !wxTheClipboard->IsSupported(wxDF_BITMAP) )
+ {
+ wxLogWarning(_T("No bitmap on clipboard"));
+
+ wxTheClipboard->Close();
+ return;
+ }
+
+ wxBitmapDataObject data;
+ if ( !wxTheClipboard->GetData(data) )
+ {
+ wxLogError(_T("Can't paste bitmap from the clipboard"));
+ }
+ else
+ {
+ const wxBitmap& bmp = data.GetBitmap();
+
+ wxLogMessage(_T("Bitmap %dx%d pasted from the clipboard"),
+ bmp.GetWidth(), bmp.GetHeight());
+ ShowBitmap(bmp);
+ }
+
+ wxTheClipboard->Close();
+}
+
+#if wxUSE_METAFILES
+
+void DnDFrame::OnPasteMetafile(wxCommandEvent& WXUNUSED(event))
+{
+ if ( !wxTheClipboard->Open() )
+ {
+ wxLogError(_T("Can't open clipboard."));
+
+ return;
+ }
+
+ if ( !wxTheClipboard->IsSupported(wxDF_METAFILE) )
+ {
+ wxLogWarning(_T("No metafile on clipboard"));
+ }
+ else
+ {
+ wxMetaFileDataObject data;
+ if ( !wxTheClipboard->GetData(data) )
+ {
+ wxLogError(_T("Can't paste metafile from the clipboard"));
+ }
+ else
+ {
+ const wxMetaFile& mf = data.GetMetafile();
+
+ wxLogMessage(_T("Metafile %dx%d pasted from the clipboard"),
+ mf.GetWidth(), mf.GetHeight());
+
+ ShowMetaFile(mf);
+ }
+ }
+
+ wxTheClipboard->Close();
+}
+
+#endif // wxUSE_METAFILES
+
+// ----------------------------------------------------------------------------
+// file clipboard
+// ----------------------------------------------------------------------------
+
+void DnDFrame::OnCopyFiles(wxCommandEvent& WXUNUSED(event))
+{
+#ifdef __WXMSW__
+ wxFileDialog dialog(this, _T("Select a file to copy"), _T(""), _T(""),
+ _T("All files (*.*)|*.*"), 0);
+
+ wxArrayString filenames;
+ while ( dialog.ShowModal() == wxID_OK )
+ {
+ filenames.Add(dialog.GetPath());
+ }
+
+ if ( !filenames.IsEmpty() )
+ {
+ wxFileDataObject *dobj = new wxFileDataObject;
+ size_t count = filenames.GetCount();
+ for ( size_t n = 0; n < count; n++ )
+ {
+ dobj->AddFile(filenames[n]);
+ }
+
+ wxClipboardLocker locker;
+ if ( !locker )
+ {
+ wxLogError(wxT("Can't open clipboard"));
+ }
+ else
+ {
+ if ( !wxTheClipboard->AddData(dobj) )
+ {
+ wxLogError(wxT("Can't copy file(s) to the clipboard"));
+ }
+ else
+ {
+ wxLogStatus(this, wxT("%d file%s copied to the clipboard"),
+ count, count == 1 ? wxT("") : wxT("s"));
+ }
+ }
+ }
+ else
+ {
+ wxLogStatus(this, wxT("Aborted"));
+ }
+#else // !MSW
+ wxLogError(wxT("Sorry, not implemented"));
+#endif // MSW/!MSW
+}
+
+// ---------------------------------------------------------------------------
+// text clipboard
+// ---------------------------------------------------------------------------
+
+void DnDFrame::OnCopy(wxCommandEvent& WXUNUSED(event))
+{
+ if ( !wxTheClipboard->Open() )
+ {
+ wxLogError(_T("Can't open clipboard."));
+
+ return;
+ }
+
+ if ( !wxTheClipboard->AddData(new wxTextDataObject(m_strText)) )
+ {
+ wxLogError(_T("Can't copy data to the clipboard"));
+ }
+ else
+ {
+ wxLogMessage(_T("Text '%s' put on the clipboard"), m_strText.c_str());
+ }
+
+ wxTheClipboard->Close();
+}
+
+void DnDFrame::OnPaste(wxCommandEvent& WXUNUSED(event))
+{
+ if ( !wxTheClipboard->Open() )
+ {
+ wxLogError(_T("Can't open clipboard."));
+
+ return;
+ }
+
+ if ( !wxTheClipboard->IsSupported(wxDF_TEXT) )
+ {
+ wxLogWarning(_T("No text data on clipboard"));
+
+ wxTheClipboard->Close();
+ return;
+ }
+
+ wxTextDataObject text;
+ if ( !wxTheClipboard->GetData(text) )
+ {
+ wxLogError(_T("Can't paste data from the clipboard"));
+ }
+ else
+ {
+ wxLogMessage(_T("Text '%s' pasted from the clipboard"),
+ text.GetText().c_str());
+ }
+
+ wxTheClipboard->Close();
+}
+
+// ----------------------------------------------------------------------------
+// Notifications called by the base class
+// ----------------------------------------------------------------------------
+
+bool DnDText::OnDropText(wxCoord, wxCoord, const wxString& text)
+{
+ m_pOwner->Append(text);
+
+ return TRUE;
+}
+
+bool DnDFile::OnDropFiles(wxCoord, wxCoord, const wxArrayString& filenames)
+{
+ size_t nFiles = filenames.GetCount();
+ wxString str;
+ str.Printf( _T("%d files dropped"), (int)nFiles);
+ m_pOwner->Append(str);
+ for ( size_t n = 0; n < nFiles; n++ ) {
+ m_pOwner->Append(filenames[n]);
+ }
+
+ return TRUE;
+}
+
+// ----------------------------------------------------------------------------
+// DnDShapeDialog
+// ----------------------------------------------------------------------------
+
+DnDShapeDialog::DnDShapeDialog(wxFrame *parent, DnDShape *shape)
+ :wxDialog( parent, 6001, wxT("Choose Shape"), wxPoint( 10, 10 ),
+ wxSize( 40, 40 ),
+ wxRAISED_BORDER|wxCAPTION|wxTHICK_FRAME|wxSYSTEM_MENU )
+{
+ m_shape = shape;
+ wxBoxSizer* topSizer = new wxBoxSizer( wxVERTICAL );
+
+ // radio box
+ wxBoxSizer* shapesSizer = new wxBoxSizer( wxHORIZONTAL );
+ const wxString choices[] = { wxT("None"), wxT("Triangle"),
+ wxT("Rectangle"), wxT("Ellipse") };
+
+ m_radio = new wxRadioBox( this, -1, wxT("&Shape"),
+ wxDefaultPosition, wxDefaultSize, 4, choices, 4,
+ wxRA_SPECIFY_COLS );
+ shapesSizer->Add( m_radio, 0, wxGROW|wxALL, 5 );
+ topSizer->Add( shapesSizer, 0, wxALL, 2 );
+
+ // attributes
+ wxStaticBox* box = new wxStaticBox( this, -1, wxT("&Attributes") );
+ wxStaticBoxSizer* attrSizer = new wxStaticBoxSizer( box, wxHORIZONTAL );
+ wxFlexGridSizer* xywhSizer = new wxFlexGridSizer( 4, 2 );
+
+ wxStaticText* st;
+
+ st = new wxStaticText( this, -1, wxT("Position &X:") );
+ m_textX = new wxTextCtrl( this, -1, wxEmptyString, wxDefaultPosition,
+ wxSize( 30, 20 ) );
+ xywhSizer->Add( st, 1, wxGROW|wxALL, 2 );
+ xywhSizer->Add( m_textX, 1, wxGROW|wxALL, 2 );
+
+ st = new wxStaticText( this, -1, wxT("Size &width:") );
+ m_textW = new wxTextCtrl( this, -1, wxEmptyString, wxDefaultPosition,
+ wxSize( 30, 20 ) );
+ xywhSizer->Add( st, 1, wxGROW|wxALL, 2 );
+ xywhSizer->Add( m_textW, 1, wxGROW|wxALL, 2 );
+
+ st = new wxStaticText( this, -1, wxT("&Y:") );
+ m_textY = new wxTextCtrl( this, -1, wxEmptyString, wxDefaultPosition,
+ wxSize( 30, 20 ) );
+ xywhSizer->Add( st, 1, wxALL|wxALIGN_RIGHT, 2 );
+ xywhSizer->Add( m_textY, 1, wxGROW|wxALL, 2 );
+
+ st = new wxStaticText( this, -1, wxT("&height:") );
+ m_textH = new wxTextCtrl( this, -1, wxEmptyString, wxDefaultPosition,
+ wxSize( 30, 20 ) );
+ xywhSizer->Add( st, 1, wxALL|wxALIGN_RIGHT, 2 );
+ xywhSizer->Add( m_textH, 1, wxGROW|wxALL, 2 );
+
+ wxButton* col = new wxButton( this, Button_Colour, wxT("&Colour...") );
+ attrSizer->Add( xywhSizer, 1, wxGROW );
+ attrSizer->Add( col, 0, wxALL|wxALIGN_CENTRE_VERTICAL, 2 );
+ topSizer->Add( attrSizer, 0, wxGROW|wxALL, 5 );
+
+ // buttons
+ wxBoxSizer* buttonSizer = new wxBoxSizer( wxHORIZONTAL );
+ wxButton* bt;
+ bt = new wxButton( this, wxID_OK, wxT("Ok") );
+ buttonSizer->Add( bt, 0, wxALL, 2 );
+ bt = new wxButton( this, wxID_CANCEL, wxT("Cancel") );
+ buttonSizer->Add( bt, 0, wxALL, 2 );
+ topSizer->Add( buttonSizer, 0, wxALL|wxALIGN_RIGHT, 2 );
+
+ SetAutoLayout( TRUE );
+ SetSizer( topSizer );
+ topSizer->Fit( this );
+}
+
+DnDShape *DnDShapeDialog::GetShape() const
+{
+ switch ( m_shapeKind )
+ {
+ default:
+ case DnDShape::None: return NULL;
+ case DnDShape::Triangle: return new DnDTriangularShape(m_pos, m_size, m_col);
+ case DnDShape::Rectangle: return new DnDRectangularShape(m_pos, m_size, m_col);
+ case DnDShape::Ellipse: return new DnDEllipticShape(m_pos, m_size, m_col);
+ }
+}
+
+bool DnDShapeDialog::TransferDataToWindow()
+{
+
+ if ( m_shape )
+ {
+ m_radio->SetSelection(m_shape->GetKind());
+ m_pos = m_shape->GetPosition();
+ m_size = m_shape->GetSize();
+ m_col = m_shape->GetColour();
+ }
+ else
+ {
+ m_radio->SetSelection(DnDShape::None);
+ m_pos = wxPoint(1, 1);
+ m_size = wxSize(100, 100);
+ }
+
+ m_textX->SetValue(wxString() << m_pos.x);
+ m_textY->SetValue(wxString() << m_pos.y);
+ m_textW->SetValue(wxString() << m_size.x);
+ m_textH->SetValue(wxString() << m_size.y);
+
+ return TRUE;
+}
+
+bool DnDShapeDialog::TransferDataFromWindow()
+{
+ m_shapeKind = (DnDShape::Kind)m_radio->GetSelection();
+
+ m_pos.x = wxAtoi(m_textX->GetValue());
+ m_pos.y = wxAtoi(m_textY->GetValue());
+ m_size.x = wxAtoi(m_textW->GetValue());
+ m_size.y = wxAtoi(m_textH->GetValue());
+
+ if ( !m_pos.x || !m_pos.y || !m_size.x || !m_size.y )
+ {
+ wxMessageBox(_T("All sizes and positions should be non null!"),
+ _T("Invalid shape"), wxICON_HAND | wxOK, this);
+
+ return FALSE;
+ }
+
+ return TRUE;
+}
+
+void DnDShapeDialog::OnColour(wxCommandEvent& WXUNUSED(event))
+{
+ wxColourData data;
+ data.SetChooseFull(TRUE);
+ for (int i = 0; i < 16; i++)
+ {
+ wxColour colour(i*16, i*16, i*16);
+ data.SetCustomColour(i, colour);
+ }
+
+ wxColourDialog dialog(this, &data);
+ if ( dialog.ShowModal() == wxID_OK )
+ {
+ m_col = dialog.GetColourData().GetColour();
+ }
+}
+
+// ----------------------------------------------------------------------------
+// DnDShapeFrame
+// ----------------------------------------------------------------------------
+
+DnDShapeFrame *DnDShapeFrame::ms_lastDropTarget = NULL;
+
+DnDShapeFrame::DnDShapeFrame(wxFrame *parent)
+ : wxFrame(parent, -1, _T("Shape Frame"),
+ wxDefaultPosition, wxSize(250, 150))
+{
+ CreateStatusBar();
+
+ wxMenu *menuShape = new wxMenu;
+ menuShape->Append(Menu_Shape_New, _T("&New default shape\tCtrl-S"));
+ menuShape->Append(Menu_Shape_Edit, _T("&Edit shape\tCtrl-E"));
+ menuShape->AppendSeparator();
+ menuShape->Append(Menu_Shape_Clear, _T("&Clear shape\tCtrl-L"));
+
+ wxMenu *menuClipboard = new wxMenu;
+ menuClipboard->Append(Menu_ShapeClipboard_Copy, _T("&Copy\tCtrl-C"));
+ menuClipboard->Append(Menu_ShapeClipboard_Paste, _T("&Paste\tCtrl-V"));
+
+ wxMenuBar *menubar = new wxMenuBar;
+ menubar->Append(menuShape, _T("&Shape"));
+ menubar->Append(menuClipboard, _T("&Clipboard"));
+
+ SetMenuBar(menubar);
+
+ SetStatusText(_T("Press Ctrl-S to create a new shape"));
+
+ SetDropTarget(new DnDShapeDropTarget(this));
+
+ m_shape = NULL;
+
+ SetBackgroundColour(*wxWHITE);
+}
+
+DnDShapeFrame::~DnDShapeFrame()
+{
+ if (m_shape)
+ delete m_shape;
+}
+
+void DnDShapeFrame::SetShape(DnDShape *shape)
+{
+ if (m_shape)
+ delete m_shape;
+ m_shape = shape;
+ Refresh();
+}
+
+// callbacks
+void DnDShapeFrame::OnDrag(wxMouseEvent& event)
+{
+ if ( !m_shape )
+ {
+ event.Skip();
+
+ return;
+ }
+
+ // start drag operation
+ DnDShapeDataObject shapeData(m_shape);
+ wxDropSource source(shapeData, this);
+
+ const wxChar *pc = NULL;
+ switch ( source.DoDragDrop(TRUE) )
+ {
+ default:
+ case wxDragError:
+ wxLogError(wxT("An error occured during drag and drop operation"));
+ break;
+
+ case wxDragNone:
+ SetStatusText(_T("Nothing happened"));
+ break;
+
+ case wxDragCopy:
+ pc = _T("copied");
+ break;
+
+ case wxDragMove:
+ pc = _T("moved");
+ if ( ms_lastDropTarget != this )
+ {
+ // don't delete the shape if we dropped it on ourselves!
+ SetShape(NULL);
+ }
+ break;
+
+ case wxDragCancel:
+ SetStatusText(_T("Drag and drop operation cancelled"));
+ break;
+ }
+
+ if ( pc )
+ {
+ SetStatusText(wxString(_T("Shape successfully ")) + pc);
+ }
+ //else: status text already set
+}
+
+void DnDShapeFrame::OnDrop(wxCoord x, wxCoord y, DnDShape *shape)
+{
+ ms_lastDropTarget = this;
+
+ wxPoint pt(x, y);
+
+ wxString s;
+ s.Printf(wxT("Shape dropped at (%d, %d)"), pt.x, pt.y);
+ SetStatusText(s);
+
+ shape->Move(pt);
+ SetShape(shape);
+}
+
+void DnDShapeFrame::OnEditShape(wxCommandEvent& WXUNUSED(event))
+{
+ DnDShapeDialog dlg(this, m_shape);
+ if ( dlg.ShowModal() == wxID_OK )
+ {
+ SetShape(dlg.GetShape());
+
+ if ( m_shape )
+ {
+ SetStatusText(_T("You can now drag the shape to another frame"));
+ }
+ }
+}
+
+void DnDShapeFrame::OnNewShape(wxCommandEvent& WXUNUSED(event))
+{
+ SetShape(new DnDEllipticShape(wxPoint(10, 10), wxSize(80, 60), *wxRED));
+
+ SetStatusText(_T("You can now drag the shape to another frame"));
+}
+
+void DnDShapeFrame::OnClearShape(wxCommandEvent& WXUNUSED(event))
+{
+ SetShape(NULL);
+}
+
+void DnDShapeFrame::OnCopyShape(wxCommandEvent& WXUNUSED(event))
+{
+ if ( m_shape )
+ {
+ wxClipboardLocker clipLocker;
+ if ( !clipLocker )
+ {
+ wxLogError(wxT("Can't open the clipboard"));
+
+ return;
+ }
+
+ wxTheClipboard->AddData(new DnDShapeDataObject(m_shape));
+ }
+}
+
+void DnDShapeFrame::OnPasteShape(wxCommandEvent& WXUNUSED(event))
+{
+ wxClipboardLocker clipLocker;
+ if ( !clipLocker )
+ {
+ wxLogError(wxT("Can't open the clipboard"));
+
+ return;
+ }
+
+ DnDShapeDataObject shapeDataObject(NULL);
+ if ( wxTheClipboard->GetData(shapeDataObject) )
+ {
+ SetShape(shapeDataObject.GetShape());
+ }
+ else
+ {
+ wxLogStatus(wxT("No shape on the clipboard"));
+ }
+}
+
+void DnDShapeFrame::OnUpdateUICopy(wxUpdateUIEvent& event)
+{
+ event.Enable( m_shape != NULL );
+}
+
+void DnDShapeFrame::OnUpdateUIPaste(wxUpdateUIEvent& event)
+{
+ event.Enable( wxTheClipboard->IsSupported(wxDataFormat(shapeFormatId)) );
+}
+
+void DnDShapeFrame::OnPaint(wxPaintEvent& event)
+{
+ if ( m_shape )
+ {
+ wxPaintDC dc(this);
+
+ m_shape->Draw(dc);
+ }
+ else
+ {
+ event.Skip();
+ }
+}
+
+// ----------------------------------------------------------------------------
+// DnDShape
+// ----------------------------------------------------------------------------
+
+DnDShape *DnDShape::New(const void *buf)
+{
+ const ShapeDump& dump = *(const ShapeDump *)buf;
+ switch ( dump.k )
+ {
+ case Triangle:
+ return new DnDTriangularShape(wxPoint(dump.x, dump.y),
+ wxSize(dump.w, dump.h),
+ wxColour(dump.r, dump.g, dump.b));
+
+ case Rectangle:
+ return new DnDRectangularShape(wxPoint(dump.x, dump.y),
+ wxSize(dump.w, dump.h),
+ wxColour(dump.r, dump.g, dump.b));
+
+ case Ellipse:
+ return new DnDEllipticShape(wxPoint(dump.x, dump.y),
+ wxSize(dump.w, dump.h),
+ wxColour(dump.r, dump.g, dump.b));
+
+ default:
+ wxFAIL_MSG(wxT("invalid shape!"));
+ return NULL;
+ }
+}
+
+// ----------------------------------------------------------------------------
+// DnDShapeDataObject
+// ----------------------------------------------------------------------------
+
+#if wxUSE_METAFILES
+
+void DnDShapeDataObject::CreateMetaFile() const
+{
+ wxPoint pos = m_shape->GetPosition();
+ wxSize size = m_shape->GetSize();
+
+ wxMetaFileDC dcMF(wxEmptyString, pos.x + size.x, pos.y + size.y);
+
+ m_shape->Draw(dcMF);
+
+ wxMetafile *mf = dcMF.Close();
+
+ DnDShapeDataObject *self = (DnDShapeDataObject *)this; // const_cast
+ self->m_dobjMetaFile.SetMetafile(*mf);
+ self->m_hasMetaFile = TRUE;
+
+ delete mf;
+}
+
+#endif // wxUSE_METAFILES
+
+void DnDShapeDataObject::CreateBitmap() const
+{
+ wxPoint pos = m_shape->GetPosition();
+ wxSize size = m_shape->GetSize();
+ int x = pos.x + size.x,
+ y = pos.y + size.y;
+ wxBitmap bitmap(x, y);
+ wxMemoryDC dc;
+ dc.SelectObject(bitmap);
+ dc.SetBrush(wxBrush(wxT("white"), wxSOLID));
+ dc.Clear();
+ m_shape->Draw(dc);
+ dc.SelectObject(wxNullBitmap);
+
+ DnDShapeDataObject *self = (DnDShapeDataObject *)this; // const_cast
+ self->m_dobjBitmap.SetBitmap(bitmap);
+ self->m_hasBitmap = TRUE;
+}
+
+// ----------------------------------------------------------------------------
+// global functions
+// ----------------------------------------------------------------------------
+
+static void ShowBitmap(const wxBitmap& bitmap)
+{
+ wxFrame *frame = new wxFrame(NULL, -1, _T("Bitmap view"));
+ frame->CreateStatusBar();
+ DnDCanvasBitmap *canvas = new DnDCanvasBitmap(frame);
+ canvas->SetBitmap(bitmap);
+
+ int w = bitmap.GetWidth(),
+ h = bitmap.GetHeight();
+ frame->SetStatusText(wxString::Format(_T("%dx%d"), w, h));
+
+ frame->SetClientSize(w > 100 ? 100 : w, h > 100 ? 100 : h);
+ frame->Show(TRUE);
+}
+
+#if wxUSE_METAFILES
+
+static void ShowMetaFile(const wxMetaFile& metafile)
+{
+ wxFrame *frame = new wxFrame(NULL, -1, _T("Metafile view"));
+ frame->CreateStatusBar();
+ DnDCanvasMetafile *canvas = new DnDCanvasMetafile(frame);
+ canvas->SetMetafile(metafile);
+
+ wxSize size = metafile.GetSize();
+ frame->SetStatusText(wxString::Format(_T("%dx%d"), size.x, size.y));
+
+ frame->SetClientSize(size.x > 100 ? 100 : size.x,
+ size.y > 100 ? 100 : size.y);
+ frame->Show();
+}
+
+#endif // wxUSE_METAFILES
+
+#endif // wxUSE_DRAG_AND_DROP