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