svtools/source/misc/transfer2.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: transfer2.cxx,v $
  10  * $Revision: 1.21 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_svtools.hxx"
  33 #include <vos/mutex.hxx>
  34 #ifndef DEBUG_HXX
  35 #include <tools/debug.hxx>
  36 #endif
  37 #ifndef URLOBJ_HXX
  38 #include <tools/urlobj.hxx>
  39 #endif
  40 #include <unotools/ucbstreamhelper.hxx>
  41 #include <sot/exchange.hxx>
  42 #include <sot/storage.hxx>
  43 #include <vcl/bitmap.hxx>
  44 #include <vcl/gdimtf.hxx>
  45 #include <vcl/graph.hxx>
  46 #include <vcl/svapp.hxx>
  47 #include <vcl/window.hxx>
  48 #include <comphelper/processfactory.hxx>
  49 #ifndef _COM_SUN_STAR_DATATRANSFER_DND_DROPTARGETDRAGCONTEXT_HPP_
  50 #include <com/sun/star/datatransfer/dnd/XDropTargetDragContext.hpp>
  51 #endif
  52
  53 #include "urlbmk.hxx"
  54 #include "inetimg.hxx"
  55 #include <svtools/imap.hxx>
  56 #include <svtools/transfer.hxx>
  57
  58 // --------------
  59 // - Namespaces -
  60 // --------------
  61
  62 using namespace ::com::sun::star::uno;
  63 using namespace ::com::sun::star::lang;
  64 using namespace ::com::sun::star::io;
  65 using namespace ::com::sun::star::datatransfer;
  66 using namespace ::com::sun::star::datatransfer::clipboard;
  67 using namespace ::com::sun::star::datatransfer::dnd;
  68
  69 // -----------------------------------------
  70 // - DragSourceHelper::DragGestureListener -
  71 // -----------------------------------------
  72
  73 DragSourceHelper::DragGestureListener::DragGestureListener( DragSourceHelper& rDragSourceHelper ) :
  74     mrParent( rDragSourceHelper )
  75 {
  76 }
  77
  78 // -----------------------------------------------------------------------------
  79
  80 DragSourceHelper::DragGestureListener::~DragGestureListener()
  81 {
  82 }
  83
  84 // -----------------------------------------------------------------------------
  85
  86 void SAL_CALL DragSourceHelper::DragGestureListener::disposing( const EventObject& ) throw( RuntimeException )
  87 {
  88 }
  89
  90 // -----------------------------------------------------------------------------
  91
  92 void SAL_CALL DragSourceHelper::DragGestureListener::dragGestureRecognized( const DragGestureEvent& rDGE ) throw( RuntimeException )
  93 {
  94     const ::vos::OGuard aGuard( Application::GetSolarMutex() );
  95
  96     const Point aPtPixel( rDGE.DragOriginX, rDGE.DragOriginY );
  97     mrParent.StartDrag( rDGE.DragAction, aPtPixel );
  98 }
  99
 100 // --------------------
 101 // - DragSourceHelper -
 102 // --------------------
 103
 104 DragSourceHelper::DragSourceHelper( Window* pWindow ) :
 105     mxDragGestureRecognizer( pWindow->GetDragGestureRecognizer() )
 106 {
 107     if( mxDragGestureRecognizer.is() )
 108     {
 109         mxDragGestureListener = new DragSourceHelper::DragGestureListener( *this );
 110         mxDragGestureRecognizer->addDragGestureListener( mxDragGestureListener );
 111     }
 112 }
 113
 114 // -----------------------------------------------------------------------------
 115
 116 DragSourceHelper::~DragSourceHelper()
 117 {
 118     if( mxDragGestureRecognizer.is()  )
 119         mxDragGestureRecognizer->removeDragGestureListener( mxDragGestureListener );
 120 }
 121
 122 // -----------------------------------------------------------------------------
 123
 124 void DragSourceHelper::StartDrag( sal_Int8, const Point& )
 125 {
 126 }
 127
 128 // ----------------------------------------
 129 // - DropTargetHelper::DropTargetListener -
 130 // ----------------------------------------
 131
 132 DropTargetHelper::DropTargetListener::DropTargetListener( DropTargetHelper& rDropTargetHelper ) :
 133     mrParent( rDropTargetHelper ),
 134     mpLastDragOverEvent( NULL )
 135 {
 136 }
 137
 138 // -----------------------------------------------------------------------------
 139
 140 DropTargetHelper::DropTargetListener::~DropTargetListener()
 141 {
 142     delete mpLastDragOverEvent;
 143 }
 144
 145 // -----------------------------------------------------------------------------
 146
 147 void SAL_CALL DropTargetHelper::DropTargetListener::disposing( const EventObject& ) throw( RuntimeException )
 148 {
 149 }
 150
 151 // -----------------------------------------------------------------------------
 152
 153 void SAL_CALL DropTargetHelper::DropTargetListener::drop( const DropTargetDropEvent& rDTDE ) throw( RuntimeException )
 154 {
 155     const ::vos::OGuard aGuard( Application::GetSolarMutex() );
 156
 157     try
 158     {
 159         AcceptDropEvent  aAcceptEvent;
 160         ExecuteDropEvent aExecuteEvt( rDTDE.DropAction & ~DNDConstants::ACTION_DEFAULT, Point( rDTDE.LocationX, rDTDE.LocationY ), rDTDE );
 161         sal_Int8         nRet = DNDConstants::ACTION_NONE;
 162
 163         aExecuteEvt.mbDefault = ( ( rDTDE.DropAction & DNDConstants::ACTION_DEFAULT ) != 0 );
 164
 165         // in case of a default action, call ::AcceptDrop first and use the returned
 166         // accepted action as the execute action in the call to ::ExecuteDrop
 167         aAcceptEvent.mnAction = aExecuteEvt.mnAction;
 168         aAcceptEvent.maPosPixel = aExecuteEvt.maPosPixel;
 169         (DropTargetEvent&)( aAcceptEvent.maDragEvent ) = (DropTargetEvent&) rDTDE;
 170         ( (DropTargetDragEvent&)( aAcceptEvent.maDragEvent ) ).DropAction = rDTDE.DropAction;
 171         ( (DropTargetDragEvent&)( aAcceptEvent.maDragEvent ) ).LocationX = rDTDE.LocationX;
 172         ( (DropTargetDragEvent&)( aAcceptEvent.maDragEvent ) ).LocationY = rDTDE.LocationY;
 173         ( (DropTargetDragEvent&)( aAcceptEvent.maDragEvent ) ).SourceActions = rDTDE.SourceActions;
 174         aAcceptEvent.mbLeaving = sal_False;
 175         aAcceptEvent.mbDefault = aExecuteEvt.mbDefault;
 176
 177         nRet = mrParent.AcceptDrop( aAcceptEvent );
 178
 179         if( DNDConstants::ACTION_NONE != nRet )
 180         {
 181             rDTDE.Context->acceptDrop( nRet );
 182
 183             if( aExecuteEvt.mbDefault )
 184                 aExecuteEvt.mnAction = nRet;
 185
 186             nRet = mrParent.ExecuteDrop( aExecuteEvt );
 187         }
 188
 189         rDTDE.Context->dropComplete( DNDConstants::ACTION_NONE != nRet );
 190
 191         if( mpLastDragOverEvent )
 192         {
 193             delete mpLastDragOverEvent;
 194             mpLastDragOverEvent = NULL;
 195         }
 196     }
 197     catch( const ::com::sun::star::uno::Exception& )
 198     {
 199     }
 200 }
 201
 202 // -----------------------------------------------------------------------------
 203
 204 void SAL_CALL DropTargetHelper::DropTargetListener::dragEnter( const DropTargetDragEnterEvent& rDTDEE ) throw( RuntimeException )
 205 {
 206     const ::vos::OGuard aGuard( Application::GetSolarMutex() );
 207
 208     try
 209     {
 210         mrParent.ImplBeginDrag( rDTDEE.SupportedDataFlavors );
 211     }
 212     catch( const ::com::sun::star::uno::Exception& )
 213     {
 214     }
 215
 216     dragOver( rDTDEE );
 217 }
 218
 219 // -----------------------------------------------------------------------------
 220
 221 void SAL_CALL DropTargetHelper::DropTargetListener::dragOver( const DropTargetDragEvent& rDTDE ) throw( RuntimeException )
 222 {
 223     const ::vos::OGuard aGuard( Application::GetSolarMutex() );
 224
 225     try
 226     {
 227         if( mpLastDragOverEvent )
 228             delete mpLastDragOverEvent;
 229
 230         mpLastDragOverEvent = new AcceptDropEvent( rDTDE.DropAction & ~DNDConstants::ACTION_DEFAULT, Point( rDTDE.LocationX, rDTDE.LocationY ), rDTDE );
 231         mpLastDragOverEvent->mbDefault = ( ( rDTDE.DropAction & DNDConstants::ACTION_DEFAULT ) != 0 );
 232
 233         const sal_Int8 nRet = mrParent.AcceptDrop( *mpLastDragOverEvent );
 234
 235         if( DNDConstants::ACTION_NONE == nRet )
 236             rDTDE.Context->rejectDrag();
 237         else
 238             rDTDE.Context->acceptDrag( nRet );
 239     }
 240     catch( const ::com::sun::star::uno::Exception& )
 241     {
 242     }
 243 }
 244
 245 // -----------------------------------------------------------------------------
 246
 247 void SAL_CALL DropTargetHelper::DropTargetListener::dragExit( const DropTargetEvent& ) throw( RuntimeException )
 248 {
 249     const ::vos::OGuard aGuard( Application::GetSolarMutex() );
 250
 251     try
 252     {
 253         if( mpLastDragOverEvent )
 254         {
 255             mpLastDragOverEvent->mbLeaving = sal_True;
 256             mrParent.AcceptDrop( *mpLastDragOverEvent );
 257             delete mpLastDragOverEvent;
 258             mpLastDragOverEvent = NULL;
 259         }
 260
 261         mrParent.ImplEndDrag();
 262     }
 263     catch( const ::com::sun::star::uno::Exception& )
 264     {
 265     }
 266 }
 267
 268
 269 // -----------------------------------------------------------------------------
 270
 271 void SAL_CALL DropTargetHelper::DropTargetListener::dropActionChanged( const DropTargetDragEvent& ) throw( RuntimeException )
 272 {
 273 }
 274
 275 // --------------------
 276 // - DropTargetHelper -
 277 // --------------------
 278
 279 DropTargetHelper::DropTargetHelper( Window* pWindow ) :
 280     mxDropTarget( pWindow->GetDropTarget() ),
 281     mpFormats( new DataFlavorExVector )
 282 {
 283     ImplConstruct();
 284 }
 285
 286 // -----------------------------------------------------------------------------
 287
 288 DropTargetHelper::DropTargetHelper( const Reference< XDropTarget >& rxDropTarget ) :
 289     mxDropTarget( rxDropTarget ),
 290     mpFormats( new DataFlavorExVector )
 291 {
 292     ImplConstruct();
 293 }
 294
 295 // -----------------------------------------------------------------------------
 296
 297 DropTargetHelper::~DropTargetHelper()
 298 {
 299     if( mxDropTarget.is() )
 300         mxDropTarget->removeDropTargetListener( mxDropTargetListener );
 301
 302     delete mpFormats;
 303 }
 304
 305 // -----------------------------------------------------------------------------
 306
 307 void DropTargetHelper::ImplConstruct()
 308 {
 309     if( mxDropTarget.is() )
 310     {
 311         mxDropTargetListener = new DropTargetHelper::DropTargetListener( *this );
 312         mxDropTarget->addDropTargetListener( mxDropTargetListener );
 313         mxDropTarget->setActive( sal_True );
 314     }
 315 }
 316
 317 // -----------------------------------------------------------------------------
 318
 319 void DropTargetHelper::ImplBeginDrag( const Sequence< DataFlavor >& rSupportedDataFlavors )
 320 {
 321     mpFormats->clear();
 322     TransferableDataHelper::FillDataFlavorExVector( rSupportedDataFlavors, *mpFormats );
 323 }
 324
 325 // -----------------------------------------------------------------------------
 326
 327 void DropTargetHelper::ImplEndDrag()
 328 {
 329     mpFormats->clear();
 330 }
 331
 332 // -----------------------------------------------------------------------------
 333
 334 sal_Int8 DropTargetHelper::AcceptDrop( const AcceptDropEvent& )
 335 {
 336     return( DNDConstants::ACTION_NONE );
 337 }
 338
 339 // -----------------------------------------------------------------------------
 340
 341 sal_Int8 DropTargetHelper::ExecuteDrop( const ExecuteDropEvent& )
 342 {
 343     return( DNDConstants::ACTION_NONE );
 344 }
 345
 346 // -----------------------------------------------------------------------------
 347
 348 sal_Bool DropTargetHelper::IsDropFormatSupported( SotFormatStringId nFormat )
 349 {
 350     DataFlavorExVector::iterator        aIter( mpFormats->begin() ), aEnd( mpFormats->end() );
 351     sal_Bool                                            bRet = sal_False;
 352
 353     while( aIter != aEnd )
 354     {
 355         if( nFormat == (*aIter++).mnSotId )
 356         {
 357             bRet = sal_True;
 358             aIter = aEnd;
 359         }
 360     }
 361
 362     return bRet;
 363 }
 364
 365 // -----------------------------------------------------------------------------
 366
 367 sal_Bool DropTargetHelper::IsDropFormatSupported( const DataFlavor& rFlavor )
 368 {
 369     DataFlavorExVector::iterator        aIter( mpFormats->begin() ), aEnd( mpFormats->end() );
 370     sal_Bool                                            bRet = sal_False;
 371
 372     while( aIter != aEnd )
 373     {
 374         if( TransferableDataHelper::IsEqual( rFlavor, *aIter++ ) )
 375         {
 376             bRet = sal_True;
 377             aIter = aEnd;
 378         }
 379     }
 380
 381     return bRet;
 382 }
 383
 384 // -----------------------------------------------------------------------------
 385 // TransferDataContainer
 386 // -----------------------------------------------------------------------------
 387
 388 struct TDataCntnrEntry_Impl
 389 {
 390     ::com::sun::star::uno::Any aAny;
 391     SotFormatStringId nId;
 392 };
 393
 394 // -----------------------------------------------------------------------------
 395
 396 typedef ::std::list< TDataCntnrEntry_Impl > TDataCntnrEntryList;
 397
 398 // -----------------------------------------------------------------------------
 399
 400 struct TransferDataContainer_Impl
 401 {
 402     TDataCntnrEntryList aFmtList;
 403     Link aFinshedLnk;
 404     INetBookmark* pBookmk;
 405     Graphic* pGrf;
 406
 407     TransferDataContainer_Impl()
 408         : pBookmk( 0 ), pGrf( 0 )
 409     {
 410     }
 411
 412     ~TransferDataContainer_Impl()
 413     {
 414         delete pBookmk;
 415         delete pGrf;
 416     }
 417 };
 418
 419 // -----------------------------------------------------------------------------
 420
 421 TransferDataContainer::TransferDataContainer()
 422     : pImpl( new TransferDataContainer_Impl )
 423 {
 424 }
 425
 426 // -----------------------------------------------------------------------------
 427
 428 TransferDataContainer::~TransferDataContainer()
 429 {
 430     delete pImpl;
 431 }
 432
 433 // -----------------------------------------------------------------------------
 434
 435 void TransferDataContainer::AddSupportedFormats()
 436 {
 437 }
 438
 439 // -----------------------------------------------------------------------------
 440
 441 sal_Bool TransferDataContainer::GetData( const
 442             ::com::sun::star::datatransfer::DataFlavor& rFlavor )
 443 {
 444     TDataCntnrEntryList::iterator       aIter( pImpl->aFmtList.begin() ),
 445                                     aEnd( pImpl->aFmtList.end() );
 446     sal_Bool bFnd = sal_False;
 447     ULONG nFmtId = SotExchange::GetFormat( rFlavor );
 448
 449     // test first the list
 450     for( ; aIter != aEnd; ++aIter )
 451     {
 452         TDataCntnrEntry_Impl& rEntry = (TDataCntnrEntry_Impl&)*aIter;
 453         if( nFmtId == rEntry.nId )
 454         {
 455             bFnd = SetAny( rEntry.aAny, rFlavor );
 456             break;
 457         }
 458     }
 459
 460     // test second the bookmark pointer
 461     if( !bFnd )
 462         switch( nFmtId )
 463         {
 464          case SOT_FORMAT_STRING:
 465          case SOT_FORMATSTR_ID_SOLK:
 466          case SOT_FORMATSTR_ID_NETSCAPE_BOOKMARK:
 467          case SOT_FORMATSTR_ID_FILECONTENT:
 468          case SOT_FORMATSTR_ID_FILEGRPDESCRIPTOR:
 469          case SOT_FORMATSTR_ID_UNIFORMRESOURCELOCATOR:
 470             if( pImpl->pBookmk )
 471                 bFnd = SetINetBookmark( *pImpl->pBookmk, rFlavor );
 472             break;
 473
 474         case SOT_FORMATSTR_ID_SVXB:
 475         case SOT_FORMAT_BITMAP:
 476         case SOT_FORMAT_GDIMETAFILE:
 477             if( pImpl->pGrf )
 478                 bFnd = SetGraphic( *pImpl->pGrf, rFlavor );
 479             break;
 480         }
 481
 482     return bFnd;
 483 }
 484
 485 // -----------------------------------------------------------------------------
 486
 487 void TransferDataContainer::ClearData()
 488 {
 489     delete pImpl;
 490     pImpl = new TransferDataContainer_Impl;
 491     ClearFormats();
 492 }
 493
 494 // -----------------------------------------------------------------------------
 495
 496 void TransferDataContainer::CopyINetBookmark( const INetBookmark& rBkmk )
 497 {
 498     if( !pImpl->pBookmk )
 499         pImpl->pBookmk = new INetBookmark( rBkmk );
 500     else
 501         *pImpl->pBookmk = rBkmk;
 502
 503      AddFormat( SOT_FORMAT_STRING );
 504      AddFormat( SOT_FORMATSTR_ID_SOLK );
 505      AddFormat( SOT_FORMATSTR_ID_NETSCAPE_BOOKMARK );
 506      AddFormat( SOT_FORMATSTR_ID_FILECONTENT );
 507      AddFormat( SOT_FORMATSTR_ID_FILEGRPDESCRIPTOR );
 508      AddFormat( SOT_FORMATSTR_ID_UNIFORMRESOURCELOCATOR );
 509 }
 510
 511 // -----------------------------------------------------------------------------
 512
 513 void TransferDataContainer::CopyAnyData( ULONG nFormatId,
 514                                         const sal_Char* pData, ULONG nLen )
 515 {
 516     if( nLen )
 517     {
 518         TDataCntnrEntry_Impl aEntry;
 519         aEntry.nId = nFormatId;
 520
 521         Sequence< sal_Int8 > aSeq( nLen  );
 522         memcpy( aSeq.getArray(), pData, nLen );
 523         aEntry.aAny <<= aSeq;
 524         pImpl->aFmtList.push_back( aEntry );
 525          AddFormat( nFormatId );
 526     }
 527 }
 528
 529 // -----------------------------------------------------------------------------
 530
 531 void TransferDataContainer::CopyByteString( ULONG nFormatId,
 532                                             const ByteString& rStr )
 533 {
 534     CopyAnyData( nFormatId, rStr.GetBuffer(), rStr.Len() );
 535 }
 536
 537 // -----------------------------------------------------------------------------
 538
 539 void TransferDataContainer::CopyINetImage( const INetImage& rINtImg )
 540 {
 541     SvMemoryStream aMemStm( 1024, 1024 );
 542     aMemStm.SetVersion( SOFFICE_FILEFORMAT_50 );
 543     rINtImg.Write( aMemStm, SOT_FORMATSTR_ID_INET_IMAGE );
 544     CopyAnyData( SOT_FORMATSTR_ID_INET_IMAGE, (sal_Char*)aMemStm.GetData(),
 545                     aMemStm.Seek( STREAM_SEEK_TO_END ) );
 546 }
 547
 548 // -----------------------------------------------------------------------------
 549
 550 void TransferDataContainer::CopyImageMap( const ImageMap& rImgMap )
 551 {
 552     SvMemoryStream aMemStm( 8192, 8192 );
 553     aMemStm.SetVersion( SOFFICE_FILEFORMAT_50 );
 554     rImgMap.Write( aMemStm, String() );
 555     CopyAnyData( SOT_FORMATSTR_ID_SVIM, (sal_Char*)aMemStm.GetData(),
 556                     aMemStm.Seek( STREAM_SEEK_TO_END ) );
 557 }
 558
 559 // -----------------------------------------------------------------------------
 560
 561 void TransferDataContainer::CopyGraphic( const Graphic& rGrf )
 562 {
 563     GraphicType nType = rGrf.GetType();
 564     if( GRAPHIC_NONE != nType )
 565     {
 566         if( !pImpl->pGrf )
 567             pImpl->pGrf = new Graphic( rGrf );
 568         else
 569             *pImpl->pGrf = rGrf;
 570
 571         AddFormat( SOT_FORMATSTR_ID_SVXB );
 572         if( GRAPHIC_BITMAP == nType )
 573             AddFormat( SOT_FORMAT_BITMAP );
 574         else if( GRAPHIC_GDIMETAFILE == nType )
 575             AddFormat( SOT_FORMAT_GDIMETAFILE );
 576     }
 577 }
 578
 579 // -----------------------------------------------------------------------------
 580
 581 void TransferDataContainer::CopyString( USHORT nFmt, const String& rStr )
 582 {
 583     if( rStr.Len() )
 584     {
 585         TDataCntnrEntry_Impl aEntry;
 586         aEntry.nId = nFmt;
 587         rtl::OUString aStr( rStr );
 588         aEntry.aAny <<= aStr;
 589         pImpl->aFmtList.push_back( aEntry );
 590          AddFormat( aEntry.nId );
 591     }
 592 }
 593
 594 // -----------------------------------------------------------------------------
 595
 596 void TransferDataContainer::CopyString( const String& rStr )
 597 {
 598     CopyString( SOT_FORMAT_STRING, rStr );
 599 }
 600
 601 // -----------------------------------------------------------------------------
 602
 603 void TransferDataContainer::CopyAny( USHORT nFmt,
 604                                     const ::com::sun::star::uno::Any& rAny )
 605 {
 606     TDataCntnrEntry_Impl aEntry;
 607     aEntry.nId = nFmt;
 608     aEntry.aAny = rAny;
 609     pImpl->aFmtList.push_back( aEntry );
 610     AddFormat( aEntry.nId );
 611 }
 612
 613 // -----------------------------------------------------------------------------
 614
 615 sal_Bool TransferDataContainer::HasAnyData() const
 616 {
 617     return pImpl->aFmtList.begin() != pImpl->aFmtList.end() ||
 618             0 != pImpl->pBookmk;
 619 }
 620
 621 // -----------------------------------------------------------------------------
 622
 623 void TransferDataContainer::StartDrag(
 624         Window* pWindow, sal_Int8 nDragSourceActions,
 625         const Link& rLnk, sal_Int32 nDragPointer, sal_Int32 nDragImage )
 626 {
 627     pImpl->aFinshedLnk = rLnk;
 628     TransferableHelper::StartDrag( pWindow, nDragSourceActions,
 629                                     nDragPointer, nDragImage );
 630 }
 631
 632 // -----------------------------------------------------------------------------
 633
 634 void TransferDataContainer::DragFinished( sal_Int8 nDropAction )
 635 {
 636     if( pImpl->aFinshedLnk.IsSet() )
 637         pImpl->aFinshedLnk.Call( &nDropAction );
 638 }