samples/dnd/dnd.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        dnd.cpp
   3 // Purpose:     Drag and drop sample
   4 // Author:      Vadim Zeitlin
   5 // Modified by:
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #include "wx/wxprec.h"
  13
  14 #ifdef __BORLANDC__
  15 #pragma hdrstop
  16 #endif
  17
  18 #ifndef WX_PRECOMP
  19 #include "wx/wx.h"
  20 #endif
  21
  22 #include "wx/dnd.h"
  23 #include "wx/dataobj.h"
  24 #include "wx/image.h"
  25 #include "wx/clipbrd.h"
  26 #include "wx/colordlg.h"
  27 #include "wx/metafile.h"
  28
  29 #if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__)
  30     #include "../sample.xpm"
  31 #if wxUSE_DRAG_AND_DROP
  32     #include "dnd_copy.xpm"
  33     #include "dnd_move.xpm"
  34     #include "dnd_none.xpm"
  35 #endif
  36 #endif
  37
  38 #if wxUSE_DRAG_AND_DROP
  39
  40 // ----------------------------------------------------------------------------
  41 // Derive two simple classes which just put in the listbox the strings (text or
  42 // file names) we drop on them
  43 // ----------------------------------------------------------------------------
  44
  45 class DnDText : public wxTextDropTarget
  46 {
  47 public:
  48     DnDText(wxListBox *pOwner) { m_pOwner = pOwner; }
  49
  50     virtual bool OnDropText(wxCoord x, wxCoord y, const wxString& text);
  51
  52 private:
  53     wxListBox *m_pOwner;
  54 };
  55
  56 class DnDFile : public wxFileDropTarget
  57 {
  58 public:
  59     DnDFile(wxListBox *pOwner) { m_pOwner = pOwner; }
  60
  61     virtual bool OnDropFiles(wxCoord x, wxCoord y,
  62                              const wxArrayString& filenames);
  63
  64 private:
  65     wxListBox *m_pOwner;
  66 };
  67
  68 // ----------------------------------------------------------------------------
  69 // Define a custom dtop target accepting URLs
  70 // ----------------------------------------------------------------------------
  71
  72 class URLDropTarget : public wxDropTarget
  73 {
  74 public:
  75     URLDropTarget() { SetDataObject(new wxURLDataObject); }
  76
  77     void OnDropURL(wxCoord WXUNUSED(x), wxCoord WXUNUSED(y), const wxString& text)
  78     {
  79         // of course, a real program would do something more useful here...
  80         wxMessageBox(text, _T("wxDnD sample: got URL"),
  81                      wxICON_INFORMATION | wxOK);
  82     }
  83
  84     // URLs can't be moved, only copied
  85     virtual wxDragResult OnDragOver(wxCoord WXUNUSED(x), wxCoord WXUNUSED(y),
  86                                     wxDragResult WXUNUSED(def))
  87         {
  88             return wxDragLink;  // At least IE 5.x needs wxDragLink, the
  89                                 // other browsers on MSW seem okay with it too.
  90         }
  91
  92     // translate this to calls to OnDropURL() just for convenience
  93     virtual wxDragResult OnData(wxCoord x, wxCoord y, wxDragResult def)
  94     {
  95         if ( !GetData() )
  96             return wxDragNone;
  97
  98         OnDropURL(x, y, ((wxURLDataObject *)m_dataObject)->GetURL());
  99
 100         return def;
 101     }
 102 };
 103
 104 #endif // wxUSE_DRAG_AND_DROP
 105
 106 // ----------------------------------------------------------------------------
 107 // Define a new application type
 108 // ----------------------------------------------------------------------------
 109
 110 class DnDApp : public wxApp
 111 {
 112 public:
 113     virtual bool OnInit();
 114 };
 115
 116 IMPLEMENT_APP(DnDApp)
 117
 118 #if wxUSE_DRAG_AND_DROP || wxUSE_CLIPBOARD
 119
 120 // ----------------------------------------------------------------------------
 121 // Define canvas class to show a bitmap
 122 // ----------------------------------------------------------------------------
 123
 124 class DnDCanvasBitmap : public wxScrolledWindow
 125 {
 126 public:
 127     DnDCanvasBitmap(wxWindow *parent) : wxScrolledWindow(parent) { }
 128
 129     void SetBitmap(const wxBitmap& bitmap)
 130     {
 131         m_bitmap = bitmap;
 132
 133         SetScrollbars(10, 10,
 134                       m_bitmap.GetWidth() / 10, m_bitmap.GetHeight() / 10);
 135
 136         Refresh();
 137     }
 138
 139     void OnPaint(wxPaintEvent& WXUNUSED(event))
 140     {
 141         wxPaintDC dc(this);
 142
 143         if ( m_bitmap.Ok() )
 144         {
 145             PrepareDC(dc);
 146
 147             dc.DrawBitmap(m_bitmap, 0, 0);
 148         }
 149     }
 150
 151 private:
 152     wxBitmap m_bitmap;
 153
 154     DECLARE_EVENT_TABLE()
 155 };
 156
 157 #if wxUSE_METAFILE
 158
 159 // and the same thing fo metafiles
 160 class DnDCanvasMetafile : public wxScrolledWindow
 161 {
 162 public:
 163     DnDCanvasMetafile(wxWindow *parent) : wxScrolledWindow(parent) { }
 164
 165     void SetMetafile(const wxMetafile& metafile)
 166     {
 167         m_metafile = metafile;
 168
 169         SetScrollbars(10, 10,
 170                       m_metafile.GetWidth() / 10, m_metafile.GetHeight() / 10);
 171
 172         Refresh();
 173     }
 174
 175     void OnPaint(wxPaintEvent&)
 176     {
 177         wxPaintDC dc(this);
 178
 179         if ( m_metafile.Ok() )
 180         {
 181             PrepareDC(dc);
 182
 183             m_metafile.Play(&dc);
 184         }
 185     }
 186
 187 private:
 188     wxMetafile m_metafile;
 189
 190     DECLARE_EVENT_TABLE()
 191 };
 192
 193 #endif // wxUSE_METAFILE
 194
 195 // ----------------------------------------------------------------------------
 196 // Define a new frame type for the main frame
 197 // ----------------------------------------------------------------------------
 198
 199 class DnDFrame : public wxFrame
 200 {
 201 public:
 202     DnDFrame(wxFrame *frame, const wxChar *title, int x, int y, int w, int h);
 203     virtual ~DnDFrame();
 204
 205     void OnPaint(wxPaintEvent& event);
 206     void OnSize(wxSizeEvent& event);
 207     void OnQuit(wxCommandEvent& event);
 208     void OnAbout(wxCommandEvent& event);
 209     void OnDrag(wxCommandEvent& event);
 210     void OnDragMoveByDefault(wxCommandEvent& event);
 211     void OnDragMoveAllow(wxCommandEvent& event);
 212     void OnNewFrame(wxCommandEvent& event);
 213     void OnHelp (wxCommandEvent& event);
 214 #if wxUSE_LOG
 215     void OnLogClear(wxCommandEvent& event);
 216 #endif // wxUSE_LOG
 217
 218     void OnCopy(wxCommandEvent& event);
 219     void OnPaste(wxCommandEvent& event);
 220
 221     void OnCopyBitmap(wxCommandEvent& event);
 222     void OnPasteBitmap(wxCommandEvent& event);
 223
 224 #if wxUSE_METAFILE
 225     void OnPasteMetafile(wxCommandEvent& event);
 226 #endif // wxUSE_METAFILE
 227
 228     void OnCopyFiles(wxCommandEvent& event);
 229
 230     void OnLeftDown(wxMouseEvent& event);
 231     void OnRightDown(wxMouseEvent& event);
 232
 233     void OnUpdateUIMoveByDefault(wxUpdateUIEvent& event);
 234
 235     void OnUpdateUIPasteText(wxUpdateUIEvent& event);
 236     void OnUpdateUIPasteBitmap(wxUpdateUIEvent& event);
 237
 238     DECLARE_EVENT_TABLE()
 239
 240 private:
 241     // GUI controls
 242     wxListBox  *m_ctrlFile,
 243                *m_ctrlText;
 244
 245 #if wxUSE_LOG
 246     wxTextCtrl *m_ctrlLog;
 247
 248     wxLog *m_pLog,
 249           *m_pLogPrev;
 250 #endif // wxUSE_LOG
 251
 252     // move the text by default (or copy)?
 253     bool m_moveByDefault;
 254
 255     // allow moving the text at all?
 256     bool m_moveAllow;
 257
 258     // the text we drag
 259     wxString  m_strText;
 260 };
 261
 262 // ----------------------------------------------------------------------------
 263 // A shape is an example of application-specific data which may be transported
 264 // via drag-and-drop or clipboard: in our case, we have different geometric
 265 // shapes, each one with its own colour and position
 266 // ----------------------------------------------------------------------------
 267
 268 #if wxUSE_DRAG_AND_DROP
 269
 270 class DnDShape
 271 {
 272 public:
 273     enum Kind
 274     {
 275         None,
 276         Triangle,
 277         Rectangle,
 278         Ellipse
 279     };
 280
 281     DnDShape(const wxPoint& pos,
 282              const wxSize& size,
 283              const wxColour& col)
 284         : m_pos(pos), m_size(size), m_col(col)
 285     {
 286     }
 287
 288     // this is for debugging - lets us see when exactly an object is freed
 289     // (this may be later than you think if it's on the clipboard, for example)
 290     virtual ~DnDShape() { }
 291
 292     // the functions used for drag-and-drop: they dump and restore a shape into
 293     // some bitwise-copiable data (might use streams too...)
 294     // ------------------------------------------------------------------------
 295
 296     // restore from buffer
 297     static DnDShape *New(const void *buf);
 298
 299     virtual size_t GetDataSize() const
 300     {
 301         return sizeof(ShapeDump);
 302     }
 303
 304     virtual void GetDataHere(void *buf) const
 305     {
 306         ShapeDump& dump = *(ShapeDump *)buf;
 307         dump.x = m_pos.x;
 308         dump.y = m_pos.y;
 309         dump.w = m_size.x;
 310         dump.h = m_size.y;
 311         dump.r = m_col.Red();
 312         dump.g = m_col.Green();
 313         dump.b = m_col.Blue();
 314         dump.k = GetKind();
 315     }
 316
 317     // accessors
 318     const wxPoint& GetPosition() const { return m_pos; }
 319     const wxColour& GetColour() const { return m_col; }
 320     const wxSize& GetSize() const { return m_size; }
 321
 322     void Move(const wxPoint& pos) { m_pos = pos; }
 323
 324     // to implement in derived classes
 325     virtual Kind GetKind() const = 0;
 326
 327     virtual void Draw(wxDC& dc)
 328     {
 329         dc.SetPen(wxPen(m_col, 1, wxSOLID));
 330     }
 331
 332 protected:
 333     //get a point 1 up and 1 left, otherwise the mid-point of a triangle is on the line
 334     wxPoint GetCentre() const
 335          { return wxPoint(m_pos.x + m_size.x / 2 - 1, m_pos.y + m_size.y / 2 - 1); }
 336
 337     struct ShapeDump
 338     {
 339         wxCoord x, y,             // position
 340                 w, h;             // size
 341         int k;                    // kind
 342         unsigned char r, g, b;    // colour
 343     };
 344
 345     wxPoint  m_pos;
 346     wxSize   m_size;
 347     wxColour m_col;
 348 };
 349
 350 class DnDTriangularShape : public DnDShape
 351 {
 352 public:
 353     DnDTriangularShape(const wxPoint& pos,
 354                        const wxSize& size,
 355                        const wxColour& col)
 356         : DnDShape(pos, size, col)
 357     {
 358         wxLogMessage(wxT("DnDTriangularShape is being created"));
 359     }
 360
 361     virtual ~DnDTriangularShape()
 362     {
 363         wxLogMessage(wxT("DnDTriangularShape is being deleted"));
 364     }
 365
 366     virtual Kind GetKind() const { return Triangle; }
 367     virtual void Draw(wxDC& dc)
 368     {
 369         DnDShape::Draw(dc);
 370
 371         // well, it's a bit difficult to describe a triangle by position and
 372         // size, but we're not doing geometry here, do we? ;-)
 373         wxPoint p1(m_pos);
 374         wxPoint p2(m_pos.x + m_size.x, m_pos.y);
 375         wxPoint p3(m_pos.x, m_pos.y + m_size.y);
 376
 377         dc.DrawLine(p1, p2);
 378         dc.DrawLine(p2, p3);
 379         dc.DrawLine(p3, p1);
 380
 381         //works in multicolor modes; on GTK (at least) will fail in 16-bit color
 382         dc.SetBrush(wxBrush(m_col, wxSOLID));
 383         dc.FloodFill(GetCentre(), m_col, wxFLOOD_BORDER);
 384     }
 385 };
 386
 387 class DnDRectangularShape : public DnDShape
 388 {
 389 public:
 390     DnDRectangularShape(const wxPoint& pos,
 391                         const wxSize& size,
 392                         const wxColour& col)
 393         : DnDShape(pos, size, col)
 394     {
 395         wxLogMessage(wxT("DnDRectangularShape is being created"));
 396     }
 397
 398     virtual ~DnDRectangularShape()
 399     {
 400         wxLogMessage(wxT("DnDRectangularShape is being deleted"));
 401     }
 402
 403     virtual Kind GetKind() const { return Rectangle; }
 404     virtual void Draw(wxDC& dc)
 405     {
 406         DnDShape::Draw(dc);
 407
 408         wxPoint p1(m_pos);
 409         wxPoint p2(p1.x + m_size.x, p1.y);
 410         wxPoint p3(p2.x, p2.y + m_size.y);
 411         wxPoint p4(p1.x, p3.y);
 412
 413         dc.DrawLine(p1, p2);
 414         dc.DrawLine(p2, p3);
 415         dc.DrawLine(p3, p4);
 416         dc.DrawLine(p4, p1);
 417
 418         dc.SetBrush(wxBrush(m_col, wxSOLID));
 419         dc.FloodFill(GetCentre(), m_col, wxFLOOD_BORDER);
 420     }
 421 };
 422
 423 class DnDEllipticShape : public DnDShape
 424 {
 425 public:
 426     DnDEllipticShape(const wxPoint& pos,
 427                      const wxSize& size,
 428                      const wxColour& col)
 429         : DnDShape(pos, size, col)
 430     {
 431         wxLogMessage(wxT("DnDEllipticShape is being created"));
 432     }
 433
 434     virtual ~DnDEllipticShape()
 435     {
 436         wxLogMessage(wxT("DnDEllipticShape is being deleted"));
 437     }
 438
 439     virtual Kind GetKind() const { return Ellipse; }
 440     virtual void Draw(wxDC& dc)
 441     {
 442         DnDShape::Draw(dc);
 443
 444         dc.DrawEllipse(m_pos, m_size);
 445
 446         dc.SetBrush(wxBrush(m_col, wxSOLID));
 447         dc.FloodFill(GetCentre(), m_col, wxFLOOD_BORDER);
 448     }
 449 };
 450
 451 // ----------------------------------------------------------------------------
 452 // A wxDataObject specialisation for the application-specific data
 453 // ----------------------------------------------------------------------------
 454
 455 static const wxChar *shapeFormatId = wxT("wxShape");
 456
 457 class DnDShapeDataObject : public wxDataObject
 458 {
 459 public:
 460     // ctor doesn't copy the pointer, so it shouldn't go away while this object
 461     // is alive
 462     DnDShapeDataObject(DnDShape *shape = (DnDShape *)NULL)
 463     {
 464         if ( shape )
 465         {
 466             // we need to copy the shape because the one we're handled may be
 467             // deleted while it's still on the clipboard (for example) - and we
 468             // reuse the serialisation methods here to copy it
 469             void *buf = malloc(shape->DnDShape::GetDataSize());
 470             shape->GetDataHere(buf);
 471             m_shape = DnDShape::New(buf);
 472
 473             free(buf);
 474         }
 475         else
 476         {
 477             // nothing to copy
 478             m_shape = NULL;
 479         }
 480
 481         // this string should uniquely identify our format, but is otherwise
 482         // arbitrary
 483         m_formatShape.SetId(shapeFormatId);
 484
 485         // we don't draw the shape to a bitmap until it's really needed (i.e.
 486         // we're asked to do so)
 487         m_hasBitmap = false;
 488 #if wxUSE_METAFILE
 489         m_hasMetaFile = false;
 490 #endif // wxUSE_METAFILE
 491     }
 492
 493     virtual ~DnDShapeDataObject() { delete m_shape; }
 494
 495     // after a call to this function, the shape is owned by the caller and it
 496     // is responsible for deleting it!
 497     //
 498     // NB: a better solution would be to make DnDShapes ref counted and this
 499     //     is what should probably be done in a real life program, otherwise
 500     //     the ownership problems become too complicated really fast
 501     DnDShape *GetShape()
 502     {
 503         DnDShape *shape = m_shape;
 504
 505         m_shape = (DnDShape *)NULL;
 506         m_hasBitmap = false;
 507 #if wxUSE_METAFILE
 508         m_hasMetaFile = false;
 509 #endif // wxUSE_METAFILE
 510
 511         return shape;
 512     }
 513
 514     // implement base class pure virtuals
 515     // ----------------------------------
 516
 517     virtual wxDataFormat GetPreferredFormat(Direction WXUNUSED(dir)) const
 518     {
 519         return m_formatShape;
 520     }
 521
 522     virtual size_t GetFormatCount(Direction dir) const
 523     {
 524         // our custom format is supported by both GetData() and SetData()
 525         size_t nFormats = 1;
 526         if ( dir == Get )
 527         {
 528             // but the bitmap format(s) are only supported for output
 529             nFormats += m_dobjBitmap.GetFormatCount(dir);
 530
 531 #if wxUSE_METAFILE
 532             nFormats += m_dobjMetaFile.GetFormatCount(dir);
 533 #endif // wxUSE_METAFILE
 534         }
 535
 536         return nFormats;
 537     }
 538
 539     virtual void GetAllFormats(wxDataFormat *formats, Direction dir) const
 540     {
 541         formats[0] = m_formatShape;
 542         if ( dir == Get )
 543         {
 544             // in Get direction we additionally support bitmaps and metafiles
 545             // under Windows
 546             m_dobjBitmap.GetAllFormats(&formats[1], dir);
 547
 548 #if wxUSE_METAFILE
 549             // don't assume that m_dobjBitmap has only 1 format
 550             m_dobjMetaFile.GetAllFormats(&formats[1 +
 551                     m_dobjBitmap.GetFormatCount(dir)], dir);
 552 #endif // wxUSE_METAFILE
 553         }
 554     }
 555
 556     virtual size_t GetDataSize(const wxDataFormat& format) const
 557     {
 558         if ( format == m_formatShape )
 559         {
 560             return m_shape->GetDataSize();
 561         }
 562 #if wxUSE_METAFILE
 563         else if ( m_dobjMetaFile.IsSupported(format) )
 564         {
 565             if ( !m_hasMetaFile )
 566                 CreateMetaFile();
 567
 568             return m_dobjMetaFile.GetDataSize(format);
 569         }
 570 #endif // wxUSE_METAFILE
 571         else
 572         {
 573             wxASSERT_MSG( m_dobjBitmap.IsSupported(format),
 574                           wxT("unexpected format") );
 575
 576             if ( !m_hasBitmap )
 577                 CreateBitmap();
 578
 579             return m_dobjBitmap.GetDataSize();
 580         }
 581     }
 582
 583     virtual bool GetDataHere(const wxDataFormat& format, void *pBuf) const
 584     {
 585         if ( format == m_formatShape )
 586         {
 587             m_shape->GetDataHere(pBuf);
 588
 589             return true;
 590         }
 591 #if wxUSE_METAFILE
 592         else if ( m_dobjMetaFile.IsSupported(format) )
 593         {
 594             if ( !m_hasMetaFile )
 595                 CreateMetaFile();
 596
 597             return m_dobjMetaFile.GetDataHere(format, pBuf);
 598         }
 599 #endif // wxUSE_METAFILE
 600         else
 601         {
 602             wxASSERT_MSG( m_dobjBitmap.IsSupported(format),
 603                           wxT("unexpected format") );
 604
 605             if ( !m_hasBitmap )
 606                 CreateBitmap();
 607
 608             return m_dobjBitmap.GetDataHere(pBuf);
 609         }
 610     }
 611
 612     virtual bool SetData(const wxDataFormat& format,
 613                          size_t WXUNUSED(len), const void *buf)
 614     {
 615         wxCHECK_MSG( format == m_formatShape, false,
 616                      wxT( "unsupported format") );
 617
 618         delete m_shape;
 619         m_shape = DnDShape::New(buf);
 620
 621         // the shape has changed
 622         m_hasBitmap = false;
 623
 624 #if wxUSE_METAFILE
 625         m_hasMetaFile = false;
 626 #endif // wxUSE_METAFILE
 627
 628         return true;
 629     }
 630
 631 private:
 632     // creates a bitmap and assigns it to m_dobjBitmap (also sets m_hasBitmap)
 633     void CreateBitmap() const;
 634 #if wxUSE_METAFILE
 635     void CreateMetaFile() const;
 636 #endif // wxUSE_METAFILE
 637
 638     wxDataFormat        m_formatShape;  // our custom format
 639
 640     wxBitmapDataObject  m_dobjBitmap;   // it handles bitmaps
 641     bool                m_hasBitmap;    // true if m_dobjBitmap has valid bitmap
 642
 643 #if wxUSE_METAFILE
 644     wxMetaFileDataObject m_dobjMetaFile;// handles metafiles
 645     bool                 m_hasMetaFile; // true if we have valid metafile
 646 #endif // wxUSE_METAFILE
 647
 648     DnDShape           *m_shape;        // our data
 649 };
 650
 651 // ----------------------------------------------------------------------------
 652 // A dialog to edit shape properties
 653 // ----------------------------------------------------------------------------
 654
 655 class DnDShapeDialog : public wxDialog
 656 {
 657 public:
 658     DnDShapeDialog(wxFrame *parent, DnDShape *shape);
 659
 660     DnDShape *GetShape() const;
 661
 662     virtual bool TransferDataToWindow();
 663     virtual bool TransferDataFromWindow();
 664
 665     void OnColour(wxCommandEvent& event);
 666
 667 private:
 668     // input
 669     DnDShape *m_shape;
 670
 671     // output
 672     DnDShape::Kind m_shapeKind;
 673     wxPoint  m_pos;
 674     wxSize   m_size;
 675     wxColour m_col;
 676
 677     // controls
 678     wxRadioBox *m_radio;
 679     wxTextCtrl *m_textX,
 680                *m_textY,
 681                *m_textW,
 682                *m_textH;
 683
 684     DECLARE_EVENT_TABLE()
 685 };
 686
 687 // ----------------------------------------------------------------------------
 688 // A frame for the shapes which can be drag-and-dropped between frames
 689 // ----------------------------------------------------------------------------
 690
 691 class DnDShapeFrame : public wxFrame
 692 {
 693 public:
 694     DnDShapeFrame(wxFrame *parent);
 695     ~DnDShapeFrame();
 696
 697     void SetShape(DnDShape *shape);
 698     virtual bool SetShape(const wxRegion &region)
 699     {
 700         return wxFrame::SetShape( region );
 701     }
 702
 703     // callbacks
 704     void OnNewShape(wxCommandEvent& event);
 705     void OnEditShape(wxCommandEvent& event);
 706     void OnClearShape(wxCommandEvent& event);
 707
 708     void OnCopyShape(wxCommandEvent& event);
 709     void OnPasteShape(wxCommandEvent& event);
 710
 711     void OnUpdateUICopy(wxUpdateUIEvent& event);
 712     void OnUpdateUIPaste(wxUpdateUIEvent& event);
 713
 714     void OnDrag(wxMouseEvent& event);
 715     void OnPaint(wxPaintEvent& event);
 716     void OnDrop(wxCoord x, wxCoord y, DnDShape *shape);
 717
 718 private:
 719     DnDShape *m_shape;
 720
 721     static DnDShapeFrame *ms_lastDropTarget;
 722
 723     DECLARE_EVENT_TABLE()
 724 };
 725
 726 // ----------------------------------------------------------------------------
 727 // wxDropTarget derivation for DnDShapes
 728 // ----------------------------------------------------------------------------
 729
 730 class DnDShapeDropTarget : public wxDropTarget
 731 {
 732 public:
 733     DnDShapeDropTarget(DnDShapeFrame *frame)
 734         : wxDropTarget(new DnDShapeDataObject)
 735     {
 736         m_frame = frame;
 737     }
 738
 739     // override base class (pure) virtuals
 740     virtual wxDragResult OnEnter(wxCoord x, wxCoord y, wxDragResult def)
 741     {
 742 #if wxUSE_STATUSBAR
 743         m_frame->SetStatusText(_T("Mouse entered the frame"));
 744 #endif // wxUSE_STATUSBAR
 745         return OnDragOver(x, y, def);
 746     }
 747     virtual void OnLeave()
 748     {
 749 #if wxUSE_STATUSBAR
 750         m_frame->SetStatusText(_T("Mouse left the frame"));
 751 #endif // wxUSE_STATUSBAR
 752     }
 753     virtual wxDragResult OnData(wxCoord x, wxCoord y, wxDragResult def)
 754     {
 755         if ( !GetData() )
 756         {
 757             wxLogError(wxT("Failed to get drag and drop data"));
 758
 759             return wxDragNone;
 760         }
 761
 762         m_frame->OnDrop(x, y,
 763                         ((DnDShapeDataObject *)GetDataObject())->GetShape());
 764
 765         return def;
 766     }
 767
 768 private:
 769     DnDShapeFrame *m_frame;
 770 };
 771
 772 #endif // wxUSE_DRAG_AND_DROP
 773
 774 // ----------------------------------------------------------------------------
 775 // functions prototypes
 776 // ----------------------------------------------------------------------------
 777
 778 static void ShowBitmap(const wxBitmap& bitmap);
 779
 780 #if wxUSE_METAFILE
 781 static void ShowMetaFile(const wxMetaFile& metafile);
 782 #endif // wxUSE_METAFILE
 783
 784 // ----------------------------------------------------------------------------
 785 // IDs for the menu commands
 786 // ----------------------------------------------------------------------------
 787
 788 enum
 789 {
 790     Menu_Quit = 1,
 791     Menu_Drag,
 792     Menu_DragMoveDef,
 793     Menu_DragMoveAllow,
 794     Menu_NewFrame,
 795     Menu_About = 101,
 796     Menu_Help,
 797     Menu_Clear,
 798     Menu_Copy,
 799     Menu_Paste,
 800     Menu_CopyBitmap,
 801     Menu_PasteBitmap,
 802     Menu_PasteMFile,
 803     Menu_CopyFiles,
 804     Menu_Shape_New = 500,
 805     Menu_Shape_Edit,
 806     Menu_Shape_Clear,
 807     Menu_ShapeClipboard_Copy,
 808     Menu_ShapeClipboard_Paste,
 809     Button_Colour = 1001
 810 };
 811
 812 BEGIN_EVENT_TABLE(DnDFrame, wxFrame)
 813     EVT_MENU(Menu_Quit,       DnDFrame::OnQuit)
 814     EVT_MENU(Menu_About,      DnDFrame::OnAbout)
 815     EVT_MENU(Menu_Drag,       DnDFrame::OnDrag)
 816     EVT_MENU(Menu_DragMoveDef,  DnDFrame::OnDragMoveByDefault)
 817     EVT_MENU(Menu_DragMoveAllow,DnDFrame::OnDragMoveAllow)
 818     EVT_MENU(Menu_NewFrame,   DnDFrame::OnNewFrame)
 819     EVT_MENU(Menu_Help,       DnDFrame::OnHelp)
 820 #if wxUSE_LOG
 821     EVT_MENU(Menu_Clear,      DnDFrame::OnLogClear)
 822 #endif // wxUSE_LOG
 823     EVT_MENU(Menu_Copy,       DnDFrame::OnCopy)
 824     EVT_MENU(Menu_Paste,      DnDFrame::OnPaste)
 825     EVT_MENU(Menu_CopyBitmap, DnDFrame::OnCopyBitmap)
 826     EVT_MENU(Menu_PasteBitmap,DnDFrame::OnPasteBitmap)
 827 #if wxUSE_METAFILE
 828     EVT_MENU(Menu_PasteMFile, DnDFrame::OnPasteMetafile)
 829 #endif // wxUSE_METAFILE
 830     EVT_MENU(Menu_CopyFiles,  DnDFrame::OnCopyFiles)
 831
 832     EVT_UPDATE_UI(Menu_DragMoveDef, DnDFrame::OnUpdateUIMoveByDefault)
 833
 834     EVT_UPDATE_UI(Menu_Paste,       DnDFrame::OnUpdateUIPasteText)
 835     EVT_UPDATE_UI(Menu_PasteBitmap, DnDFrame::OnUpdateUIPasteBitmap)
 836
 837     EVT_LEFT_DOWN(            DnDFrame::OnLeftDown)
 838     EVT_RIGHT_DOWN(           DnDFrame::OnRightDown)
 839     EVT_PAINT(                DnDFrame::OnPaint)
 840     EVT_SIZE(                 DnDFrame::OnSize)
 841 END_EVENT_TABLE()
 842
 843 #if wxUSE_DRAG_AND_DROP
 844
 845 BEGIN_EVENT_TABLE(DnDShapeFrame, wxFrame)
 846     EVT_MENU(Menu_Shape_New,    DnDShapeFrame::OnNewShape)
 847     EVT_MENU(Menu_Shape_Edit,   DnDShapeFrame::OnEditShape)
 848     EVT_MENU(Menu_Shape_Clear,  DnDShapeFrame::OnClearShape)
 849
 850     EVT_MENU(Menu_ShapeClipboard_Copy,  DnDShapeFrame::OnCopyShape)
 851     EVT_MENU(Menu_ShapeClipboard_Paste, DnDShapeFrame::OnPasteShape)
 852
 853     EVT_UPDATE_UI(Menu_ShapeClipboard_Copy,  DnDShapeFrame::OnUpdateUICopy)
 854     EVT_UPDATE_UI(Menu_ShapeClipboard_Paste, DnDShapeFrame::OnUpdateUIPaste)
 855
 856     EVT_LEFT_DOWN(DnDShapeFrame::OnDrag)
 857
 858     EVT_PAINT(DnDShapeFrame::OnPaint)
 859 END_EVENT_TABLE()
 860
 861 BEGIN_EVENT_TABLE(DnDShapeDialog, wxDialog)
 862     EVT_BUTTON(Button_Colour, DnDShapeDialog::OnColour)
 863 END_EVENT_TABLE()
 864
 865 #endif // wxUSE_DRAG_AND_DROP
 866
 867 BEGIN_EVENT_TABLE(DnDCanvasBitmap, wxScrolledWindow)
 868     EVT_PAINT(DnDCanvasBitmap::OnPaint)
 869 END_EVENT_TABLE()
 870
 871 #if wxUSE_METAFILE
 872 BEGIN_EVENT_TABLE(DnDCanvasMetafile, wxScrolledWindow)
 873     EVT_PAINT(DnDCanvasMetafile::OnPaint)
 874 END_EVENT_TABLE()
 875 #endif // wxUSE_METAFILE
 876
 877 #endif // wxUSE_DRAG_AND_DROP
 878
 879 // ============================================================================
 880 // implementation
 881 // ============================================================================
 882
 883 // `Main program' equivalent, creating windows and returning main app frame
 884 bool DnDApp::OnInit()
 885 {
 886 #if wxUSE_DRAG_AND_DROP || wxUSE_CLIPBOARD
 887     // switch on trace messages
 888 #if wxUSE_LOG
 889 #if defined(__WXGTK__)
 890     wxLog::AddTraceMask(_T("clipboard"));
 891 #elif defined(__WXMSW__)
 892     wxLog::AddTraceMask(wxTRACE_OleCalls);
 893 #endif
 894 #endif // wxUSE_LOG
 895
 896 #if wxUSE_LIBPNG
 897     wxImage::AddHandler( new wxPNGHandler );
 898 #endif
 899
 900     // under X we usually want to use the primary selection by default (which
 901     // is shared with other apps)
 902     wxTheClipboard->UsePrimarySelection();
 903
 904     // create the main frame window
 905     DnDFrame *frame = new DnDFrame((wxFrame  *) NULL,
 906                                    _T("Drag-and-Drop/Clipboard wxWidgets Sample"),
 907                                    10, 100, 650, 340);
 908
 909     // activate it
 910     frame->Show(true);
 911
 912     SetTopWindow(frame);
 913
 914     return true;
 915 #else
 916     wxMessageBox( _T("This sample has to be compiled with wxUSE_DRAG_AND_DROP"), _T("Building error"), wxOK);
 917     return false;
 918 #endif // wxUSE_DRAG_AND_DROP
 919 }
 920
 921 #if wxUSE_DRAG_AND_DROP || wxUSE_CLIPBOARD
 922
 923 DnDFrame::DnDFrame(wxFrame *frame, const wxChar *title, int x, int y, int w, int h)
 924         : wxFrame(frame, wxID_ANY, title, wxPoint(x, y), wxSize(w, h)),
 925           m_strText(_T("wxWidgets drag & drop works :-)"))
 926
 927 {
 928     // frame icon and status bar
 929     SetIcon(wxICON(sample));
 930
 931 #if wxUSE_STATUSBAR
 932     CreateStatusBar();
 933 #endif // wxUSE_STATUSBAR
 934
 935     // construct menu
 936     wxMenu *file_menu = new wxMenu;
 937     file_menu->Append(Menu_Drag, _T("&Test drag..."));
 938     file_menu->AppendCheckItem(Menu_DragMoveDef, _T("&Move by default"));
 939     file_menu->AppendCheckItem(Menu_DragMoveAllow, _T("&Allow moving"));
 940     file_menu->AppendSeparator();
 941     file_menu->Append(Menu_NewFrame, _T("&New frame\tCtrl-N"));
 942     file_menu->AppendSeparator();
 943     file_menu->Append(Menu_Quit, _T("E&xit\tCtrl-Q"));
 944
 945 #if wxUSE_LOG
 946     wxMenu *log_menu = new wxMenu;
 947     log_menu->Append(Menu_Clear, _T("Clear\tCtrl-L"));
 948 #endif // wxUSE_LOG
 949
 950     wxMenu *help_menu = new wxMenu;
 951     help_menu->Append(Menu_Help, _T("&Help..."));
 952     help_menu->AppendSeparator();
 953     help_menu->Append(Menu_About, _T("&About"));
 954
 955     wxMenu *clip_menu = new wxMenu;
 956     clip_menu->Append(Menu_Copy, _T("&Copy text\tCtrl-C"));
 957     clip_menu->Append(Menu_Paste, _T("&Paste text\tCtrl-V"));
 958     clip_menu->AppendSeparator();
 959     clip_menu->Append(Menu_CopyBitmap, _T("Copy &bitmap\tCtrl-Shift-C"));
 960     clip_menu->Append(Menu_PasteBitmap, _T("Paste b&itmap\tCtrl-Shift-V"));
 961 #if wxUSE_METAFILE
 962     clip_menu->AppendSeparator();
 963     clip_menu->Append(Menu_PasteMFile, _T("Paste &metafile\tCtrl-M"));
 964 #endif // wxUSE_METAFILE
 965     clip_menu->AppendSeparator();
 966     clip_menu->Append(Menu_CopyFiles, _T("Copy &files\tCtrl-F"));
 967
 968     wxMenuBar *menu_bar = new wxMenuBar;
 969     menu_bar->Append(file_menu, _T("&File"));
 970 #if wxUSE_LOG
 971     menu_bar->Append(log_menu,  _T("&Log"));
 972 #endif // wxUSE_LOG
 973     menu_bar->Append(clip_menu, _T("&Clipboard"));
 974     menu_bar->Append(help_menu, _T("&Help"));
 975
 976     SetMenuBar(menu_bar);
 977
 978     // make a panel with 3 subwindows
 979     wxString strFile(_T("Drop files here!")), strText(_T("Drop text on me"));
 980
 981     m_ctrlFile  = new wxListBox(this, wxID_ANY, wxDefaultPosition, wxDefaultSize, 1, &strFile,
 982                                 wxLB_HSCROLL | wxLB_ALWAYS_SB );
 983     m_ctrlText  = new wxListBox(this, wxID_ANY, wxDefaultPosition, wxDefaultSize, 1, &strText,
 984                                 wxLB_HSCROLL | wxLB_ALWAYS_SB );
 985
 986 #if wxUSE_LOG
 987     m_ctrlLog   = new wxTextCtrl(this, wxID_ANY, wxEmptyString, wxDefaultPosition, wxDefaultSize,
 988                                  wxTE_MULTILINE | wxTE_READONLY |
 989                                  wxSUNKEN_BORDER );
 990
 991     // redirect log messages to the text window
 992     m_pLog = new wxLogTextCtrl(m_ctrlLog);
 993     m_pLogPrev = wxLog::SetActiveTarget(m_pLog);
 994 #endif // wxUSE_LOG
 995
 996 #if wxUSE_DRAG_AND_DROP
 997     // associate drop targets with the controls
 998     m_ctrlFile->SetDropTarget(new DnDFile(m_ctrlFile));
 999     m_ctrlText->SetDropTarget(new DnDText(m_ctrlText));
1000 #if wxUSE_LOG
1001     m_ctrlLog->SetDropTarget(new URLDropTarget);
1002 #endif // wxUSE_LOG
1003 #endif // wxUSE_DRAG_AND_DROP
1004
1005     wxBoxSizer *sizer_top = new wxBoxSizer( wxHORIZONTAL );
1006     sizer_top->Add(m_ctrlFile, 1, wxEXPAND );
1007     sizer_top->Add(m_ctrlText, 1, wxEXPAND );
1008
1009     wxBoxSizer *sizer = new wxBoxSizer( wxVERTICAL );
1010     sizer->Add(sizer_top, 1, wxEXPAND );
1011 #if wxUSE_LOG
1012     sizer->Add(m_ctrlLog, 2, wxEXPAND);
1013     sizer->SetItemMinSize(m_ctrlLog, 450, 0);
1014 #endif // wxUSE_LOG
1015     sizer->AddSpacer(50);
1016
1017     SetSizer(sizer);
1018     sizer->SetSizeHints( this );
1019
1020     // copy data by default but allow moving it as well
1021     m_moveByDefault = false;
1022     m_moveAllow = true;
1023     menu_bar->Check(Menu_DragMoveAllow, true);
1024 }
1025
1026 void DnDFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
1027 {
1028     Close(true);
1029 }
1030
1031 void DnDFrame::OnSize(wxSizeEvent& event)
1032 {
1033     Refresh();
1034
1035     event.Skip();
1036 }
1037
1038 void DnDFrame::OnPaint(wxPaintEvent& WXUNUSED(event))
1039 {
1040     int w = 0;
1041     int h = 0;
1042     GetClientSize( &w, &h );
1043
1044     wxPaintDC dc(this);
1045     // dc.Clear(); -- this kills wxGTK
1046     dc.SetFont( wxFont( 24, wxDECORATIVE, wxNORMAL, wxNORMAL, false, _T("charter") ) );
1047     dc.DrawText( _T("Drag text from here!"), 100, h-50 );
1048 }
1049
1050 void DnDFrame::OnUpdateUIMoveByDefault(wxUpdateUIEvent& event)
1051 {
1052     // only can move by default if moving is allowed at all
1053     event.Enable(m_moveAllow);
1054 }
1055
1056 void DnDFrame::OnUpdateUIPasteText(wxUpdateUIEvent& event)
1057 {
1058 #ifdef __WXDEBUG__
1059     // too many trace messages if we don't do it - this function is called
1060     // very often
1061     wxLogNull nolog;
1062 #endif
1063
1064     event.Enable( wxTheClipboard->IsSupported(wxDF_TEXT) );
1065 }
1066
1067 void DnDFrame::OnUpdateUIPasteBitmap(wxUpdateUIEvent& event)
1068 {
1069 #ifdef __WXDEBUG__
1070     // too many trace messages if we don't do it - this function is called
1071     // very often
1072     wxLogNull nolog;
1073 #endif
1074
1075     event.Enable( wxTheClipboard->IsSupported(wxDF_BITMAP) );
1076 }
1077
1078 void DnDFrame::OnNewFrame(wxCommandEvent& WXUNUSED(event))
1079 {
1080 #if wxUSE_DRAG_AND_DROP
1081     (new DnDShapeFrame(this))->Show(true);
1082
1083     wxLogStatus(this, wxT("Double click the new frame to select a shape for it"));
1084 #endif // wxUSE_DRAG_AND_DROP
1085 }
1086
1087 void DnDFrame::OnDrag(wxCommandEvent& WXUNUSED(event))
1088 {
1089 #if wxUSE_DRAG_AND_DROP
1090     wxString strText = wxGetTextFromUser
1091         (
1092             _T("After you enter text in this dialog, press any mouse\n")
1093             _T("button in the bottom (empty) part of the frame and \n")
1094             _T("drag it anywhere - you will be in fact dragging the\n")
1095          _T("text object containing this text"),
1096          _T("Please enter some text"), m_strText, this
1097         );
1098
1099     m_strText = strText;
1100 #endif // wxUSE_DRAG_AND_DROP
1101 }
1102
1103 void DnDFrame::OnDragMoveByDefault(wxCommandEvent& event)
1104 {
1105     m_moveByDefault = event.IsChecked();
1106 }
1107
1108 void DnDFrame::OnDragMoveAllow(wxCommandEvent& event)
1109 {
1110     m_moveAllow = event.IsChecked();
1111 }
1112
1113 void DnDFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
1114 {
1115     wxMessageBox(_T("Drag-&-Drop Demo\n")
1116                  _T("Please see \"Help|Help...\" for details\n")
1117                  _T("Copyright (c) 1998 Vadim Zeitlin"),
1118                  _T("About wxDnD"),
1119                  wxICON_INFORMATION | wxOK,
1120                  this);
1121 }
1122
1123 void DnDFrame::OnHelp(wxCommandEvent& /* event */)
1124 {
1125     wxMessageDialog dialog(this,
1126                            _T("This small program demonstrates drag & drop support in wxWidgets. The program window\n")
1127                            _T("consists of 3 parts: the bottom pane is for debug messages, so that you can see what's\n")
1128                            _T("going on inside. The top part is split into 2 listboxes, the left one accepts files\n")
1129                            _T("and the right one accepts text.\n")
1130                            _T("\n")
1131                            _T("To test wxDropTarget: open wordpad (write.exe), select some text in it and drag it to\n")
1132                            _T("the right listbox (you'll notice the usual visual feedback, i.e. the cursor will change).\n")
1133                            _T("Also, try dragging some files (you can select several at once) from Windows Explorer (or \n")
1134                            _T("File Manager) to the left pane. Hold down Ctrl/Shift keys when you drop text (doesn't \n")
1135                            _T("work with files) and see what changes.\n")
1136                            _T("\n")
1137                            _T("To test wxDropSource: just press any mouse button on the empty zone of the window and drag\n")
1138                            _T("it to wordpad or any other droptarget accepting text (and of course you can just drag it\n")
1139                            _T("to the right pane). Due to a lot of trace messages, the cursor might take some time to \n")
1140                            _T("change, don't release the mouse button until it does. You can change the string being\n")
1141                            _T("dragged in in \"File|Test drag...\" dialog.\n")
1142                            _T("\n")
1143                            _T("\n")
1144                            _T("Please send all questions/bug reports/suggestions &c to \n")
1145                            _T("Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>"),
1146                            _T("wxDnD Help"));
1147
1148     dialog.ShowModal();
1149 }
1150
1151 #if wxUSE_LOG
1152 void DnDFrame::OnLogClear(wxCommandEvent& /* event */ )
1153 {
1154     m_ctrlLog->Clear();
1155     m_ctrlText->Clear();
1156     m_ctrlFile->Clear();
1157 }
1158 #endif // wxUSE_LOG
1159
1160 void DnDFrame::OnLeftDown(wxMouseEvent &WXUNUSED(event) )
1161 {
1162 #if wxUSE_DRAG_AND_DROP
1163     if ( !m_strText.empty() )
1164     {
1165         // start drag operation
1166         wxTextDataObject textData(m_strText);
1167 /*
1168         wxFileDataObject textData;
1169         textData.AddFile( "/file1.txt" );
1170         textData.AddFile( "/file2.txt" );
1171 */
1172         wxDropSource source(textData, this,
1173                             wxDROP_ICON(dnd_copy),
1174                             wxDROP_ICON(dnd_move),
1175                             wxDROP_ICON(dnd_none));
1176
1177         int flags = 0;
1178         if ( m_moveByDefault )
1179             flags |= wxDrag_DefaultMove;
1180         else if ( m_moveAllow )
1181             flags |= wxDrag_AllowMove;
1182
1183         wxDragResult result = source.DoDragDrop(flags);
1184
1185 #if wxUSE_STATUSBAR
1186         const wxChar *pc;
1187         switch ( result )
1188         {
1189             case wxDragError:   pc = _T("Error!");    break;
1190             case wxDragNone:    pc = _T("Nothing");   break;
1191             case wxDragCopy:    pc = _T("Copied");    break;
1192             case wxDragMove:    pc = _T("Moved");     break;
1193             case wxDragCancel:  pc = _T("Cancelled"); break;
1194             default:            pc = _T("Huh?");      break;
1195         }
1196
1197         SetStatusText(wxString(_T("Drag result: ")) + pc);
1198 #else
1199         wxUnusedVar(result);
1200 #endif // wxUSE_STATUSBAR
1201     }
1202 #endif // wxUSE_DRAG_AND_DROP
1203 }
1204
1205 void DnDFrame::OnRightDown(wxMouseEvent &event )
1206 {
1207     wxMenu menu(_T("Dnd sample menu"));
1208
1209     menu.Append(Menu_Drag, _T("&Test drag..."));
1210     menu.AppendSeparator();
1211     menu.Append(Menu_About, _T("&About"));
1212
1213     PopupMenu( &menu, event.GetX(), event.GetY() );
1214 }
1215
1216 DnDFrame::~DnDFrame()
1217 {
1218 #if wxUSE_LOG
1219     if ( m_pLog != NULL ) {
1220         if ( wxLog::SetActiveTarget(m_pLogPrev) == m_pLog )
1221             delete m_pLog;
1222     }
1223 #endif // wxUSE_LOG
1224 }
1225
1226 // ---------------------------------------------------------------------------
1227 // bitmap clipboard
1228 // ---------------------------------------------------------------------------
1229
1230 void DnDFrame::OnCopyBitmap(wxCommandEvent& WXUNUSED(event))
1231 {
1232     // PNG support is not always compiled in under Windows, so use BMP there
1233 #if wxUSE_LIBPNG
1234     wxFileDialog dialog(this, _T("Open a PNG file"), wxEmptyString, wxEmptyString, _T("PNG files (*.png)|*.png"), 0);
1235 #else
1236     wxFileDialog dialog(this, _T("Open a BMP file"), wxEmptyString, wxEmptyString, _T("BMP files (*.bmp)|*.bmp"), 0);
1237 #endif
1238
1239     if (dialog.ShowModal() != wxID_OK)
1240     {
1241         wxLogMessage( _T("Aborted file open") );
1242         return;
1243     }
1244
1245     if (dialog.GetPath().empty())
1246     {
1247         wxLogMessage( _T("Returned empty string.") );
1248         return;
1249     }
1250
1251     if (!wxFileExists(dialog.GetPath()))
1252     {
1253         wxLogMessage( _T("File doesn't exist.") );
1254         return;
1255     }
1256
1257     wxImage image;
1258     image.LoadFile( dialog.GetPath(),
1259 #if wxUSE_LIBPNG
1260                     wxBITMAP_TYPE_PNG
1261 #else
1262                     wxBITMAP_TYPE_BMP
1263 #endif
1264                   );
1265     if (!image.Ok())
1266     {
1267         wxLogError( _T("Invalid image file...") );
1268         return;
1269     }
1270
1271     wxLogStatus( _T("Decoding image file...") );
1272     wxYield();
1273
1274     wxBitmap bitmap( image );
1275
1276     if ( !wxTheClipboard->Open() )
1277     {
1278         wxLogError(_T("Can't open clipboard."));
1279
1280         return;
1281     }
1282
1283     wxLogMessage( _T("Creating wxBitmapDataObject...") );
1284     wxYield();
1285
1286     if ( !wxTheClipboard->AddData(new wxBitmapDataObject(bitmap)) )
1287     {
1288         wxLogError(_T("Can't copy image to the clipboard."));
1289     }
1290     else
1291     {
1292         wxLogMessage(_T("Image has been put on the clipboard.") );
1293         wxLogMessage(_T("You can paste it now and look at it.") );
1294     }
1295
1296     wxTheClipboard->Close();
1297 }
1298
1299 void DnDFrame::OnPasteBitmap(wxCommandEvent& WXUNUSED(event))
1300 {
1301     if ( !wxTheClipboard->Open() )
1302     {
1303         wxLogError(_T("Can't open clipboard."));
1304
1305         return;
1306     }
1307
1308     if ( !wxTheClipboard->IsSupported(wxDF_BITMAP) )
1309     {
1310         wxLogWarning(_T("No bitmap on clipboard"));
1311
1312         wxTheClipboard->Close();
1313         return;
1314     }
1315
1316     wxBitmapDataObject data;
1317     if ( !wxTheClipboard->GetData(data) )
1318     {
1319         wxLogError(_T("Can't paste bitmap from the clipboard"));
1320     }
1321     else
1322     {
1323         const wxBitmap& bmp = data.GetBitmap();
1324
1325         wxLogMessage(_T("Bitmap %dx%d pasted from the clipboard"),
1326                      bmp.GetWidth(), bmp.GetHeight());
1327         ShowBitmap(bmp);
1328     }
1329
1330     wxTheClipboard->Close();
1331 }
1332
1333 #if wxUSE_METAFILE
1334
1335 void DnDFrame::OnPasteMetafile(wxCommandEvent& WXUNUSED(event))
1336 {
1337     if ( !wxTheClipboard->Open() )
1338     {
1339         wxLogError(_T("Can't open clipboard."));
1340
1341         return;
1342     }
1343
1344     if ( !wxTheClipboard->IsSupported(wxDF_METAFILE) )
1345     {
1346         wxLogWarning(_T("No metafile on clipboard"));
1347     }
1348     else
1349     {
1350         wxMetaFileDataObject data;
1351         if ( !wxTheClipboard->GetData(data) )
1352         {
1353             wxLogError(_T("Can't paste metafile from the clipboard"));
1354         }
1355         else
1356         {
1357             const wxMetaFile& mf = data.GetMetafile();
1358
1359             wxLogMessage(_T("Metafile %dx%d pasted from the clipboard"),
1360                          mf.GetWidth(), mf.GetHeight());
1361
1362             ShowMetaFile(mf);
1363         }
1364     }
1365
1366     wxTheClipboard->Close();
1367 }
1368
1369 #endif // wxUSE_METAFILE
1370
1371 // ----------------------------------------------------------------------------
1372 // file clipboard
1373 // ----------------------------------------------------------------------------
1374
1375 void DnDFrame::OnCopyFiles(wxCommandEvent& WXUNUSED(event))
1376 {
1377 #ifdef __WXMSW__
1378     wxFileDialog dialog(this, _T("Select a file to copy"), wxEmptyString, wxEmptyString,
1379                          _T("All files (*.*)|*.*"), 0);
1380
1381     wxArrayString filenames;
1382     while ( dialog.ShowModal() == wxID_OK )
1383     {
1384         filenames.Add(dialog.GetPath());
1385     }
1386
1387     if ( !filenames.IsEmpty() )
1388     {
1389         wxFileDataObject *dobj = new wxFileDataObject;
1390         size_t count = filenames.GetCount();
1391         for ( size_t n = 0; n < count; n++ )
1392         {
1393             dobj->AddFile(filenames[n]);
1394         }
1395
1396         wxClipboardLocker locker;
1397         if ( !locker )
1398         {
1399             wxLogError(wxT("Can't open clipboard"));
1400         }
1401         else
1402         {
1403             if ( !wxTheClipboard->AddData(dobj) )
1404             {
1405                 wxLogError(wxT("Can't copy file(s) to the clipboard"));
1406             }
1407             else
1408             {
1409                 wxLogStatus(this, wxT("%d file%s copied to the clipboard"),
1410                             count, count == 1 ? wxEmptyString : wxEmptyString);
1411             }
1412         }
1413     }
1414     else
1415     {
1416         wxLogStatus(this, wxT("Aborted"));
1417     }
1418 #else // !MSW
1419     wxLogError(wxT("Sorry, not implemented"));
1420 #endif // MSW/!MSW
1421 }
1422
1423 // ---------------------------------------------------------------------------
1424 // text clipboard
1425 // ---------------------------------------------------------------------------
1426
1427 void DnDFrame::OnCopy(wxCommandEvent& WXUNUSED(event))
1428 {
1429     if ( !wxTheClipboard->Open() )
1430     {
1431         wxLogError(_T("Can't open clipboard."));
1432
1433         return;
1434     }
1435
1436     if ( !wxTheClipboard->AddData(new wxTextDataObject(m_strText)) )
1437     {
1438         wxLogError(_T("Can't copy data to the clipboard"));
1439     }
1440     else
1441     {
1442         wxLogMessage(_T("Text '%s' put on the clipboard"), m_strText.c_str());
1443     }
1444
1445     wxTheClipboard->Close();
1446 }
1447
1448 void DnDFrame::OnPaste(wxCommandEvent& WXUNUSED(event))
1449 {
1450     if ( !wxTheClipboard->Open() )
1451     {
1452         wxLogError(_T("Can't open clipboard."));
1453
1454         return;
1455     }
1456
1457     if ( !wxTheClipboard->IsSupported(wxDF_TEXT) )
1458     {
1459         wxLogWarning(_T("No text data on clipboard"));
1460
1461         wxTheClipboard->Close();
1462         return;
1463     }
1464
1465     wxTextDataObject text;
1466     if ( !wxTheClipboard->GetData(text) )
1467     {
1468         wxLogError(_T("Can't paste data from the clipboard"));
1469     }
1470     else
1471     {
1472         wxLogMessage(_T("Text '%s' pasted from the clipboard"),
1473                      text.GetText().c_str());
1474     }
1475
1476     wxTheClipboard->Close();
1477 }
1478
1479 #if wxUSE_DRAG_AND_DROP
1480
1481 // ----------------------------------------------------------------------------
1482 // Notifications called by the base class
1483 // ----------------------------------------------------------------------------
1484
1485 bool DnDText::OnDropText(wxCoord, wxCoord, const wxString& text)
1486 {
1487     m_pOwner->Append(text);
1488
1489     return true;
1490 }
1491
1492 bool DnDFile::OnDropFiles(wxCoord, wxCoord, const wxArrayString& filenames)
1493 {
1494     size_t nFiles = filenames.GetCount();
1495     wxString str;
1496     str.Printf( _T("%d files dropped"), (int)nFiles);
1497     m_pOwner->Append(str);
1498     for ( size_t n = 0; n < nFiles; n++ ) {
1499         m_pOwner->Append(filenames[n]);
1500     }
1501
1502     return true;
1503 }
1504
1505 // ----------------------------------------------------------------------------
1506 // DnDShapeDialog
1507 // ----------------------------------------------------------------------------
1508
1509 DnDShapeDialog::DnDShapeDialog(wxFrame *parent, DnDShape *shape)
1510   :wxDialog( parent, 6001, wxT("Choose Shape"), wxPoint( 10, 10 ),
1511              wxSize( 40, 40 ),
1512              wxDEFAULT_DIALOG_STYLE | wxRAISED_BORDER | wxRESIZE_BORDER )
1513 {
1514     m_shape = shape;
1515     wxBoxSizer* topSizer = new wxBoxSizer( wxVERTICAL );
1516
1517     // radio box
1518     wxBoxSizer* shapesSizer = new wxBoxSizer( wxHORIZONTAL );
1519     const wxString choices[] = { wxT("None"), wxT("Triangle"),
1520                                  wxT("Rectangle"), wxT("Ellipse") };
1521
1522     m_radio = new wxRadioBox( this, wxID_ANY, wxT("&Shape"),
1523                               wxDefaultPosition, wxDefaultSize, 4, choices, 4,
1524                               wxRA_SPECIFY_COLS );
1525     shapesSizer->Add( m_radio, 0, wxGROW|wxALL, 5 );
1526     topSizer->Add( shapesSizer, 0, wxALL, 2 );
1527
1528     // attributes
1529     wxStaticBox* box = new wxStaticBox( this, wxID_ANY, wxT("&Attributes") );
1530     wxStaticBoxSizer* attrSizer = new wxStaticBoxSizer( box, wxHORIZONTAL );
1531     wxFlexGridSizer* xywhSizer = new wxFlexGridSizer( 4, 2 );
1532
1533     wxStaticText* st;
1534
1535     st = new wxStaticText( this, wxID_ANY, wxT("Position &X:") );
1536     m_textX = new wxTextCtrl( this, wxID_ANY, wxEmptyString, wxDefaultPosition,
1537                               wxSize( 30, 20 ) );
1538     xywhSizer->Add( st, 1, wxGROW|wxALL, 2 );
1539     xywhSizer->Add( m_textX, 1, wxGROW|wxALL, 2 );
1540
1541     st = new wxStaticText( this, wxID_ANY, wxT("Size &width:") );
1542     m_textW = new wxTextCtrl( this, wxID_ANY, wxEmptyString, wxDefaultPosition,
1543                               wxSize( 30, 20 ) );
1544     xywhSizer->Add( st, 1, wxGROW|wxALL, 2 );
1545     xywhSizer->Add( m_textW, 1, wxGROW|wxALL, 2 );
1546
1547     st = new wxStaticText( this, wxID_ANY, wxT("&Y:") );
1548     m_textY = new wxTextCtrl( this, wxID_ANY, wxEmptyString, wxDefaultPosition,
1549                               wxSize( 30, 20 ) );
1550     xywhSizer->Add( st, 1, wxALL|wxALIGN_RIGHT, 2 );
1551     xywhSizer->Add( m_textY, 1, wxGROW|wxALL, 2 );
1552
1553     st = new wxStaticText( this, wxID_ANY, wxT("&height:") );
1554     m_textH = new wxTextCtrl( this, wxID_ANY, wxEmptyString, wxDefaultPosition,
1555                               wxSize( 30, 20 ) );
1556     xywhSizer->Add( st, 1, wxALL|wxALIGN_RIGHT, 2 );
1557     xywhSizer->Add( m_textH, 1, wxGROW|wxALL, 2 );
1558
1559     wxButton* col = new wxButton( this, Button_Colour, wxT("&Colour...") );
1560     attrSizer->Add( xywhSizer, 1, wxGROW );
1561     attrSizer->Add( col, 0, wxALL|wxALIGN_CENTRE_VERTICAL, 2 );
1562     topSizer->Add( attrSizer, 0, wxGROW|wxALL, 5 );
1563
1564     // buttons
1565     wxBoxSizer* buttonSizer = new wxBoxSizer( wxHORIZONTAL );
1566     wxButton* bt;
1567     bt = new wxButton( this, wxID_OK, wxT("Ok") );
1568     buttonSizer->Add( bt, 0, wxALL, 2 );
1569     bt = new wxButton( this, wxID_CANCEL, wxT("Cancel") );
1570     buttonSizer->Add( bt, 0, wxALL, 2 );
1571     topSizer->Add( buttonSizer, 0, wxALL|wxALIGN_RIGHT, 2 );
1572
1573     SetSizer( topSizer );
1574     topSizer->Fit( this );
1575 }
1576
1577 DnDShape *DnDShapeDialog::GetShape() const
1578 {
1579     switch ( m_shapeKind )
1580     {
1581         default:
1582         case DnDShape::None:      return NULL;
1583         case DnDShape::Triangle:  return new DnDTriangularShape(m_pos, m_size, m_col);
1584         case DnDShape::Rectangle: return new DnDRectangularShape(m_pos, m_size, m_col);
1585         case DnDShape::Ellipse:   return new DnDEllipticShape(m_pos, m_size, m_col);
1586     }
1587 }
1588
1589 bool DnDShapeDialog::TransferDataToWindow()
1590 {
1591
1592     if ( m_shape )
1593     {
1594         m_radio->SetSelection(m_shape->GetKind());
1595         m_pos = m_shape->GetPosition();
1596         m_size = m_shape->GetSize();
1597         m_col = m_shape->GetColour();
1598     }
1599     else
1600     {
1601         m_radio->SetSelection(DnDShape::None);
1602         m_pos = wxPoint(1, 1);
1603         m_size = wxSize(100, 100);
1604     }
1605
1606     m_textX->SetValue(wxString() << m_pos.x);
1607     m_textY->SetValue(wxString() << m_pos.y);
1608     m_textW->SetValue(wxString() << m_size.x);
1609     m_textH->SetValue(wxString() << m_size.y);
1610
1611     return true;
1612 }
1613
1614 bool DnDShapeDialog::TransferDataFromWindow()
1615 {
1616     m_shapeKind = (DnDShape::Kind)m_radio->GetSelection();
1617
1618     m_pos.x = wxAtoi(m_textX->GetValue());
1619     m_pos.y = wxAtoi(m_textY->GetValue());
1620     m_size.x = wxAtoi(m_textW->GetValue());
1621     m_size.y = wxAtoi(m_textH->GetValue());
1622
1623     if ( !m_pos.x || !m_pos.y || !m_size.x || !m_size.y )
1624     {
1625         wxMessageBox(_T("All sizes and positions should be non null!"),
1626                      _T("Invalid shape"), wxICON_HAND | wxOK, this);
1627
1628         return false;
1629     }
1630
1631     return true;
1632 }
1633
1634 void DnDShapeDialog::OnColour(wxCommandEvent& WXUNUSED(event))
1635 {
1636     wxColourData data;
1637     data.SetChooseFull(true);
1638     for (int i = 0; i < 16; i++)
1639     {
1640         wxColour colour((unsigned char)(i*16), (unsigned char)(i*16), (unsigned char)(i*16));
1641         data.SetCustomColour(i, colour);
1642     }
1643
1644     wxColourDialog dialog(this, &data);
1645     if ( dialog.ShowModal() == wxID_OK )
1646     {
1647         m_col = dialog.GetColourData().GetColour();
1648     }
1649 }
1650
1651 // ----------------------------------------------------------------------------
1652 // DnDShapeFrame
1653 // ----------------------------------------------------------------------------
1654
1655 DnDShapeFrame *DnDShapeFrame::ms_lastDropTarget = NULL;
1656
1657 DnDShapeFrame::DnDShapeFrame(wxFrame *parent)
1658              : wxFrame(parent, wxID_ANY, _T("Shape Frame"))
1659 {
1660 #if wxUSE_STATUSBAR
1661     CreateStatusBar();
1662 #endif // wxUSE_STATUSBAR
1663
1664     wxMenu *menuShape = new wxMenu;
1665     menuShape->Append(Menu_Shape_New, _T("&New default shape\tCtrl-S"));
1666     menuShape->Append(Menu_Shape_Edit, _T("&Edit shape\tCtrl-E"));
1667     menuShape->AppendSeparator();
1668     menuShape->Append(Menu_Shape_Clear, _T("&Clear shape\tCtrl-L"));
1669
1670     wxMenu *menuClipboard = new wxMenu;
1671     menuClipboard->Append(Menu_ShapeClipboard_Copy, _T("&Copy\tCtrl-C"));
1672     menuClipboard->Append(Menu_ShapeClipboard_Paste, _T("&Paste\tCtrl-V"));
1673
1674     wxMenuBar *menubar = new wxMenuBar;
1675     menubar->Append(menuShape, _T("&Shape"));
1676     menubar->Append(menuClipboard, _T("&Clipboard"));
1677
1678     SetMenuBar(menubar);
1679
1680 #if wxUSE_STATUSBAR
1681     SetStatusText(_T("Press Ctrl-S to create a new shape"));
1682 #endif // wxUSE_STATUSBAR
1683
1684     SetDropTarget(new DnDShapeDropTarget(this));
1685
1686     m_shape = NULL;
1687
1688     SetBackgroundColour(*wxWHITE);
1689 }
1690
1691 DnDShapeFrame::~DnDShapeFrame()
1692 {
1693     if (m_shape)
1694         delete m_shape;
1695 }
1696
1697 void DnDShapeFrame::SetShape(DnDShape *shape)
1698 {
1699     if (m_shape)
1700         delete m_shape;
1701     m_shape = shape;
1702     Refresh();
1703 }
1704
1705 // callbacks
1706 void DnDShapeFrame::OnDrag(wxMouseEvent& event)
1707 {
1708     if ( !m_shape )
1709     {
1710         event.Skip();
1711
1712         return;
1713     }
1714
1715     // start drag operation
1716     DnDShapeDataObject shapeData(m_shape);
1717     wxDropSource source(shapeData, this);
1718
1719     const wxChar *pc = NULL;
1720     switch ( source.DoDragDrop(true) )
1721     {
1722         default:
1723         case wxDragError:
1724             wxLogError(wxT("An error occurred during drag and drop operation"));
1725             break;
1726
1727         case wxDragNone:
1728 #if wxUSE_STATUSBAR
1729             SetStatusText(_T("Nothing happened"));
1730 #endif // wxUSE_STATUSBAR
1731             break;
1732
1733         case wxDragCopy:
1734             pc = _T("copied");
1735             break;
1736
1737         case wxDragMove:
1738             pc = _T("moved");
1739             if ( ms_lastDropTarget != this )
1740             {
1741                 // don't delete the shape if we dropped it on ourselves!
1742                 SetShape(NULL);
1743             }
1744             break;
1745
1746         case wxDragCancel:
1747 #if wxUSE_STATUSBAR
1748             SetStatusText(_T("Drag and drop operation cancelled"));
1749 #endif // wxUSE_STATUSBAR
1750             break;
1751     }
1752
1753     if ( pc )
1754     {
1755 #if wxUSE_STATUSBAR
1756         SetStatusText(wxString(_T("Shape successfully ")) + pc);
1757 #endif // wxUSE_STATUSBAR
1758     }
1759     //else: status text already set
1760 }
1761
1762 void DnDShapeFrame::OnDrop(wxCoord x, wxCoord y, DnDShape *shape)
1763 {
1764     ms_lastDropTarget = this;
1765
1766     wxPoint pt(x, y);
1767
1768 #if wxUSE_STATUSBAR
1769     wxString s;
1770     s.Printf(wxT("Shape dropped at (%d, %d)"), pt.x, pt.y);
1771     SetStatusText(s);
1772 #endif // wxUSE_STATUSBAR
1773
1774     shape->Move(pt);
1775     SetShape(shape);
1776 }
1777
1778 void DnDShapeFrame::OnEditShape(wxCommandEvent& WXUNUSED(event))
1779 {
1780     DnDShapeDialog dlg(this, m_shape);
1781     if ( dlg.ShowModal() == wxID_OK )
1782     {
1783         SetShape(dlg.GetShape());
1784
1785 #if wxUSE_STATUSBAR
1786         if ( m_shape )
1787         {
1788             SetStatusText(_T("You can now drag the shape to another frame"));
1789         }
1790 #endif // wxUSE_STATUSBAR
1791     }
1792 }
1793
1794 void DnDShapeFrame::OnNewShape(wxCommandEvent& WXUNUSED(event))
1795 {
1796     SetShape(new DnDEllipticShape(wxPoint(10, 10), wxSize(80, 60), *wxRED));
1797
1798 #if wxUSE_STATUSBAR
1799     SetStatusText(_T("You can now drag the shape to another frame"));
1800 #endif // wxUSE_STATUSBAR
1801 }
1802
1803 void DnDShapeFrame::OnClearShape(wxCommandEvent& WXUNUSED(event))
1804 {
1805     SetShape(NULL);
1806 }
1807
1808 void DnDShapeFrame::OnCopyShape(wxCommandEvent& WXUNUSED(event))
1809 {
1810     if ( m_shape )
1811     {
1812         wxClipboardLocker clipLocker;
1813         if ( !clipLocker )
1814         {
1815             wxLogError(wxT("Can't open the clipboard"));
1816
1817             return;
1818         }
1819
1820         wxTheClipboard->AddData(new DnDShapeDataObject(m_shape));
1821     }
1822 }
1823
1824 void DnDShapeFrame::OnPasteShape(wxCommandEvent& WXUNUSED(event))
1825 {
1826     wxClipboardLocker clipLocker;
1827     if ( !clipLocker )
1828     {
1829         wxLogError(wxT("Can't open the clipboard"));
1830
1831         return;
1832     }
1833
1834     DnDShapeDataObject shapeDataObject(NULL);
1835     if ( wxTheClipboard->GetData(shapeDataObject) )
1836     {
1837         SetShape(shapeDataObject.GetShape());
1838     }
1839     else
1840     {
1841         wxLogStatus(wxT("No shape on the clipboard"));
1842     }
1843 }
1844
1845 void DnDShapeFrame::OnUpdateUICopy(wxUpdateUIEvent& event)
1846 {
1847     event.Enable( m_shape != NULL );
1848 }
1849
1850 void DnDShapeFrame::OnUpdateUIPaste(wxUpdateUIEvent& event)
1851 {
1852     event.Enable( wxTheClipboard->IsSupported(wxDataFormat(shapeFormatId)) );
1853 }
1854
1855 void DnDShapeFrame::OnPaint(wxPaintEvent& event)
1856 {
1857     if ( m_shape )
1858     {
1859         wxPaintDC dc(this);
1860
1861         m_shape->Draw(dc);
1862     }
1863     else
1864     {
1865         event.Skip();
1866     }
1867 }
1868
1869 // ----------------------------------------------------------------------------
1870 // DnDShape
1871 // ----------------------------------------------------------------------------
1872
1873 DnDShape *DnDShape::New(const void *buf)
1874 {
1875     const ShapeDump& dump = *(const ShapeDump *)buf;
1876     switch ( dump.k )
1877     {
1878         case Triangle:
1879             return new DnDTriangularShape(wxPoint(dump.x, dump.y),
1880                                           wxSize(dump.w, dump.h),
1881                                           wxColour(dump.r, dump.g, dump.b));
1882
1883         case Rectangle:
1884             return new DnDRectangularShape(wxPoint(dump.x, dump.y),
1885                                            wxSize(dump.w, dump.h),
1886                                            wxColour(dump.r, dump.g, dump.b));
1887
1888         case Ellipse:
1889             return new DnDEllipticShape(wxPoint(dump.x, dump.y),
1890                                         wxSize(dump.w, dump.h),
1891                                         wxColour(dump.r, dump.g, dump.b));
1892
1893         default:
1894             wxFAIL_MSG(wxT("invalid shape!"));
1895             return NULL;
1896     }
1897 }
1898
1899 // ----------------------------------------------------------------------------
1900 // DnDShapeDataObject
1901 // ----------------------------------------------------------------------------
1902
1903 #if wxUSE_METAFILE
1904
1905 void DnDShapeDataObject::CreateMetaFile() const
1906 {
1907     wxPoint pos = m_shape->GetPosition();
1908     wxSize size = m_shape->GetSize();
1909
1910     wxMetaFileDC dcMF(wxEmptyString, pos.x + size.x, pos.y + size.y);
1911
1912     m_shape->Draw(dcMF);
1913
1914     wxMetafile *mf = dcMF.Close();
1915
1916     DnDShapeDataObject *self = (DnDShapeDataObject *)this; // const_cast
1917     self->m_dobjMetaFile.SetMetafile(*mf);
1918     self->m_hasMetaFile = true;
1919
1920     delete mf;
1921 }
1922
1923 #endif // wxUSE_METAFILE
1924
1925 void DnDShapeDataObject::CreateBitmap() const
1926 {
1927     wxPoint pos = m_shape->GetPosition();
1928     wxSize size = m_shape->GetSize();
1929     int x = pos.x + size.x,
1930         y = pos.y + size.y;
1931     wxBitmap bitmap(x, y);
1932     wxMemoryDC dc;
1933     dc.SelectObject(bitmap);
1934     dc.SetBrush(wxBrush(wxT("white"), wxSOLID));
1935     dc.Clear();
1936     m_shape->Draw(dc);
1937     dc.SelectObject(wxNullBitmap);
1938
1939     DnDShapeDataObject *self = (DnDShapeDataObject *)this; // const_cast
1940     self->m_dobjBitmap.SetBitmap(bitmap);
1941     self->m_hasBitmap = true;
1942 }
1943
1944 #endif // wxUSE_DRAG_AND_DROP
1945
1946 // ----------------------------------------------------------------------------
1947 // global functions
1948 // ----------------------------------------------------------------------------
1949
1950 static void ShowBitmap(const wxBitmap& bitmap)
1951 {
1952     wxFrame *frame = new wxFrame(NULL, wxID_ANY, _T("Bitmap view"));
1953 #if wxUSE_STATUSBAR
1954     frame->CreateStatusBar();
1955 #endif // wxUSE_STATUSBAR
1956     DnDCanvasBitmap *canvas = new DnDCanvasBitmap(frame);
1957     canvas->SetBitmap(bitmap);
1958
1959     int w = bitmap.GetWidth(),
1960         h = bitmap.GetHeight();
1961 #if wxUSE_STATUSBAR
1962     frame->SetStatusText(wxString::Format(_T("%dx%d"), w, h));
1963 #endif // wxUSE_STATUSBAR
1964
1965     frame->SetClientSize(w > 100 ? 100 : w, h > 100 ? 100 : h);
1966     frame->Show(true);
1967 }
1968
1969 #if wxUSE_METAFILE
1970
1971 static void ShowMetaFile(const wxMetaFile& metafile)
1972 {
1973     wxFrame *frame = new wxFrame(NULL, wxID_ANY, _T("Metafile view"));
1974     frame->CreateStatusBar();
1975     DnDCanvasMetafile *canvas = new DnDCanvasMetafile(frame);
1976     canvas->SetMetafile(metafile);
1977
1978     wxSize size = metafile.GetSize();
1979     frame->SetStatusText(wxString::Format(_T("%dx%d"), size.x, size.y));
1980
1981     frame->SetClientSize(size.x > 100 ? 100 : size.x,
1982                          size.y > 100 ? 100 : size.y);
1983     frame->Show();
1984 }
1985
1986 #endif // wxUSE_METAFILE
1987
1988 #endif // wxUSE_DRAG_AND_DROP || wxUSE_CLIPBOARD