X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/2d120f8391920145647ec10e84629bc21fa9f1bb..4b2424bcadbc87babd3367d243b957e49333eeae:/src/msw/clipbrd.cpp?ds=sidebyside diff --git a/src/msw/clipbrd.cpp b/src/msw/clipbrd.cpp index 8a18cf4e5c..013448c3ac 100644 --- a/src/msw/clipbrd.cpp +++ b/src/msw/clipbrd.cpp @@ -6,502 +6,838 @@ // Created: 04/01/98 // RCS-ID: $Id$ // Copyright: (c) Julian Smart and Markus Holzem -// Licence: wxWindows license +// Licence: wxWindows license ///////////////////////////////////////////////////////////////////////////// +// =========================================================================== +// declarations +// =========================================================================== + +// --------------------------------------------------------------------------- +// headers +// --------------------------------------------------------------------------- + #ifdef __GNUG__ -#pragma implementation "clipbrd.h" + #pragma implementation "clipbrd.h" #endif // For compilers that support precompilation, includes "wx.h". #include "wx/wxprec.h" #ifdef __BORLANDC__ -#pragma hdrstop + #pragma hdrstop #endif #ifndef WX_PRECOMP -#include "wx/setup.h" + #include "wx/setup.h" #endif #if wxUSE_CLIPBOARD #ifndef WX_PRECOMP -#include "wx/object.h" -#include "wx/event.h" -#include "wx/app.h" -#include "wx/frame.h" -#include "wx/bitmap.h" -#include "wx/utils.h" + #include "wx/object.h" + #include "wx/event.h" + #include "wx/app.h" + #include "wx/frame.h" + #include "wx/bitmap.h" + #include "wx/utils.h" + #include "wx/intl.h" #endif #if wxUSE_METAFILE -#include "wx/metafile.h" + #include "wx/metafile.h" #endif +#include "wx/log.h" #include "wx/clipbrd.h" +#include #include -HICON myIcon; - #include "wx/msw/private.h" + +#ifndef __WXMICROWIN__ #include "wx/msw/dib.h" +#endif + +// wxDataObject is tied to OLE/drag and drop implementation, therefore so are +// the functions using wxDataObject in wxClipboard +//#define wxUSE_DATAOBJ wxUSE_DRAG_AND_DROP -// wxDataObject is tied to OLE/drag and drop implementation, -// therefore so is wxClipboard :-( -#if wxUSE_DRAG_AND_DROP -#include "wx/dataobj.h" +#if wxUSE_DATAOBJ + #include "wx/dataobj.h" #endif -#include +#if wxUSE_OLE + // use OLE clipboard + #define wxUSE_OLE_CLIPBOARD 1 +#else // !wxUSE_DATAOBJ + // use Win clipboard API + #define wxUSE_OLE_CLIPBOARD 0 +#endif -bool wxClipboardIsOpen = FALSE; +#if wxUSE_OLE_CLIPBOARD + #include +#endif // wxUSE_OLE_CLIPBOARD -bool wxOpenClipboard(void) -{ - if (wxTheApp->GetTopWindow() && !wxClipboardIsOpen) - { - wxClipboardIsOpen = (::OpenClipboard((HWND) wxTheApp->GetTopWindow()->GetHWND()) != 0); - return wxClipboardIsOpen; - } - else return FALSE; -} +#ifdef __WIN16__ + #define memcpy hmemcpy +#endif + +// =========================================================================== +// implementation +// =========================================================================== + +// --------------------------------------------------------------------------- +// old-style clipboard functions using Windows API +// --------------------------------------------------------------------------- -bool wxCloseClipboard(void) +static bool gs_wxClipboardIsOpen = FALSE; + +bool wxOpenClipboard() { - if (wxClipboardIsOpen) - { - wxClipboardIsOpen = FALSE; - } - return (::CloseClipboard() != 0); + wxCHECK_MSG( !gs_wxClipboardIsOpen, TRUE, wxT("clipboard already opened.") ); + + wxWindow *win = wxTheApp->GetTopWindow(); + if ( win ) + { + gs_wxClipboardIsOpen = ::OpenClipboard((HWND)win->GetHWND()) != 0; + + if ( !gs_wxClipboardIsOpen ) + wxLogSysError(_("Failed to open the clipboard.")); + + return gs_wxClipboardIsOpen; + } + else + { + wxLogDebug(wxT("Can not open clipboard without a main window.")); + + return FALSE; + } } -bool wxEmptyClipboard(void) +bool wxCloseClipboard() { - return (::EmptyClipboard() != 0); + wxCHECK_MSG( gs_wxClipboardIsOpen, FALSE, wxT("clipboard is not opened") ); + + gs_wxClipboardIsOpen = FALSE; + + if ( ::CloseClipboard() == 0 ) + { + wxLogSysError(_("Failed to close the clipboard.")); + + return FALSE; + } + + return TRUE; } -bool wxClipboardOpen(void) +bool wxEmptyClipboard() { - return wxClipboardIsOpen; + if ( ::EmptyClipboard() == 0 ) + { + wxLogSysError(_("Failed to empty the clipboard.")); + + return FALSE; + } + + return TRUE; } -bool wxIsClipboardFormatAvailable(wxDataFormat dataFormat) +bool wxIsClipboardOpened() { - return (::IsClipboardFormatAvailable(dataFormat) != 0); + return gs_wxClipboardIsOpen; } -bool wxSetClipboardData(wxDataFormat dataFormat, wxObject *obj, int width, int height) +bool wxIsClipboardFormatAvailable(wxDataFormat dataFormat) { - switch (dataFormat) - { - case wxDF_BITMAP: + if ( ::IsClipboardFormatAvailable(dataFormat) ) { - wxBitmap *wxBM = (wxBitmap *)obj; - - HDC hdcMem = CreateCompatibleDC(NULL); - HDC hdcSrc = CreateCompatibleDC(NULL); - HBITMAP old = (HBITMAP) ::SelectObject(hdcSrc, (HBITMAP) wxBM->GetHBITMAP()); - HBITMAP hBitmap = CreateCompatibleBitmap(hdcSrc, - wxBM->GetWidth(), wxBM->GetHeight()); - if (!hBitmap) - { - SelectObject(hdcSrc, old); - DeleteDC(hdcMem); - DeleteDC(hdcSrc); - return FALSE; - } - HBITMAP old1 = (HBITMAP) SelectObject(hdcMem, hBitmap); - BitBlt(hdcMem, 0, 0, wxBM->GetWidth(), wxBM->GetHeight(), - hdcSrc, 0, 0, SRCCOPY); - - // Select new bitmap out of memory DC - SelectObject(hdcMem, old1); - - // Set the data - bool success = (bool)(::SetClipboardData(CF_BITMAP, hBitmap) != 0); - - // Clean up - SelectObject(hdcSrc, old); - DeleteDC(hdcSrc); - DeleteDC(hdcMem); - return success; - break; + // ok from the first try + return TRUE; } - case wxDF_DIB: + + // for several standard formats, we can convert from some other ones too + switch ( dataFormat.GetFormatId() ) { -#if wxUSE_IMAGE_LOADING_IN_MSW - HBITMAP hBitmap=(HBITMAP) ((wxBitmap *)obj)->GetHBITMAP(); - HANDLE hDIB=BitmapToDIB(hBitmap,NULL); // NULL==uses system palette - bool success = (::SetClipboardData(CF_DIB,hDIB) != 0); -#else - bool success=FALSE; -#endif - return success; - break; + // for bitmaps, DIBs will also do + case CF_BITMAP: + return ::IsClipboardFormatAvailable(CF_DIB) != 0; + +#if wxUSE_ENH_METAFILE && !defined(__WIN16__) + case CF_METAFILEPICT: + return ::IsClipboardFormatAvailable(CF_ENHMETAFILE) != 0; +#endif // wxUSE_ENH_METAFILE + + default: + return FALSE; } -#if wxUSE_METAFILE - case wxDF_METAFILE: +} + +bool wxSetClipboardData(wxDataFormat dataFormat, + const void *data, + int width, int height) +{ + HANDLE handle = 0; // return value of SetClipboardData + + switch (dataFormat) { - wxMetafile *wxMF = (wxMetafile *)obj; - HANDLE data = GlobalAlloc(GHND, sizeof(METAFILEPICT) + 1); -#ifdef __WINDOWS_386__ - METAFILEPICT *mf = (METAFILEPICT *)MK_FP32(GlobalLock(data)); -#else - METAFILEPICT *mf = (METAFILEPICT *)GlobalLock(data); -#endif + case wxDF_BITMAP: + { + wxBitmap *bitmap = (wxBitmap *)data; + + HDC hdcMem = CreateCompatibleDC((HDC) NULL); + HDC hdcSrc = CreateCompatibleDC((HDC) NULL); + HBITMAP old = (HBITMAP) + ::SelectObject(hdcSrc, (HBITMAP)bitmap->GetHBITMAP()); + HBITMAP hBitmap = CreateCompatibleBitmap(hdcSrc, + bitmap->GetWidth(), + bitmap->GetHeight()); + if (!hBitmap) + { + SelectObject(hdcSrc, old); + DeleteDC(hdcMem); + DeleteDC(hdcSrc); + return FALSE; + } + + HBITMAP old1 = (HBITMAP) SelectObject(hdcMem, hBitmap); + BitBlt(hdcMem, 0, 0, bitmap->GetWidth(), bitmap->GetHeight(), + hdcSrc, 0, 0, SRCCOPY); + + // Select new bitmap out of memory DC + SelectObject(hdcMem, old1); + + // Set the data + handle = ::SetClipboardData(CF_BITMAP, hBitmap); + + // Clean up + SelectObject(hdcSrc, old); + DeleteDC(hdcSrc); + DeleteDC(hdcMem); + break; + } - mf->mm = wxMF->GetWindowsMappingMode(); - mf->xExt = width; - mf->yExt = height; - mf->hMF = (HMETAFILE) wxMF->GetHMETAFILE(); - GlobalUnlock(data); - wxMF->SetHMETAFILE((WXHANDLE) NULL); + case wxDF_DIB: + { +#if wxUSE_IMAGE_LOADING_IN_MSW + wxBitmap *bitmap = (wxBitmap *)data; + HBITMAP hBitmap = (HBITMAP)bitmap->GetHBITMAP(); + // NULL palette means to use the system one + HANDLE hDIB = wxBitmapToDIB(hBitmap, (HPALETTE)NULL); + handle = SetClipboardData(CF_DIB, hDIB); +#endif // wxUSE_IMAGE_LOADING_IN_MSW + break; + } + + // VZ: I'm told that this code works, but it doesn't seem to work for me + // and, anyhow, I'd be highly surprized if it did. So I leave it here + // but IMNSHO it is completely broken. +#if wxUSE_METAFILE && !defined(wxMETAFILE_IS_ENH) + case wxDF_METAFILE: + { + wxMetafile *wxMF = (wxMetafile *)data; + HANDLE data = GlobalAlloc(GHND, sizeof(METAFILEPICT) + 1); + METAFILEPICT *mf = (METAFILEPICT *)GlobalLock(data); + + mf->mm = wxMF->GetWindowsMappingMode(); + mf->xExt = width; + mf->yExt = height; + mf->hMF = (HMETAFILE) wxMF->GetHMETAFILE(); + GlobalUnlock(data); + wxMF->SetHMETAFILE((WXHANDLE) NULL); + + handle = SetClipboardData(CF_METAFILEPICT, data); + break; + } +#endif // wxUSE_METAFILE + +#if wxUSE_ENH_METAFILE && !defined(__WIN16__) + case wxDF_ENHMETAFILE: + { + wxEnhMetaFile *emf = (wxEnhMetaFile *)data; + wxEnhMetaFile emfCopy = *emf; - return (SetClipboardData(CF_METAFILEPICT, data) != 0); - break; + handle = SetClipboardData(CF_ENHMETAFILE, + (void *)emfCopy.GetHENHMETAFILE()); + } + break; +#endif // wxUSE_ENH_METAFILE + + case CF_SYLK: + case CF_DIF: + case CF_TIFF: + case CF_PALETTE: + default: + { + wxLogError(_("Unsupported clipboard format.")); + return FALSE; + } + + case wxDF_OEMTEXT: + dataFormat = wxDF_TEXT; + // fall through + + case wxDF_TEXT: + { + char *s = (char *)data; + + width = strlen(s) + 1; + height = 1; + DWORD l = (width * height); + HANDLE hGlobalMemory = GlobalAlloc(GHND, l); + if ( hGlobalMemory ) + { + LPSTR lpGlobalMemory = (LPSTR)GlobalLock(hGlobalMemory); + + memcpy(lpGlobalMemory, s, l); + + GlobalUnlock(hGlobalMemory); + } + + handle = SetClipboardData(dataFormat, hGlobalMemory); + break; + } } -#endif - case CF_SYLK: - case CF_DIF: - case CF_TIFF: - case CF_PALETTE: + + if ( handle == 0 ) { - return FALSE; - break; + wxLogSysError(_("Failed to set clipboard data.")); + + return FALSE; } - case wxDF_OEMTEXT: - dataFormat = wxDF_TEXT; - case wxDF_TEXT: - width = strlen((char *)obj) + 1; - height = 1; - default: + + return TRUE; +} + +void *wxGetClipboardData(wxDataFormat dataFormat, long *len) +{ + void *retval = NULL; + + switch ( dataFormat ) { - char *s = (char *)obj; - DWORD l; + case wxDF_BITMAP: + { + BITMAP bm; + HBITMAP hBitmap = (HBITMAP) GetClipboardData(CF_BITMAP); + if (!hBitmap) + break; + + HDC hdcMem = CreateCompatibleDC((HDC) NULL); + HDC hdcSrc = CreateCompatibleDC((HDC) NULL); + + HBITMAP old = (HBITMAP) ::SelectObject(hdcSrc, hBitmap); + GetObject(hBitmap, sizeof(BITMAP), (LPSTR)&bm); + + HBITMAP hNewBitmap = CreateBitmapIndirect(&bm); + + if (!hNewBitmap) + { + SelectObject(hdcSrc, old); + DeleteDC(hdcMem); + DeleteDC(hdcSrc); + break; + } + + HBITMAP old1 = (HBITMAP) SelectObject(hdcMem, hNewBitmap); + BitBlt(hdcMem, 0, 0, bm.bmWidth, bm.bmHeight, + hdcSrc, 0, 0, SRCCOPY); + + // Select new bitmap out of memory DC + SelectObject(hdcMem, old1); + + // Clean up + SelectObject(hdcSrc, old); + DeleteDC(hdcSrc); + DeleteDC(hdcMem); + + // Create and return a new wxBitmap + wxBitmap *wxBM = new wxBitmap; + wxBM->SetHBITMAP((WXHBITMAP) hNewBitmap); + wxBM->SetWidth(bm.bmWidth); + wxBM->SetHeight(bm.bmHeight); + wxBM->SetDepth(bm.bmPlanes); +#if WXWIN_COMPATIBILITY_2 + wxBM->SetOk(TRUE); +#endif // WXWIN_COMPATIBILITY_2 + retval = wxBM; + break; + } + + case wxDF_METAFILE: + case CF_SYLK: + case CF_DIF: + case CF_TIFF: + case CF_PALETTE: + case wxDF_DIB: + { + wxLogError(_("Unsupported clipboard format.")); + return FALSE; + } - l = (width * height); - HANDLE hGlobalMemory = GlobalAlloc(GHND, l); + case wxDF_OEMTEXT: + dataFormat = wxDF_TEXT; + // fall through + + case wxDF_TEXT: + { + HANDLE hGlobalMemory = ::GetClipboardData(dataFormat); if (!hGlobalMemory) - return FALSE; + break; -#ifdef __WINDOWS_386__ - LPSTR lpGlobalMemory = (LPSTR)MK_FP32(GlobalLock(hGlobalMemory)); -#else - LPSTR lpGlobalMemory = (LPSTR)GlobalLock(hGlobalMemory); -#endif + DWORD hsize = ::GlobalSize(hGlobalMemory); + if (len) + *len = hsize; -#ifdef __WIN32__ - memcpy(lpGlobalMemory, s, l); -#elif defined(__WATCOMC__) && defined(__WINDOWS_386__) - memcpy(lpGlobalMemory, s, l); -#else - hmemcpy(lpGlobalMemory, s, l); -#endif + char *s = new char[hsize]; + if (!s) + break; - GlobalUnlock(hGlobalMemory); - HANDLE success = SetClipboardData(dataFormat, hGlobalMemory); - return (success != 0); - break; - } - } - return FALSE; -} + LPSTR lpGlobalMemory = (LPSTR)::GlobalLock(hGlobalMemory); -wxObject *wxGetClipboardData(wxDataFormat dataFormat, long *len) -{ - switch (dataFormat) - { - case wxDF_BITMAP: - { - BITMAP bm; - HBITMAP hBitmap = (HBITMAP) GetClipboardData(CF_BITMAP); - if (!hBitmap) - return NULL; - - HDC hdcMem = CreateCompatibleDC(NULL); - HDC hdcSrc = CreateCompatibleDC(NULL); - - HBITMAP old = (HBITMAP) ::SelectObject(hdcSrc, hBitmap); - GetObject(hBitmap, sizeof(BITMAP), (LPSTR)&bm); - - HBITMAP hNewBitmap = CreateBitmapIndirect(&bm); - - if (!hNewBitmap) - { - SelectObject(hdcSrc, old); - DeleteDC(hdcMem); - DeleteDC(hdcSrc); - return NULL; - } - - HBITMAP old1 = (HBITMAP) SelectObject(hdcMem, hNewBitmap); - BitBlt(hdcMem, 0, 0, bm.bmWidth, bm.bmHeight, - hdcSrc, 0, 0, SRCCOPY); - - // Select new bitmap out of memory DC - SelectObject(hdcMem, old1); - - // Clean up - SelectObject(hdcSrc, old); - DeleteDC(hdcSrc); - DeleteDC(hdcMem); - - // Create and return a new wxBitmap - wxBitmap *wxBM = new wxBitmap; - wxBM->SetHBITMAP((WXHBITMAP) hNewBitmap); - wxBM->SetWidth(bm.bmWidth); - wxBM->SetHeight(bm.bmHeight); - wxBM->SetDepth(bm.bmPlanes); - wxBM->SetOk(TRUE); - return (wxObject *)wxBM; - break; - } - case wxDF_METAFILE: - case CF_SYLK: - case CF_DIF: - case CF_TIFF: - case CF_PALETTE: - case wxDF_DIB: - { - return FALSE; - break; - } - case wxDF_OEMTEXT: - dataFormat = wxDF_TEXT; - case wxDF_TEXT: - default: - { - HANDLE hGlobalMemory = GetClipboardData(dataFormat); - if (!hGlobalMemory) - return NULL; + memcpy(s, lpGlobalMemory, hsize); - int hsize = (int)GlobalSize(hGlobalMemory); - if (len) - *len = hsize; + ::GlobalUnlock(hGlobalMemory); - char *s = new char[hsize]; - if (!s) - return NULL; + retval = s; + break; + } -#ifdef __WINDOWS_386__ - LPSTR lpGlobalMemory = (LPSTR)MK_FP32(GlobalLock(hGlobalMemory)); -#else - LPSTR lpGlobalMemory = (LPSTR)GlobalLock(hGlobalMemory); -#endif + default: + { + HANDLE hGlobalMemory = ::GetClipboardData(dataFormat); + if ( !hGlobalMemory ) + break; -#ifdef __WIN32__ - memcpy(s, lpGlobalMemory, GlobalSize(hGlobalMemory)); -#elif __WATCOMC__ && defined(__WINDOWS_386__) - memcpy(s, lpGlobalMemory, GlobalSize(hGlobalMemory)); -#else - hmemcpy(s, lpGlobalMemory, GlobalSize(hGlobalMemory)); -#endif + DWORD size = ::GlobalSize(hGlobalMemory); + if ( len ) + *len = size; - GlobalUnlock(hGlobalMemory); + void *buf = malloc(size); + if ( !buf ) + break; - return (wxObject *)s; - break; + LPSTR lpGlobalMemory = (LPSTR)::GlobalLock(hGlobalMemory); + + memcpy(buf, lpGlobalMemory, size); + + ::GlobalUnlock(hGlobalMemory); + + retval = buf; + break; + } } - } - return NULL; + + if ( !retval ) + { + wxLogSysError(_("Failed to retrieve data from the clipboard.")); + } + + return retval; } -wxDataFormat wxEnumClipboardFormats(wxDataFormat dataFormat) +wxDataFormat wxEnumClipboardFormats(wxDataFormat dataFormat) { - return (wxDataFormat) ::EnumClipboardFormats(dataFormat); + return (wxDataFormat::NativeFormat)::EnumClipboardFormats(dataFormat); } -int wxRegisterClipboardFormat(char *formatName) +int wxRegisterClipboardFormat(wxChar *formatName) { return ::RegisterClipboardFormat(formatName); } -bool wxGetClipboardFormatName(wxDataFormat dataFormat, char *formatName, int maxCount) +bool wxGetClipboardFormatName(wxDataFormat dataFormat, + wxChar *formatName, + int maxCount) { - return (::GetClipboardFormatName((int) dataFormat, formatName, maxCount) > 0); + return ::GetClipboardFormatName((int)dataFormat, formatName, maxCount) > 0; } -//----------------------------------------------------------------------------- +// --------------------------------------------------------------------------- // wxClipboard -//----------------------------------------------------------------------------- +// --------------------------------------------------------------------------- -IMPLEMENT_DYNAMIC_CLASS(wxClipboard,wxObject) - -wxClipboard* wxTheClipboard = (wxClipboard*) NULL; +IMPLEMENT_DYNAMIC_CLASS(wxClipboard, wxObject) wxClipboard::wxClipboard() { - m_open = FALSE; + m_clearOnExit = FALSE; } wxClipboard::~wxClipboard() { - Clear(); + if ( m_clearOnExit ) + { + Clear(); + } } void wxClipboard::Clear() { - wxNode* node = m_data.First(); - while (node) +#if wxUSE_OLE_CLIPBOARD + if ( FAILED(OleSetClipboard(NULL)) ) { - wxDataObject* data = (wxDataObject*) node->Data(); - delete data; - node = node->Next(); + wxLogLastError(wxT("OleSetClipboard(NULL)")); } - m_data.Clear(); +#endif } -bool wxClipboard::Open() +bool wxClipboard::Flush() { - wxCHECK_MSG( !m_open, FALSE, "clipboard already open" ); - - m_open = TRUE; +#if wxUSE_OLE_CLIPBOARD + if ( FAILED(OleFlushClipboard()) ) + { + wxLogLastError(wxT("OleFlushClipboard")); + return FALSE; + } + else + { + m_clearOnExit = FALSE; + + return TRUE; + } +#else // !wxUSE_OLE_CLIPBOARD + return FALSE; +#endif // wxUSE_OLE_CLIPBOARD/!wxUSE_OLE_CLIPBOARD +} + +bool wxClipboard::Open() +{ + // OLE opens clipboard for us +#if wxUSE_OLE_CLIPBOARD + return TRUE; +#else return wxOpenClipboard(); +#endif +} + +bool wxClipboard::IsOpened() const +{ +#if wxUSE_OLE_CLIPBOARD + return TRUE; +#else + return wxIsClipboardOpened(); +#endif } bool wxClipboard::SetData( wxDataObject *data ) { -#if wxUSE_DRAG_AND_DROP - wxCHECK_MSG( data, FALSE, "data is invalid" ); - wxCHECK_MSG( m_open, FALSE, "clipboard not open" ); +#if !wxUSE_OLE_CLIPBOARD + (void)wxEmptyClipboard(); +#endif // wxUSE_OLE_CLIPBOARD + + if ( data ) + return AddData(data); + else + return TRUE; +} + +bool wxClipboard::AddData( wxDataObject *data ) +{ + wxCHECK_MSG( data, FALSE, wxT("data is invalid") ); + +#if wxUSE_OLE_CLIPBOARD + HRESULT hr = OleSetClipboard(data->GetInterface()); + if ( FAILED(hr) ) + { + wxLogSysError(hr, _("Failed to put data on the clipboard")); + + // don't free anything in this case + + return FALSE; + } - switch (data->GetFormat()) + // we have a problem here because we should delete wxDataObject, but we + // can't do it because IDataObject which we just gave to the clipboard + // would try to use it when it will need the data. IDataObject is ref + // counted and so doesn't suffer from such problem, so we release it now + // and tell it to delete wxDataObject when it is deleted itself. + data->SetAutoDelete(); + + // we have to call either OleSetClipboard(NULL) or OleFlushClipboard() when + // using OLE clipboard when the app terminates - by default, we call + // OleSetClipboard(NULL) which won't waste RAM, but the app can call + // wxClipboard::Flush() to chaneg this + m_clearOnExit = TRUE; + + return TRUE; +#elif wxUSE_DATAOBJ + wxCHECK_MSG( wxIsClipboardOpened(), FALSE, wxT("clipboard not open") ); + + wxDataFormat format = data->GetPreferredFormat(); + + switch ( format ) { case wxDF_TEXT: case wxDF_OEMTEXT: { wxTextDataObject* textDataObject = (wxTextDataObject*) data; wxString str(textDataObject->GetText()); - return wxSetClipboardData(data->GetFormat(), (wxObject*) (const char*) str); - break; + return wxSetClipboardData(format, str.c_str()); } + case wxDF_BITMAP: case wxDF_DIB: { wxBitmapDataObject* bitmapDataObject = (wxBitmapDataObject*) data; wxBitmap bitmap(bitmapDataObject->GetBitmap()); - return wxSetClipboardData(data->GetFormat(), & bitmap); - break; + return wxSetClipboardData(data->GetPreferredFormat(), &bitmap); } + #if wxUSE_METAFILE case wxDF_METAFILE: { - wxMetafileDataObject* metaFileDataObject = (wxMetafileDataObject*) data; +#if 1 + // TODO + wxLogError("Not implemented because wxMetafileDataObject does not contain width and height values."); + return FALSE; +#else + wxMetafileDataObject* metaFileDataObject = + (wxMetafileDataObject*) data; wxMetafile metaFile = metaFileDataObject->GetMetafile(); - return wxSetClipboardData(wxDF_METAFILE, & metaFile, metaFileDataObject->GetWidth(), metaFileDataObject->GetHeight()); - break; - } + return wxSetClipboardData(wxDF_METAFILE, &metaFile, + metaFileDataObject->GetWidth(), + metaFileDataObject->GetHeight()); #endif + } +#endif // wxUSE_METAFILE + default: { +// This didn't compile, of course +// return wxSetClipboardData(data); + // TODO + wxLogError("Not implemented."); return FALSE; } } - - return FALSE; -#else +#else // !wxUSE_DATAOBJ return FALSE; -#endif +#endif // wxUSE_DATAOBJ/!wxUSE_DATAOBJ } void wxClipboard::Close() { - wxCHECK_RET( m_open, "clipboard not open" ); - - m_open = FALSE; + // OLE closes clipboard for us +#if !wxUSE_OLE_CLIPBOARD wxCloseClipboard(); +#endif } -bool wxClipboard::IsSupportedFormat( wxDataFormat format, const wxString& WXUNUSED(id) ) +bool wxClipboard::IsSupported( wxDataFormat format ) { return wxIsClipboardFormatAvailable(format); } -bool wxClipboard::GetData( wxDataObject *data ) +bool wxClipboard::GetData( wxDataObject& data ) { - wxCHECK_MSG( m_open, FALSE, "clipboard not open" ); - -#if wxUSE_DRAG_AND_DROP - switch (data->GetFormat()) +#if wxUSE_OLE_CLIPBOARD + IDataObject *pDataObject = NULL; + HRESULT hr = OleGetClipboard(&pDataObject); + if ( FAILED(hr) || !pDataObject ) { - case wxDF_TEXT: - case wxDF_OEMTEXT: + wxLogSysError(hr, _("Failed to get data from the clipboard")); + + return FALSE; + } + + // build the list of supported formats + size_t nFormats = data.GetFormatCount(wxDataObject::Set); + wxDataFormat format; + wxDataFormat *formats; + if ( nFormats == 1 ) + { + // the most common case + formats = &format; + } + else + { + // bad luck, need to alloc mem + formats = new wxDataFormat[nFormats]; + } + + data.GetAllFormats(formats, wxDataObject::Set); + + // get the format enumerator + bool result = FALSE; + wxArrayInt supportedFormats; + IEnumFORMATETC *pEnumFormatEtc = NULL; + hr = pDataObject->EnumFormatEtc(DATADIR_GET, &pEnumFormatEtc); + if ( FAILED(hr) || !pEnumFormatEtc ) + { + wxLogSysError(hr, + _("Failed to retrieve the supported clipboard formats")); + } + else + { + // ask for the supported formats and see if there are any we support + FORMATETC formatEtc; + for ( ;; ) { - wxTextDataObject* textDataObject = (wxTextDataObject*) data; - char* s = (char*) wxGetClipboardData(data->GetFormat()); - if (s) + ULONG nCount; + hr = pEnumFormatEtc->Next(1, &formatEtc, &nCount); + + // don't use FAILED() because S_FALSE would pass it + if ( hr != S_OK ) + { + // no more formats + break; + } + + CLIPFORMAT cf = formatEtc.cfFormat; + +#ifdef __WXDEBUG__ + wxLogTrace(wxTRACE_OleCalls, + wxT("Object on the clipboard supports format %s."), + wxDataObject::GetFormatName(cf)); +#endif // Debug + + // is supported? + for ( size_t n = 0; n < nFormats; n++ ) + { + if ( formats[n].GetFormatId() == cf ) + { + if ( supportedFormats.Index(cf) == wxNOT_FOUND ) + { + supportedFormats.Add(cf); + } + } + } + } + + pEnumFormatEtc->Release(); + } + + if ( formats != &format ) + { + delete [] formats; + } + //else: we didn't allocate any memory + + if ( !supportedFormats.IsEmpty() ) + { + FORMATETC formatEtc; + formatEtc.ptd = NULL; + formatEtc.dwAspect = DVASPECT_CONTENT; + formatEtc.lindex = -1; + + size_t nSupportedFormats = supportedFormats.GetCount(); + for ( size_t n = 0; !result && (n < nSupportedFormats); n++ ) + { + STGMEDIUM medium; + formatEtc.cfFormat = supportedFormats[n]; + + // use the appropriate tymed + switch ( formatEtc.cfFormat ) + { + case CF_BITMAP: + formatEtc.tymed = TYMED_GDI; + break; + + case CF_METAFILEPICT: + formatEtc.tymed = TYMED_MFPICT; + break; + + case CF_ENHMETAFILE: + formatEtc.tymed = TYMED_ENHMF; + break; + + default: + formatEtc.tymed = TYMED_HGLOBAL; + } + + // try to get data + hr = pDataObject->GetData(&formatEtc, &medium); + if ( FAILED(hr) ) { - textDataObject->SetText(s); - delete[] s; - return TRUE; + // try other tymed for GDI objects + if ( formatEtc.cfFormat == CF_BITMAP ) + { + formatEtc.tymed = TYMED_HGLOBAL; + hr = pDataObject->GetData(&formatEtc, &medium); + } } - else + + if ( SUCCEEDED(hr) ) + { + // pass the data to the data object + hr = data.GetInterface()->SetData(&formatEtc, &medium, TRUE); + if ( FAILED(hr) ) + { + wxLogDebug(wxT("Failed to set data in wxIDataObject")); + + // IDataObject only takes the ownership of data if it + // successfully got it - which is not the case here + ReleaseStgMedium(&medium); + } + else + { + result = TRUE; + } + } + //else: unsupported tymed? + } + } + //else: unsupported format + + // clean up and return + pDataObject->Release(); + + return result; +#elif wxUSE_DATAOBJ + wxCHECK_MSG( wxIsClipboardOpened(), FALSE, wxT("clipboard not open") ); + + wxDataFormat format = data.GetPreferredFormat(); + switch ( format ) + { + case wxDF_TEXT: + case wxDF_OEMTEXT: + { + wxTextDataObject& textDataObject = (wxTextDataObject &)data; + char* s = (char*)wxGetClipboardData(format); + if ( !s ) return FALSE; - break; + + textDataObject.SetText(s); + delete [] s; + + return TRUE; } + case wxDF_BITMAP: case wxDF_DIB: { - wxBitmapDataObject* bitmapDataObject = (wxBitmapDataObject*) data; - wxBitmap* bitmap = (wxBitmap*) wxGetClipboardData(data->GetFormat()); - if (bitmap) - { - bitmapDataObject->SetBitmap(* bitmap); - delete bitmap; - return TRUE; - } - else + wxBitmapDataObject& bitmapDataObject = (wxBitmapDataObject &)data; + wxBitmap* bitmap = (wxBitmap *)wxGetClipboardData(data.GetPreferredFormat()); + if ( !bitmap ) return FALSE; - break; + + bitmapDataObject.SetBitmap(*bitmap); + delete bitmap; + + return TRUE; } #if wxUSE_METAFILE case wxDF_METAFILE: { - wxMetafileDataObject* metaFileDataObject = (wxMetafileDataObject*) data; - wxMetafile* metaFile = (wxMetafile*) wxGetClipboardData(wxDF_METAFILE); - if (metaFile) - { - metaFileDataObject->SetMetafile(* metaFile); - delete metaFile; - return TRUE; - } - else + wxMetafileDataObject& metaFileDataObject = (wxMetafileDataObject &)data; + wxMetafile* metaFile = (wxMetafile *)wxGetClipboardData(wxDF_METAFILE); + if ( !metaFile ) return FALSE; - break; - } -#endif - default: - { - return FALSE; + metaFileDataObject.SetMetafile(*metaFile); + delete metaFile; + + return TRUE; } +#endif // wxUSE_METAFILE } return FALSE; -#else +#else // !wxUSE_DATAOBJ + wxFAIL_MSG( wxT("no clipboard implementation") ); return FALSE; -#endif -} - -//----------------------------------------------------------------------------- -// wxClipboardModule -//----------------------------------------------------------------------------- - -IMPLEMENT_DYNAMIC_CLASS(wxClipboardModule,wxModule) - -bool wxClipboardModule::OnInit() -{ - wxTheClipboard = new wxClipboard(); - - return TRUE; -} - -void wxClipboardModule::OnExit() -{ - if (wxTheClipboard) delete wxTheClipboard; - wxTheClipboard = (wxClipboard*) NULL; +#endif // wxUSE_OLE_CLIPBOARD/wxUSE_DATAOBJ } #endif // wxUSE_CLIPBOARD