src/msw/clipbrd.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        clipbrd.cpp
   3 // Purpose:     Clipboard functionality
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart and Markus Holzem
   9 // Licence:     wxWindows license
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ===========================================================================
  13 // declarations
  14 // ===========================================================================
  15
  16 // ---------------------------------------------------------------------------
  17 // headers
  18 // ---------------------------------------------------------------------------
  19
  20 #ifdef __GNUG__
  21     #pragma implementation "clipbrd.h"
  22 #endif
  23
  24 // For compilers that support precompilation, includes "wx.h".
  25 #include "wx/wxprec.h"
  26
  27 #ifdef __BORLANDC__
  28     #pragma hdrstop
  29 #endif
  30
  31 #ifndef WX_PRECOMP
  32     #include "wx/setup.h"
  33 #endif
  34
  35 #if wxUSE_CLIPBOARD
  36
  37 #ifndef WX_PRECOMP
  38     #include "wx/object.h"
  39     #include "wx/event.h"
  40     #include "wx/app.h"
  41     #include "wx/frame.h"
  42     #include "wx/bitmap.h"
  43     #include "wx/utils.h"
  44     #include "wx/intl.h"
  45 #endif
  46
  47 #if wxUSE_METAFILE
  48     #include "wx/metafile.h"
  49 #endif
  50
  51 #include "wx/log.h"
  52 #include "wx/clipbrd.h"
  53
  54 #include <string.h>
  55 #include <windows.h>
  56
  57 #include "wx/msw/private.h"
  58
  59 #ifndef __WXMICROWIN__
  60 #include "wx/msw/dib.h"
  61 #endif
  62
  63 // wxDataObject is tied to OLE/drag and drop implementation, therefore so are
  64 // the functions using wxDataObject in wxClipboard
  65 //#define wxUSE_DATAOBJ wxUSE_DRAG_AND_DROP
  66
  67 #if wxUSE_DATAOBJ
  68     #include "wx/dataobj.h"
  69 #endif
  70
  71 #if wxUSE_OLE
  72     // use OLE clipboard
  73     #define wxUSE_OLE_CLIPBOARD 1
  74 #else // !wxUSE_DATAOBJ
  75     // use Win clipboard API
  76     #define wxUSE_OLE_CLIPBOARD 0
  77 #endif
  78
  79 #if wxUSE_OLE_CLIPBOARD
  80     #include <ole2.h>
  81 #endif // wxUSE_OLE_CLIPBOARD
  82
  83 #ifdef __WIN16__
  84     #define memcpy hmemcpy
  85 #endif
  86
  87 // ===========================================================================
  88 // implementation
  89 // ===========================================================================
  90
  91 // ---------------------------------------------------------------------------
  92 // old-style clipboard functions using Windows API
  93 // ---------------------------------------------------------------------------
  94
  95 static bool gs_wxClipboardIsOpen = FALSE;
  96
  97 bool wxOpenClipboard()
  98 {
  99     wxCHECK_MSG( !gs_wxClipboardIsOpen, TRUE, wxT("clipboard already opened.") );
 100
 101     wxWindow *win = wxTheApp->GetTopWindow();
 102     if ( win )
 103     {
 104         gs_wxClipboardIsOpen = ::OpenClipboard((HWND)win->GetHWND()) != 0;
 105
 106         if ( !gs_wxClipboardIsOpen )
 107             wxLogSysError(_("Failed to open the clipboard."));
 108
 109         return gs_wxClipboardIsOpen;
 110     }
 111     else
 112     {
 113         wxLogDebug(wxT("Can not open clipboard without a main window."));
 114
 115         return FALSE;
 116     }
 117 }
 118
 119 bool wxCloseClipboard()
 120 {
 121     wxCHECK_MSG( gs_wxClipboardIsOpen, FALSE, wxT("clipboard is not opened") );
 122
 123     gs_wxClipboardIsOpen = FALSE;
 124
 125     if ( ::CloseClipboard() == 0 )
 126     {
 127         wxLogSysError(_("Failed to close the clipboard."));
 128
 129         return FALSE;
 130     }
 131
 132     return TRUE;
 133 }
 134
 135 bool wxEmptyClipboard()
 136 {
 137     if ( ::EmptyClipboard() == 0 )
 138     {
 139         wxLogSysError(_("Failed to empty the clipboard."));
 140
 141         return FALSE;
 142     }
 143
 144     return TRUE;
 145 }
 146
 147 bool wxIsClipboardOpened()
 148 {
 149   return gs_wxClipboardIsOpen;
 150 }
 151
 152 bool wxIsClipboardFormatAvailable(wxDataFormat dataFormat)
 153 {
 154     if ( ::IsClipboardFormatAvailable(dataFormat) )
 155     {
 156         // ok from the first try
 157         return TRUE;
 158     }
 159
 160     // for several standard formats, we can convert from some other ones too
 161     switch ( dataFormat.GetFormatId() )
 162     {
 163         // for bitmaps, DIBs will also do
 164         case CF_BITMAP:
 165             return ::IsClipboardFormatAvailable(CF_DIB) != 0;
 166
 167 #if wxUSE_ENH_METAFILE && !defined(__WIN16__)
 168         case CF_METAFILEPICT:
 169             return ::IsClipboardFormatAvailable(CF_ENHMETAFILE) != 0;
 170 #endif // wxUSE_ENH_METAFILE
 171
 172         default:
 173             return FALSE;
 174     }
 175 }
 176
 177 bool wxSetClipboardData(wxDataFormat dataFormat,
 178                         const void *data,
 179                         int width, int height)
 180 {
 181     HANDLE handle = 0; // return value of SetClipboardData
 182
 183     switch (dataFormat)
 184     {
 185         case wxDF_BITMAP:
 186             {
 187                 wxBitmap *bitmap = (wxBitmap *)data;
 188
 189                 HDC hdcMem = CreateCompatibleDC((HDC) NULL);
 190                 HDC hdcSrc = CreateCompatibleDC((HDC) NULL);
 191                 HBITMAP old = (HBITMAP)
 192                     ::SelectObject(hdcSrc, (HBITMAP)bitmap->GetHBITMAP());
 193                 HBITMAP hBitmap = CreateCompatibleBitmap(hdcSrc,
 194                                                          bitmap->GetWidth(),
 195                                                          bitmap->GetHeight());
 196                 if (!hBitmap)
 197                 {
 198                     SelectObject(hdcSrc, old);
 199                     DeleteDC(hdcMem);
 200                     DeleteDC(hdcSrc);
 201                     return FALSE;
 202                 }
 203
 204                 HBITMAP old1 = (HBITMAP) SelectObject(hdcMem, hBitmap);
 205                 BitBlt(hdcMem, 0, 0, bitmap->GetWidth(), bitmap->GetHeight(),
 206                        hdcSrc, 0, 0, SRCCOPY);
 207
 208                 // Select new bitmap out of memory DC
 209                 SelectObject(hdcMem, old1);
 210
 211                 // Set the data
 212                 handle = ::SetClipboardData(CF_BITMAP, hBitmap);
 213
 214                 // Clean up
 215                 SelectObject(hdcSrc, old);
 216                 DeleteDC(hdcSrc);
 217                 DeleteDC(hdcMem);
 218                 break;
 219             }
 220
 221         case wxDF_DIB:
 222             {
 223 #if wxUSE_IMAGE_LOADING_IN_MSW
 224                 wxBitmap *bitmap = (wxBitmap *)data;
 225                 HBITMAP hBitmap = (HBITMAP)bitmap->GetHBITMAP();
 226                 // NULL palette means to use the system one
 227                 HANDLE hDIB = wxBitmapToDIB(hBitmap, (HPALETTE)NULL);
 228                 handle = SetClipboardData(CF_DIB, hDIB);
 229 #endif // wxUSE_IMAGE_LOADING_IN_MSW
 230                 break;
 231             }
 232
 233     // VZ: I'm told that this code works, but it doesn't seem to work for me
 234     //     and, anyhow, I'd be highly surprized if it did. So I leave it here
 235     //     but IMNSHO it is completely broken.
 236 #if wxUSE_METAFILE && !defined(wxMETAFILE_IS_ENH)
 237         case wxDF_METAFILE:
 238             {
 239                 wxMetafile *wxMF = (wxMetafile *)data;
 240                 HANDLE data = GlobalAlloc(GHND, sizeof(METAFILEPICT) + 1);
 241                 METAFILEPICT *mf = (METAFILEPICT *)GlobalLock(data);
 242
 243                 mf->mm = wxMF->GetWindowsMappingMode();
 244                 mf->xExt = width;
 245                 mf->yExt = height;
 246                 mf->hMF = (HMETAFILE) wxMF->GetHMETAFILE();
 247                 GlobalUnlock(data);
 248                 wxMF->SetHMETAFILE((WXHANDLE) NULL);
 249
 250                 handle = SetClipboardData(CF_METAFILEPICT, data);
 251                 break;
 252             }
 253 #endif // wxUSE_METAFILE
 254
 255 #if wxUSE_ENH_METAFILE && !defined(__WIN16__)
 256         case wxDF_ENHMETAFILE:
 257             {
 258                 wxEnhMetaFile *emf = (wxEnhMetaFile *)data;
 259                 wxEnhMetaFile emfCopy = *emf;
 260
 261                 handle = SetClipboardData(CF_ENHMETAFILE,
 262                                           (void *)emfCopy.GetHENHMETAFILE());
 263             }
 264             break;
 265 #endif // wxUSE_ENH_METAFILE
 266
 267         case CF_SYLK:
 268         case CF_DIF:
 269         case CF_TIFF:
 270         case CF_PALETTE:
 271         default:
 272             {
 273                 wxLogError(_("Unsupported clipboard format."));
 274                 return FALSE;
 275             }
 276
 277         case wxDF_OEMTEXT:
 278             dataFormat = wxDF_TEXT;
 279             // fall through
 280
 281         case wxDF_TEXT:
 282             {
 283                 char *s = (char *)data;
 284
 285                 width = strlen(s) + 1;
 286                 height = 1;
 287                 DWORD l = (width * height);
 288                 HANDLE hGlobalMemory = GlobalAlloc(GHND, l);
 289                 if ( hGlobalMemory )
 290                 {
 291                     LPSTR lpGlobalMemory = (LPSTR)GlobalLock(hGlobalMemory);
 292
 293                     memcpy(lpGlobalMemory, s, l);
 294
 295                     GlobalUnlock(hGlobalMemory);
 296                 }
 297
 298                 handle = SetClipboardData(dataFormat, hGlobalMemory);
 299                 break;
 300             }
 301     }
 302
 303     if ( handle == 0 )
 304     {
 305         wxLogSysError(_("Failed to set clipboard data."));
 306
 307         return FALSE;
 308     }
 309
 310     return TRUE;
 311 }
 312
 313 void *wxGetClipboardData(wxDataFormat dataFormat, long *len)
 314 {
 315     void *retval = NULL;
 316
 317     switch ( dataFormat )
 318     {
 319         case wxDF_BITMAP:
 320             {
 321                 BITMAP bm;
 322                 HBITMAP hBitmap = (HBITMAP) GetClipboardData(CF_BITMAP);
 323                 if (!hBitmap)
 324                     break;
 325
 326                 HDC hdcMem = CreateCompatibleDC((HDC) NULL);
 327                 HDC hdcSrc = CreateCompatibleDC((HDC) NULL);
 328
 329                 HBITMAP old = (HBITMAP) ::SelectObject(hdcSrc, hBitmap);
 330                 GetObject(hBitmap, sizeof(BITMAP), (LPSTR)&bm);
 331
 332                 HBITMAP hNewBitmap = CreateBitmapIndirect(&bm);
 333
 334                 if (!hNewBitmap)
 335                 {
 336                     SelectObject(hdcSrc, old);
 337                     DeleteDC(hdcMem);
 338                     DeleteDC(hdcSrc);
 339                     break;
 340                 }
 341
 342                 HBITMAP old1 = (HBITMAP) SelectObject(hdcMem, hNewBitmap);
 343                 BitBlt(hdcMem, 0, 0, bm.bmWidth, bm.bmHeight,
 344                        hdcSrc, 0, 0, SRCCOPY);
 345
 346                 // Select new bitmap out of memory DC
 347                 SelectObject(hdcMem, old1);
 348
 349                 // Clean up
 350                 SelectObject(hdcSrc, old);
 351                 DeleteDC(hdcSrc);
 352                 DeleteDC(hdcMem);
 353
 354                 // Create and return a new wxBitmap
 355                 wxBitmap *wxBM = new wxBitmap;
 356                 wxBM->SetHBITMAP((WXHBITMAP) hNewBitmap);
 357                 wxBM->SetWidth(bm.bmWidth);
 358                 wxBM->SetHeight(bm.bmHeight);
 359                 wxBM->SetDepth(bm.bmPlanes);
 360 #if WXWIN_COMPATIBILITY_2
 361                 wxBM->SetOk(TRUE);
 362 #endif // WXWIN_COMPATIBILITY_2
 363                 retval = wxBM;
 364                 break;
 365             }
 366
 367         case wxDF_METAFILE:
 368         case CF_SYLK:
 369         case CF_DIF:
 370         case CF_TIFF:
 371         case CF_PALETTE:
 372         case wxDF_DIB:
 373             wxLogError(_("Unsupported clipboard format."));
 374             return NULL;
 375
 376         case wxDF_OEMTEXT:
 377             dataFormat = wxDF_TEXT;
 378             // fall through
 379
 380         case wxDF_TEXT:
 381             {
 382                 HANDLE hGlobalMemory = ::GetClipboardData(dataFormat);
 383                 if (!hGlobalMemory)
 384                     break;
 385
 386                 DWORD hsize = ::GlobalSize(hGlobalMemory);
 387                 if (len)
 388                     *len = hsize;
 389
 390                 char *s = new char[hsize];
 391                 if (!s)
 392                     break;
 393
 394                 LPSTR lpGlobalMemory = (LPSTR)::GlobalLock(hGlobalMemory);
 395
 396                 memcpy(s, lpGlobalMemory, hsize);
 397
 398                 ::GlobalUnlock(hGlobalMemory);
 399
 400                 retval = s;
 401                 break;
 402             }
 403
 404         default:
 405             {
 406                 HANDLE hGlobalMemory = ::GetClipboardData(dataFormat);
 407                 if ( !hGlobalMemory )
 408                     break;
 409
 410                 DWORD size = ::GlobalSize(hGlobalMemory);
 411                 if ( len )
 412                     *len = size;
 413
 414                 void *buf = malloc(size);
 415                 if ( !buf )
 416                     break;
 417
 418                 LPSTR lpGlobalMemory = (LPSTR)::GlobalLock(hGlobalMemory);
 419
 420                 memcpy(buf, lpGlobalMemory, size);
 421
 422                 ::GlobalUnlock(hGlobalMemory);
 423
 424                 retval = buf;
 425                 break;
 426             }
 427     }
 428
 429     if ( !retval )
 430     {
 431         wxLogSysError(_("Failed to retrieve data from the clipboard."));
 432     }
 433
 434     return retval;
 435 }
 436
 437 wxDataFormat wxEnumClipboardFormats(wxDataFormat dataFormat)
 438 {
 439   return (wxDataFormat::NativeFormat)::EnumClipboardFormats(dataFormat);
 440 }
 441
 442 int wxRegisterClipboardFormat(wxChar *formatName)
 443 {
 444   return ::RegisterClipboardFormat(formatName);
 445 }
 446
 447 bool wxGetClipboardFormatName(wxDataFormat dataFormat,
 448                               wxChar *formatName,
 449                               int maxCount)
 450 {
 451   return ::GetClipboardFormatName((int)dataFormat, formatName, maxCount) > 0;
 452 }
 453
 454 // ---------------------------------------------------------------------------
 455 // wxClipboard
 456 // ---------------------------------------------------------------------------
 457
 458 IMPLEMENT_DYNAMIC_CLASS(wxClipboard, wxObject)
 459
 460 wxClipboard::wxClipboard()
 461 {
 462     m_clearOnExit = FALSE;
 463 }
 464
 465 wxClipboard::~wxClipboard()
 466 {
 467     if ( m_clearOnExit )
 468     {
 469         Clear();
 470     }
 471 }
 472
 473 void wxClipboard::Clear()
 474 {
 475 #if wxUSE_OLE_CLIPBOARD
 476     if ( FAILED(OleSetClipboard(NULL)) )
 477     {
 478         wxLogLastError(wxT("OleSetClipboard(NULL)"));
 479     }
 480 #endif
 481 }
 482
 483 bool wxClipboard::Flush()
 484 {
 485 #if wxUSE_OLE_CLIPBOARD
 486     if ( FAILED(OleFlushClipboard()) )
 487     {
 488         wxLogLastError(wxT("OleFlushClipboard"));
 489
 490         return FALSE;
 491     }
 492     else
 493     {
 494         m_clearOnExit = FALSE;
 495
 496         return TRUE;
 497     }
 498 #else // !wxUSE_OLE_CLIPBOARD
 499     return FALSE;
 500 #endif // wxUSE_OLE_CLIPBOARD/!wxUSE_OLE_CLIPBOARD
 501 }
 502
 503 bool wxClipboard::Open()
 504 {
 505     // OLE opens clipboard for us
 506 #if wxUSE_OLE_CLIPBOARD
 507     return TRUE;
 508 #else
 509     return wxOpenClipboard();
 510 #endif
 511 }
 512
 513 bool wxClipboard::IsOpened() const
 514 {
 515 #if wxUSE_OLE_CLIPBOARD
 516     return TRUE;
 517 #else
 518     return wxIsClipboardOpened();
 519 #endif
 520 }
 521
 522 bool wxClipboard::SetData( wxDataObject *data )
 523 {
 524 #if !wxUSE_OLE_CLIPBOARD
 525     (void)wxEmptyClipboard();
 526 #endif // wxUSE_OLE_CLIPBOARD
 527
 528     if ( data )
 529         return AddData(data);
 530     else
 531         return TRUE;
 532 }
 533
 534 bool wxClipboard::AddData( wxDataObject *data )
 535 {
 536     wxCHECK_MSG( data, FALSE, wxT("data is invalid") );
 537
 538 #if wxUSE_OLE_CLIPBOARD
 539     HRESULT hr = OleSetClipboard(data->GetInterface());
 540     if ( FAILED(hr) )
 541     {
 542         wxLogSysError(hr, _("Failed to put data on the clipboard"));
 543
 544         // don't free anything in this case
 545
 546         return FALSE;
 547     }
 548
 549     // we have a problem here because we should delete wxDataObject, but we
 550     // can't do it because IDataObject which we just gave to the clipboard
 551     // would try to use it when it will need the data. IDataObject is ref
 552     // counted and so doesn't suffer from such problem, so we release it now
 553     // and tell it to delete wxDataObject when it is deleted itself.
 554     data->SetAutoDelete();
 555
 556     // we have to call either OleSetClipboard(NULL) or OleFlushClipboard() when
 557     // using OLE clipboard when the app terminates - by default, we call
 558     // OleSetClipboard(NULL) which won't waste RAM, but the app can call
 559     // wxClipboard::Flush() to chaneg this
 560     m_clearOnExit = TRUE;
 561
 562     return TRUE;
 563 #elif wxUSE_DATAOBJ
 564     wxCHECK_MSG( wxIsClipboardOpened(), FALSE, wxT("clipboard not open") );
 565
 566     wxDataFormat format = data->GetPreferredFormat();
 567
 568     switch ( format )
 569     {
 570         case wxDF_TEXT:
 571         case wxDF_OEMTEXT:
 572         {
 573             wxTextDataObject* textDataObject = (wxTextDataObject*) data;
 574             wxString str(textDataObject->GetText());
 575             return wxSetClipboardData(format, str.c_str());
 576         }
 577
 578         case wxDF_BITMAP:
 579         case wxDF_DIB:
 580         {
 581             wxBitmapDataObject* bitmapDataObject = (wxBitmapDataObject*) data;
 582             wxBitmap bitmap(bitmapDataObject->GetBitmap());
 583             return wxSetClipboardData(data->GetPreferredFormat(), &bitmap);
 584         }
 585
 586 #if wxUSE_METAFILE
 587         case wxDF_METAFILE:
 588         {
 589 #if 1
 590             // TODO
 591             wxLogError("Not implemented because wxMetafileDataObject does not contain width and height values.");
 592             return FALSE;
 593 #else
 594             wxMetafileDataObject* metaFileDataObject =
 595                 (wxMetafileDataObject*) data;
 596             wxMetafile metaFile = metaFileDataObject->GetMetafile();
 597             return wxSetClipboardData(wxDF_METAFILE, &metaFile,
 598                                       metaFileDataObject->GetWidth(),
 599                                       metaFileDataObject->GetHeight());
 600 #endif
 601         }
 602 #endif // wxUSE_METAFILE
 603
 604         default:
 605         {
 606 // This didn't compile, of course
 607 //            return wxSetClipboardData(data);
 608             // TODO
 609             wxLogError("Not implemented.");
 610             return FALSE;
 611         }
 612     }
 613 #else // !wxUSE_DATAOBJ
 614     return FALSE;
 615 #endif // wxUSE_DATAOBJ/!wxUSE_DATAOBJ
 616 }
 617
 618 void wxClipboard::Close()
 619 {
 620     // OLE closes clipboard for us
 621 #if !wxUSE_OLE_CLIPBOARD
 622     wxCloseClipboard();
 623 #endif
 624 }
 625
 626 bool wxClipboard::IsSupported( wxDataFormat format )
 627 {
 628     return wxIsClipboardFormatAvailable(format);
 629 }
 630
 631 bool wxClipboard::GetData( wxDataObject& data )
 632 {
 633 #if wxUSE_OLE_CLIPBOARD
 634     IDataObject *pDataObject = NULL;
 635     HRESULT hr = OleGetClipboard(&pDataObject);
 636     if ( FAILED(hr) || !pDataObject )
 637     {
 638         wxLogSysError(hr, _("Failed to get data from the clipboard"));
 639
 640         return FALSE;
 641     }
 642
 643     // build the list of supported formats
 644     size_t nFormats = data.GetFormatCount(wxDataObject::Set);
 645     wxDataFormat format;
 646     wxDataFormat *formats;
 647     if ( nFormats == 1 )
 648     {
 649         // the most common case
 650         formats = &format;
 651     }
 652     else
 653     {
 654         // bad luck, need to alloc mem
 655         formats = new wxDataFormat[nFormats];
 656     }
 657
 658     data.GetAllFormats(formats, wxDataObject::Set);
 659
 660     // get the format enumerator
 661     bool result = FALSE;
 662     wxArrayInt supportedFormats;
 663     IEnumFORMATETC *pEnumFormatEtc = NULL;
 664     hr = pDataObject->EnumFormatEtc(DATADIR_GET, &pEnumFormatEtc);
 665     if ( FAILED(hr) || !pEnumFormatEtc )
 666     {
 667         wxLogSysError(hr,
 668                       _("Failed to retrieve the supported clipboard formats"));
 669     }
 670     else
 671     {
 672         // ask for the supported formats and see if there are any we support
 673         FORMATETC formatEtc;
 674         for ( ;; )
 675         {
 676             ULONG nCount;
 677             hr = pEnumFormatEtc->Next(1, &formatEtc, &nCount);
 678
 679             // don't use FAILED() because S_FALSE would pass it
 680             if ( hr != S_OK )
 681             {
 682                 // no more formats
 683                 break;
 684             }
 685
 686             CLIPFORMAT cf = formatEtc.cfFormat;
 687
 688 #ifdef __WXDEBUG__
 689             wxLogTrace(wxTRACE_OleCalls,
 690                        wxT("Object on the clipboard supports format %s."),
 691                        wxDataObject::GetFormatName(cf));
 692 #endif // Debug
 693
 694             // is supported?
 695             for ( size_t n = 0; n < nFormats; n++ )
 696             {
 697                 if ( formats[n].GetFormatId() == cf )
 698                 {
 699                     if ( supportedFormats.Index(cf) == wxNOT_FOUND )
 700                     {
 701                         supportedFormats.Add(cf);
 702                     }
 703                 }
 704             }
 705         }
 706
 707         pEnumFormatEtc->Release();
 708     }
 709
 710     if ( formats != &format )
 711     {
 712         delete [] formats;
 713     }
 714     //else: we didn't allocate any memory
 715
 716     if ( !supportedFormats.IsEmpty() )
 717     {
 718         FORMATETC formatEtc;
 719         formatEtc.ptd      = NULL;
 720         formatEtc.dwAspect = DVASPECT_CONTENT;
 721         formatEtc.lindex   = -1;
 722
 723         size_t nSupportedFormats = supportedFormats.GetCount();
 724         for ( size_t n = 0; !result && (n < nSupportedFormats); n++ )
 725         {
 726             STGMEDIUM medium;
 727             formatEtc.cfFormat = supportedFormats[n];
 728
 729             // use the appropriate tymed
 730             switch ( formatEtc.cfFormat )
 731             {
 732                 case CF_BITMAP:
 733                     formatEtc.tymed = TYMED_GDI;
 734                     break;
 735
 736                 case CF_METAFILEPICT:
 737                     formatEtc.tymed = TYMED_MFPICT;
 738                     break;
 739
 740                 case CF_ENHMETAFILE:
 741                     formatEtc.tymed = TYMED_ENHMF;
 742                     break;
 743
 744                 default:
 745                     formatEtc.tymed = TYMED_HGLOBAL;
 746             }
 747
 748             // try to get data
 749             hr = pDataObject->GetData(&formatEtc, &medium);
 750             if ( FAILED(hr) )
 751             {
 752                 // try other tymed for GDI objects
 753                 if ( formatEtc.cfFormat == CF_BITMAP )
 754                 {
 755                     formatEtc.tymed = TYMED_HGLOBAL;
 756                     hr = pDataObject->GetData(&formatEtc, &medium);
 757                 }
 758             }
 759
 760             if ( SUCCEEDED(hr) )
 761             {
 762                 // pass the data to the data object
 763                 hr = data.GetInterface()->SetData(&formatEtc, &medium, TRUE);
 764                 if ( FAILED(hr) )
 765                 {
 766                     wxLogDebug(wxT("Failed to set data in wxIDataObject"));
 767
 768                     // IDataObject only takes the ownership of data if it
 769                     // successfully got it - which is not the case here
 770                     ReleaseStgMedium(&medium);
 771                 }
 772                 else
 773                 {
 774                     result = TRUE;
 775                 }
 776             }
 777             //else: unsupported tymed?
 778         }
 779     }
 780     //else: unsupported format
 781
 782     // clean up and return
 783     pDataObject->Release();
 784
 785     return result;
 786 #elif wxUSE_DATAOBJ
 787     wxCHECK_MSG( wxIsClipboardOpened(), FALSE, wxT("clipboard not open") );
 788
 789     wxDataFormat format = data.GetPreferredFormat();
 790     switch ( format )
 791     {
 792         case wxDF_TEXT:
 793         case wxDF_OEMTEXT:
 794         {
 795             wxTextDataObject& textDataObject = (wxTextDataObject &)data;
 796             char* s = (char*)wxGetClipboardData(format);
 797             if ( !s )
 798                 return FALSE;
 799
 800             textDataObject.SetText(s);
 801             delete [] s;
 802
 803             return TRUE;
 804         }
 805
 806         case wxDF_BITMAP:
 807         case wxDF_DIB:
 808         {
 809             wxBitmapDataObject& bitmapDataObject = (wxBitmapDataObject &)data;
 810             wxBitmap* bitmap = (wxBitmap *)wxGetClipboardData(data.GetPreferredFormat());
 811             if ( !bitmap )
 812                 return FALSE;
 813
 814             bitmapDataObject.SetBitmap(*bitmap);
 815             delete bitmap;
 816
 817             return TRUE;
 818         }
 819 #if wxUSE_METAFILE
 820         case wxDF_METAFILE:
 821         {
 822             wxMetafileDataObject& metaFileDataObject = (wxMetafileDataObject &)data;
 823             wxMetafile* metaFile = (wxMetafile *)wxGetClipboardData(wxDF_METAFILE);
 824             if ( !metaFile )
 825                 return FALSE;
 826
 827             metaFileDataObject.SetMetafile(*metaFile);
 828             delete metaFile;
 829
 830             return TRUE;
 831         }
 832 #endif // wxUSE_METAFILE
 833     }
 834     return FALSE;
 835 #else // !wxUSE_DATAOBJ
 836     wxFAIL_MSG( wxT("no clipboard implementation") );
 837     return FALSE;
 838 #endif // wxUSE_OLE_CLIPBOARD/wxUSE_DATAOBJ
 839 }
 840
 841 #endif // wxUSE_CLIPBOARD
 842