Artifact c1d100a942724719f89e693d36c5db6f07dca2e2:
0000: 2f 2f 2d 2d 2d 20 4b 2e 49 2e 4c 49 42 20 2d 2d //--- K.I.LIB --
0010: 2d 0d 0a 2f 2f 20 6b 6c 5f 64 6e 64 2e 68 20 3a -..// kl_dnd.h :
0020: 20 64 72 61 67 20 61 6e 64 20 64 72 6f 70 20 6f drag and drop o
0030: 70 65 72 61 74 69 6f 6e 0d 0a 0d 0a 23 69 6e 63 peration....#inc
0040: 6c 75 64 65 20 22 73 74 64 61 66 78 2e 68 22 0d lude "stdafx.h".
0050: 0a 23 69 6e 63 6c 75 64 65 20 22 6b 69 6c 69 62 .#include "kilib
0060: 2e 68 22 0d 0a 0d 0a 2f 2f 2d 2d 2d 2d 2d 2d 2d .h"....//-------
0070: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0080: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0090: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
00a0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2f 2f 0d -------------//.
00b0: 0a 0d 0a 62 6f 6f 6c 20 6b 69 44 72 6f 70 53 6f ...bool kiDropSo
00c0: 75 72 63 65 3a 3a 44 6e 44 28 20 6b 69 44 61 74 urce::DnD( kiDat
00d0: 61 4f 62 6a 65 63 74 2a 20 70 4f 62 6a 2c 20 44 aObject* pObj, D
00e0: 57 4f 52 44 20 65 66 63 74 2c 20 44 57 4f 52 44 WORD efct, DWORD
00f0: 2a 20 70 65 66 63 74 20 29 0d 0a 7b 0d 0a 09 6b * pefct )..{...k
0100: 69 44 72 6f 70 53 6f 75 72 63 65 2a 20 70 44 72 iDropSource* pDr
0110: 70 53 72 63 20 3d 20 6e 65 77 20 6b 69 44 72 6f pSrc = new kiDro
0120: 70 53 6f 75 72 63 65 3b 0d 0a 09 70 44 72 70 53 pSource;...pDrpS
0130: 72 63 2d 3e 41 64 64 52 65 66 28 29 3b 0d 0a 09 rc->AddRef();...
0140: 70 4f 62 6a 2d 3e 62 65 67 69 6e 28 29 3b 0d 0a pObj->begin();..
0150: 0d 0a 09 44 57 4f 52 44 20 64 2c 20 2a 70 3d 28 ...DWORD d, *p=(
0160: 70 65 66 63 74 3d 3d 4e 55 4c 4c 20 3f 20 26 64 pefct==NULL ? &d
0170: 20 3a 20 70 65 66 63 74 29 3b 0d 0a 09 48 52 45 : pefct);...HRE
0180: 53 55 4c 54 20 68 72 20 3d 20 3a 3a 44 6f 44 72 SULT hr = ::DoDr
0190: 61 67 44 72 6f 70 28 20 70 4f 62 6a 2c 20 70 44 agDrop( pObj, pD
01a0: 72 70 53 72 63 2c 20 65 66 63 74 2c 20 70 20 29 rpSrc, efct, p )
01b0: 3b 0d 0a 0d 0a 09 70 44 72 70 53 72 63 2d 3e 52 ;.....pDrpSrc->R
01c0: 65 6c 65 61 73 65 28 29 3b 0d 0a 09 72 65 74 75 elease();...retu
01d0: 72 6e 20 28 68 72 20 3d 3d 20 44 52 41 47 44 52 rn (hr == DRAGDR
01e0: 4f 50 5f 53 5f 44 52 4f 50 29 3b 0d 0a 7d 0d 0a OP_S_DROP);..}..
01f0: 0d 0a 2f 2f 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ..//------------
0200: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 20 49 55 6e ------------ IUn
0210: 6b 6e 6f 77 6e 20 49 6d 70 6c 65 6d 65 6e 74 20 known Implement
0220: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0230: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2f 2f 0d 0a 0d 0a 6b ---------//....k
0240: 69 44 72 6f 70 53 6f 75 72 63 65 3a 3a 6b 69 44 iDropSource::kiD
0250: 72 6f 70 53 6f 75 72 63 65 28 29 20 3a 20 6d 5f ropSource() : m_
0260: 63 52 65 66 28 20 30 4c 20 29 0d 0a 7b 0d 0a 09 cRef( 0L )..{...
0270: 61 70 70 28 29 2d 3e 73 68 65 6c 6c 49 6e 69 74 app()->shellInit
0280: 28 29 3b 20 2f 2f 20 4f 6c 65 49 6e 69 74 69 61 (); // OleInitia
0290: 6c 69 7a 65 28 29 0d 0a 7d 0d 0a 0d 0a 53 54 44 lize()..}....STD
02a0: 4d 45 54 48 4f 44 49 4d 50 5f 28 55 4c 4f 4e 47 METHODIMP_(ULONG
02b0: 29 20 6b 69 44 72 6f 70 53 6f 75 72 63 65 3a 3a ) kiDropSource::
02c0: 41 64 64 52 65 66 28 29 0d 0a 7b 0d 0a 09 72 65 AddRef()..{...re
02d0: 74 75 72 6e 20 2b 2b 6d 5f 63 52 65 66 3b 0d 0a turn ++m_cRef;..
02e0: 7d 0d 0a 0d 0a 53 54 44 4d 45 54 48 4f 44 49 4d }....STDMETHODIM
02f0: 50 5f 28 55 4c 4f 4e 47 29 20 6b 69 44 72 6f 70 P_(ULONG) kiDrop
0300: 53 6f 75 72 63 65 3a 3a 52 65 6c 65 61 73 65 28 Source::Release(
0310: 29 0d 0a 7b 0d 0a 09 69 66 28 20 2d 2d 6d 5f 63 )..{...if( --m_c
0320: 52 65 66 20 29 0d 0a 09 09 72 65 74 75 72 6e 20 Ref )....return
0330: 6d 5f 63 52 65 66 3b 0d 0a 0d 0a 09 64 65 6c 65 m_cRef;.....dele
0340: 74 65 20 74 68 69 73 3b 0d 0a 09 72 65 74 75 72 te this;...retur
0350: 6e 20 30 4c 3b 0d 0a 7d 0d 0a 0d 0a 53 54 44 4d n 0L;..}....STDM
0360: 45 54 48 4f 44 49 4d 50 20 6b 69 44 72 6f 70 53 ETHODIMP kiDropS
0370: 6f 75 72 63 65 3a 3a 51 75 65 72 79 49 6e 74 65 ource::QueryInte
0380: 72 66 61 63 65 28 20 52 45 46 49 49 44 20 72 69 rface( REFIID ri
0390: 69 64 2c 20 76 6f 69 64 2a 2a 20 70 70 4f 62 6a id, void** ppObj
03a0: 20 29 0d 0a 7b 0d 0a 09 69 66 28 20 3a 3a 49 73 )..{...if( ::Is
03b0: 45 71 75 61 6c 49 49 44 28 20 72 69 69 64 2c 20 EqualIID( riid,
03c0: 49 49 44 5f 49 55 6e 6b 6e 6f 77 6e 20 29 0d 0a IID_IUnknown )..
03d0: 09 20 7c 7c 20 3a 3a 49 73 45 71 75 61 6c 49 49 . || ::IsEqualII
03e0: 44 28 20 72 69 69 64 2c 20 49 49 44 5f 49 44 72 D( riid, IID_IDr
03f0: 6f 70 53 6f 75 72 63 65 20 29 20 29 0d 0a 09 7b opSource ) )...{
0400: 0d 0a 09 09 2a 70 70 4f 62 6a 20 3d 20 28 76 6f ....*ppObj = (vo
0410: 69 64 2a 29 74 68 69 73 3b 0d 0a 09 09 41 64 64 id*)this;....Add
0420: 52 65 66 28 29 3b 0d 0a 09 09 72 65 74 75 72 6e Ref();....return
0430: 20 53 5f 4f 4b 3b 0d 0a 09 7d 0d 0a 0d 0a 09 2a S_OK;...}.....*
0440: 70 70 4f 62 6a 20 3d 20 4e 55 4c 4c 3b 0d 0a 09 ppObj = NULL;...
0450: 72 65 74 75 72 6e 20 45 5f 4e 4f 49 4e 54 45 52 return E_NOINTER
0460: 46 41 43 45 3b 0d 0a 7d 0d 0a 0d 0a 2f 2f 2d 2d FACE;..}....//--
0470: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0480: 2d 2d 2d 2d 2d 2d 20 49 44 72 6f 70 53 6f 75 72 ------ IDropSour
0490: 63 65 20 49 6d 70 6c 65 6d 65 6e 74 20 2d 2d 2d ce Implement ---
04a0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
04b0: 2d 2d 2d 2d 2d 2d 2f 2f 0d 0a 0d 0a 53 54 44 4d ------//....STDM
04c0: 45 54 48 4f 44 49 4d 50 20 6b 69 44 72 6f 70 53 ETHODIMP kiDropS
04d0: 6f 75 72 63 65 3a 3a 47 69 76 65 46 65 65 64 62 ource::GiveFeedb
04e0: 61 63 6b 28 20 44 57 4f 52 44 20 64 77 45 66 66 ack( DWORD dwEff
04f0: 65 63 74 20 29 0d 0a 7b 0d 0a 09 72 65 74 75 72 ect )..{...retur
0500: 6e 20 44 52 41 47 44 52 4f 50 5f 53 5f 55 53 45 n DRAGDROP_S_USE
0510: 44 45 46 41 55 4c 54 43 55 52 53 4f 52 53 3b 0d DEFAULTCURSORS;.
0520: 0a 7d 0d 0a 0d 0a 53 54 44 4d 45 54 48 4f 44 49 .}....STDMETHODI
0530: 4d 50 20 6b 69 44 72 6f 70 53 6f 75 72 63 65 3a MP kiDropSource:
0540: 3a 51 75 65 72 79 43 6f 6e 74 69 6e 75 65 44 72 :QueryContinueDr
0550: 61 67 28 20 42 4f 4f 4c 20 6b 65 79 45 53 43 2c ag( BOOL keyESC,
0560: 20 44 57 4f 52 44 20 6b 65 79 4f 74 68 65 72 20 DWORD keyOther
0570: 29 0d 0a 7b 0d 0a 09 69 66 28 20 6b 65 79 45 53 )..{...if( keyES
0580: 43 20 29 0d 0a 09 09 72 65 74 75 72 6e 20 44 52 C )....return DR
0590: 41 47 44 52 4f 50 5f 53 5f 43 41 4e 43 45 4c 3b AGDROP_S_CANCEL;
05a0: 0d 0a 09 69 66 28 20 21 28 6b 65 79 4f 74 68 65 ...if( !(keyOthe
05b0: 72 26 4d 4b 5f 4c 42 55 54 54 4f 4e 29 20 26 26 r&MK_LBUTTON) &&
05c0: 20 21 28 6b 65 79 4f 74 68 65 72 26 4d 4b 5f 52 !(keyOther&MK_R
05d0: 42 55 54 54 4f 4e 29 20 29 20 0d 0a 09 09 72 65 BUTTON) ) ....re
05e0: 74 75 72 6e 20 44 52 41 47 44 52 4f 50 5f 53 5f turn DRAGDROP_S_
05f0: 44 52 4f 50 3b 0d 0a 09 72 65 74 75 72 6e 20 53 DROP;...return S
0600: 5f 4f 4b 3b 0d 0a 7d 0d 0a 0d 0a 2f 2f 2d 2d 2d _OK;..}....//---
0610: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0620: 2d 2d 2d 2d 2d 20 49 55 6e 6b 6e 6f 77 6e 20 49 ----- IUnknown I
0630: 6d 70 6c 65 6d 65 6e 74 20 2d 2d 2d 2d 2d 2d 2d mplement -------
0640: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
0650: 2d 2d 2f 2f 0d 0a 0d 0a 6b 69 44 61 74 61 4f 62 --//....kiDataOb
0660: 6a 65 63 74 3a 3a 6b 69 44 61 74 61 4f 62 6a 65 ject::kiDataObje
0670: 63 74 28 29 20 3a 20 6d 5f 63 52 65 66 28 20 30 ct() : m_cRef( 0
0680: 4c 20 29 2c 20 6d 5f 46 6f 72 6d 61 74 4c 69 73 L ), m_FormatLis
0690: 74 28 20 32 20 29 0d 0a 7b 0d 0a 7d 0d 0a 0d 0a t( 2 )..{..}....
06a0: 53 54 44 4d 45 54 48 4f 44 49 4d 50 5f 28 55 4c STDMETHODIMP_(UL
06b0: 4f 4e 47 29 20 6b 69 44 61 74 61 4f 62 6a 65 63 ONG) kiDataObjec
06c0: 74 3a 3a 41 64 64 52 65 66 28 29 0d 0a 7b 0d 0a t::AddRef()..{..
06d0: 09 72 65 74 75 72 6e 20 2b 2b 6d 5f 63 52 65 66 .return ++m_cRef
06e0: 3b 0d 0a 7d 0d 0a 0d 0a 53 54 44 4d 45 54 48 4f ;..}....STDMETHO
06f0: 44 49 4d 50 5f 28 55 4c 4f 4e 47 29 20 6b 69 44 DIMP_(ULONG) kiD
0700: 61 74 61 4f 62 6a 65 63 74 3a 3a 52 65 6c 65 61 ataObject::Relea
0710: 73 65 28 29 0d 0a 7b 0d 0a 09 69 66 28 20 2d 2d se()..{...if( --
0720: 6d 5f 63 52 65 66 20 29 0d 0a 09 09 72 65 74 75 m_cRef )....retu
0730: 72 6e 20 6d 5f 63 52 65 66 3b 0d 0a 0d 0a 09 64 rn m_cRef;.....d
0740: 65 6c 65 74 65 20 74 68 69 73 3b 0d 0a 09 72 65 elete this;...re
0750: 74 75 72 6e 20 30 4c 3b 0d 0a 7d 0d 0a 0d 0a 53 turn 0L;..}....S
0760: 54 44 4d 45 54 48 4f 44 49 4d 50 20 6b 69 44 61 TDMETHODIMP kiDa
0770: 74 61 4f 62 6a 65 63 74 3a 3a 51 75 65 72 79 49 taObject::QueryI
0780: 6e 74 65 72 66 61 63 65 28 20 52 45 46 49 49 44 nterface( REFIID
0790: 20 72 69 69 64 2c 20 76 6f 69 64 2a 2a 20 70 70 riid, void** pp
07a0: 4f 62 6a 20 29 0d 0a 7b 0d 0a 09 69 66 28 20 3a Obj )..{...if( :
07b0: 3a 49 73 45 71 75 61 6c 49 49 44 28 20 72 69 69 :IsEqualIID( rii
07c0: 64 2c 20 49 49 44 5f 49 55 6e 6b 6e 6f 77 6e 20 d, IID_IUnknown
07d0: 29 0d 0a 09 20 7c 7c 20 3a 3a 49 73 45 71 75 61 )... || ::IsEqua
07e0: 6c 49 49 44 28 20 72 69 69 64 2c 20 49 49 44 5f lIID( riid, IID_
07f0: 49 44 61 74 61 4f 62 6a 65 63 74 20 29 20 29 0d IDataObject ) ).
0800: 0a 09 7b 0d 0a 09 09 2a 70 70 4f 62 6a 20 3d 20 ..{....*ppObj =
0810: 28 76 6f 69 64 2a 29 74 68 69 73 3b 0d 0a 09 09 (void*)this;....
0820: 41 64 64 52 65 66 28 29 3b 0d 0a 09 09 72 65 74 AddRef();....ret
0830: 75 72 6e 20 53 5f 4f 4b 3b 0d 0a 09 7d 0d 0a 0d urn S_OK;...}...
0840: 0a 09 2a 70 70 4f 62 6a 20 3d 20 4e 55 4c 4c 3b ..*ppObj = NULL;
0850: 0d 0a 09 72 65 74 75 72 6e 20 45 5f 4e 4f 49 4e ...return E_NOIN
0860: 54 45 52 46 41 43 45 3b 0d 0a 7d 0d 0a 0d 0a 2f TERFACE;..}..../
0870: 2f 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d /---------------
0880: 2d 2d 2d 2d 2d 2d 2d 2d 2d 20 49 44 61 74 61 4f --------- IDataO
0890: 62 6a 65 63 74 20 49 6d 70 6c 65 6d 65 6e 74 20 bject Implement
08a0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ----------------
08b0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2f 2f 0d 0a 0d 0a 0d ---------//.....
08c0: 0a 53 54 44 4d 45 54 48 4f 44 49 4d 50 20 6b 69 .STDMETHODIMP ki
08d0: 44 61 74 61 4f 62 6a 65 63 74 3a 3a 47 65 74 44 DataObject::GetD
08e0: 61 74 61 28 20 46 4f 52 4d 41 54 45 54 43 2a 20 ata( FORMATETC*
08f0: 66 6d 74 63 2c 20 53 54 47 4d 45 44 49 55 4d 2a fmtc, STGMEDIUM*
0900: 20 73 74 67 20 29 0d 0a 7b 0d 0a 09 48 52 45 53 stg )..{...HRES
0910: 55 4c 54 20 68 72 20 3d 20 51 75 65 72 79 47 65 ULT hr = QueryGe
0920: 74 44 61 74 61 28 20 66 6d 74 63 20 29 3b 0d 0a tData( fmtc );..
0930: 09 69 66 28 20 46 41 49 4c 45 44 28 68 72 29 20 .if( FAILED(hr)
0940: 29 0d 0a 09 09 72 65 74 75 72 6e 20 68 72 3b 0d )....return hr;.
0950: 0a 09 62 6f 6f 6c 20 72 65 73 20 3d 20 67 69 76 ..bool res = giv
0960: 65 44 61 74 61 28 20 2a 66 6d 74 63 2c 20 73 74 eData( *fmtc, st
0970: 67 2c 20 6d 5f 62 46 69 72 73 74 20 29 3b 0d 0a g, m_bFirst );..
0980: 09 6d 5f 62 46 69 72 73 74 20 3d 20 66 61 6c 73 .m_bFirst = fals
0990: 65 3b 0d 0a 09 72 65 74 75 72 6e 20 72 65 73 20 e;...return res
09a0: 3f 20 53 5f 4f 4b 20 3a 20 53 54 47 5f 45 5f 4d ? S_OK : STG_E_M
09b0: 45 44 49 55 4d 46 55 4c 4c 3b 0d 0a 7d 0d 0a 0d EDIUMFULL;..}...
09c0: 0a 53 54 44 4d 45 54 48 4f 44 49 4d 50 20 6b 69 .STDMETHODIMP ki
09d0: 44 61 74 61 4f 62 6a 65 63 74 3a 3a 51 75 65 72 DataObject::Quer
09e0: 79 47 65 74 44 61 74 61 28 20 46 4f 52 4d 41 54 yGetData( FORMAT
09f0: 45 54 43 2a 20 66 6d 74 63 20 29 0d 0a 7b 0d 0a ETC* fmtc )..{..
0a00: 09 66 6f 72 28 20 75 6e 73 69 67 6e 65 64 20 69 .for( unsigned i
0a10: 6e 74 20 69 3d 30 3b 20 69 21 3d 6d 5f 46 6f 72 nt i=0; i!=m_For
0a20: 6d 61 74 4c 69 73 74 2e 6c 65 6e 28 29 3b 20 69 matList.len(); i
0a30: 2b 2b 20 29 0d 0a 09 09 69 66 28 20 6d 5f 46 6f ++ )....if( m_Fo
0a40: 72 6d 61 74 4c 69 73 74 5b 69 5d 2e 63 66 46 6f rmatList[i].cfFo
0a50: 72 6d 61 74 20 3d 3d 20 66 6d 74 63 2d 3e 63 66 rmat == fmtc->cf
0a60: 46 6f 72 6d 61 74 20 29 0d 0a 2f 2f 09 09 09 69 Format )..//...i
0a70: 66 28 66 6d 74 63 20 26 20 54 59 4d 45 44 5f 48 f(fmtc & TYMED_H
0a80: 47 4c 4f 42 41 4c 29 0d 0a 09 09 09 09 72 65 74 GLOBAL)......ret
0a90: 75 72 6e 20 53 5f 4f 4b 3b 0d 0a 09 72 65 74 75 urn S_OK;...retu
0aa0: 72 6e 20 44 56 5f 45 5f 46 4f 52 4d 41 54 45 54 rn DV_E_FORMATET
0ab0: 43 3b 0d 0a 7d 0d 0a 0d 0a 2f 2f 2d 2d 2d 2d 2d C;..}....//-----
0ac0: 2d 2d 2d 2d 2d 20 45 6e 75 6d 72 61 74 6f 72 20 ----- Enumrator
0ad0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2f 2f 0d 0a 0d 0a 63 ---------//....c
0ae0: 6c 61 73 73 20 6b 69 44 61 74 61 4f 62 6a 65 63 lass kiDataObjec
0af0: 74 5f 45 6e 75 6d 20 3a 20 70 75 62 6c 69 63 20 t_Enum : public
0b00: 49 45 6e 75 6d 46 4f 52 4d 41 54 45 54 43 0d 0a IEnumFORMATETC..
0b10: 7b 0d 0a 70 75 62 6c 69 63 3a 0d 0a 09 6b 69 44 {..public:...kiD
0b20: 61 74 61 4f 62 6a 65 63 74 5f 45 6e 75 6d 28 20 ataObject_Enum(
0b30: 6b 69 44 61 74 61 4f 62 6a 65 63 74 2a 20 70 20 kiDataObject* p
0b40: 29 0d 0a 09 09 3a 20 6d 5f 63 52 65 66 28 20 30 )....: m_cRef( 0
0b50: 4c 20 29 2c 20 6d 5f 70 4f 62 6a 28 20 70 20 29 L ), m_pObj( p )
0b60: 2c 20 6d 5f 6e 43 75 72 28 20 30 4c 20 29 0d 0a , m_nCur( 0L )..
0b70: 09 09 7b 0d 0a 09 09 09 6d 5f 70 4f 62 6a 2d 3e ..{.....m_pObj->
0b80: 41 64 64 52 65 66 28 29 3b 0d 0a 09 09 7d 0d 0a AddRef();....}..
0b90: 09 7e 6b 69 44 61 74 61 4f 62 6a 65 63 74 5f 45 .~kiDataObject_E
0ba0: 6e 75 6d 28 29 0d 0a 09 09 7b 0d 0a 09 09 09 6d num()....{.....m
0bb0: 5f 70 4f 62 6a 2d 3e 52 65 6c 65 61 73 65 28 29 _pObj->Release()
0bc0: 3b 0d 0a 09 09 7d 0d 0a 09 53 54 44 4d 45 54 48 ;....}...STDMETH
0bd0: 4f 44 49 4d 50 5f 28 55 4c 4f 4e 47 29 20 41 64 ODIMP_(ULONG) Ad
0be0: 64 52 65 66 28 29 0d 0a 09 09 7b 0d 0a 09 09 09 dRef()....{.....
0bf0: 72 65 74 75 72 6e 20 2b 2b 6d 5f 63 52 65 66 3b return ++m_cRef;
0c00: 0d 0a 09 09 7d 0d 0a 09 53 54 44 4d 45 54 48 4f ....}...STDMETHO
0c10: 44 49 4d 50 5f 28 55 4c 4f 4e 47 29 20 52 65 6c DIMP_(ULONG) Rel
0c20: 65 61 73 65 28 29 0d 0a 09 09 7b 0d 0a 09 09 09 ease()....{.....
0c30: 69 66 28 20 2d 2d 6d 5f 63 52 65 66 20 29 0d 0a if( --m_cRef )..
0c40: 09 09 09 09 72 65 74 75 72 6e 20 6d 5f 63 52 65 ....return m_cRe
0c50: 66 3b 0d 0a 09 09 09 64 65 6c 65 74 65 20 74 68 f;.....delete th
0c60: 69 73 3b 0d 0a 09 09 09 72 65 74 75 72 6e 20 30 is;.....return 0
0c70: 4c 3b 0d 0a 09 09 7d 0d 0a 09 53 54 44 4d 45 54 L;....}...STDMET
0c80: 48 4f 44 49 4d 50 20 51 75 65 72 79 49 6e 74 65 HODIMP QueryInte
0c90: 72 66 61 63 65 28 20 52 45 46 49 49 44 20 72 69 rface( REFIID ri
0ca0: 69 64 2c 20 76 6f 69 64 2a 2a 20 70 70 4f 62 6a id, void** ppObj
0cb0: 20 29 0d 0a 09 09 7b 0d 0a 09 09 09 69 66 28 20 )....{.....if(
0cc0: 3a 3a 49 73 45 71 75 61 6c 49 49 44 28 20 72 69 ::IsEqualIID( ri
0cd0: 69 64 2c 20 49 49 44 5f 49 55 6e 6b 6e 6f 77 6e id, IID_IUnknown
0ce0: 20 29 0d 0a 09 09 09 20 7c 7c 20 3a 3a 49 73 45 )..... || ::IsE
0cf0: 71 75 61 6c 49 49 44 28 20 72 69 69 64 2c 20 49 qualIID( riid, I
0d00: 49 44 5f 49 45 6e 75 6d 46 4f 52 4d 41 54 45 54 ID_IEnumFORMATET
0d10: 43 20 29 20 29 0d 0a 09 09 09 7b 0d 0a 09 09 09 C ) ).....{.....
0d20: 09 2a 70 70 4f 62 6a 20 3d 20 28 76 6f 69 64 2a .*ppObj = (void*
0d30: 29 74 68 69 73 3b 0d 0a 09 09 09 09 41 64 64 52 )this;......AddR
0d40: 65 66 28 29 3b 0d 0a 09 09 09 09 72 65 74 75 72 ef();......retur
0d50: 6e 20 53 5f 4f 4b 3b 0d 0a 09 09 09 7d 0d 0a 09 n S_OK;.....}...
0d60: 09 09 2a 70 70 4f 62 6a 20 3d 20 4e 55 4c 4c 3b ..*ppObj = NULL;
0d70: 0d 0a 09 09 09 72 65 74 75 72 6e 20 45 5f 4e 4f .....return E_NO
0d80: 49 4e 54 45 52 46 41 43 45 3b 0d 0a 09 09 7d 0d INTERFACE;....}.
0d90: 0a 09 53 54 44 4d 45 54 48 4f 44 49 4d 50 20 43 ..STDMETHODIMP C
0da0: 6c 6f 6e 65 28 20 49 45 6e 75 6d 46 4f 52 4d 41 lone( IEnumFORMA
0db0: 54 45 54 43 2a 2a 20 70 70 4e 65 77 20 29 0d 0a TETC** ppNew )..
0dc0: 09 09 7b 0d 0a 09 09 09 2a 70 70 4e 65 77 20 3d ..{.....*ppNew =
0dd0: 20 6e 65 77 20 6b 69 44 61 74 61 4f 62 6a 65 63 new kiDataObjec
0de0: 74 5f 45 6e 75 6d 28 20 6d 5f 70 4f 62 6a 20 29 t_Enum( m_pObj )
0df0: 3b 0d 0a 09 09 09 28 28 6b 69 44 61 74 61 4f 62 ;.....((kiDataOb
0e00: 6a 65 63 74 5f 45 6e 75 6d 2a 29 28 2a 70 70 4e ject_Enum*)(*ppN
0e10: 65 77 29 29 2d 3e 6d 5f 6e 43 75 72 20 3d 20 6d ew))->m_nCur = m
0e20: 5f 6e 43 75 72 3b 0d 0a 09 09 09 28 2a 70 70 4e _nCur;.....(*ppN
0e30: 65 77 29 2d 3e 41 64 64 52 65 66 28 29 3b 0d 0a ew)->AddRef();..
0e40: 09 09 09 72 65 74 75 72 6e 20 53 5f 4f 4b 3b 0d ...return S_OK;.
0e50: 0a 09 09 7d 0d 0a 09 53 54 44 4d 45 54 48 4f 44 ...}...STDMETHOD
0e60: 49 4d 50 20 52 65 73 65 74 28 29 0d 0a 09 09 7b IMP Reset()....{
0e70: 0d 0a 09 09 09 6d 5f 6e 43 75 72 20 3d 20 30 3b .....m_nCur = 0;
0e80: 0d 0a 09 09 09 72 65 74 75 72 6e 20 53 5f 4f 4b .....return S_OK
0e90: 3b 0d 0a 09 09 7d 0d 0a 09 53 54 44 4d 45 54 48 ;....}...STDMETH
0ea0: 4f 44 49 4d 50 20 53 6b 69 70 28 20 55 4c 4f 4e ODIMP Skip( ULON
0eb0: 47 20 63 65 6c 74 20 29 0d 0a 09 09 7b 0d 0a 09 G celt )....{...
0ec0: 09 09 6d 5f 6e 43 75 72 20 2b 3d 20 63 65 6c 74 ..m_nCur += celt
0ed0: 3b 0d 0a 09 09 09 69 66 28 20 6d 5f 70 4f 62 6a ;.....if( m_pObj
0ee0: 2d 3e 6d 5f 46 6f 72 6d 61 74 4c 69 73 74 2e 6c ->m_FormatList.l
0ef0: 65 6e 28 29 20 3c 3d 20 6d 5f 6e 43 75 72 20 29 en() <= m_nCur )
0f00: 0d 0a 09 09 09 7b 0d 0a 09 09 09 09 6d 5f 6e 43 .....{......m_nC
0f10: 75 72 20 3d 20 6d 5f 70 4f 62 6a 2d 3e 6d 5f 46 ur = m_pObj->m_F
0f20: 6f 72 6d 61 74 4c 69 73 74 2e 6c 65 6e 28 29 20 ormatList.len()
0f30: 2d 20 31 3b 0d 0a 09 09 09 09 72 65 74 75 72 6e - 1;......return
0f40: 20 53 5f 46 41 4c 53 45 3b 0d 0a 09 09 09 7d 0d S_FALSE;.....}.
0f50: 0a 09 09 09 72 65 74 75 72 6e 20 53 5f 4f 4b 3b ....return S_OK;
0f60: 0d 0a 09 09 7d 0d 0a 09 53 54 44 4d 45 54 48 4f ....}...STDMETHO
0f70: 44 49 4d 50 20 4e 65 78 74 28 20 55 4c 4f 4e 47 DIMP Next( ULONG
0f80: 20 63 65 6c 74 2c 20 46 4f 52 4d 41 54 45 54 43 celt, FORMATETC
0f90: 2a 20 70 46 6d 74 2c 20 55 4c 4f 4e 47 2a 20 66 * pFmt, ULONG* f
0fa0: 65 74 63 68 65 64 20 29 0d 0a 09 09 7b 0d 0a 09 etched )....{...
0fb0: 09 09 69 66 28 20 66 65 74 63 68 65 64 20 29 0d ..if( fetched ).
0fc0: 0a 09 09 09 09 2a 66 65 74 63 68 65 64 20 3d 20 .....*fetched =
0fd0: 30 4c 3b 0d 0a 09 09 09 69 66 28 20 21 70 46 6d 0L;.....if( !pFm
0fe0: 74 20 29 0d 0a 09 09 09 09 72 65 74 75 72 6e 20 t )......return
0ff0: 45 5f 50 4f 49 4e 54 45 52 3b 0d 0a 09 09 09 55 E_POINTER;.....U
1000: 4c 4f 4e 47 20 69 3b 0d 0a 09 09 09 66 6f 72 28 LONG i;.....for(
1010: 20 69 3d 30 3b 20 69 20 3c 20 63 65 6c 74 20 26 i=0; i < celt &
1020: 26 20 6d 5f 6e 43 75 72 20 3c 20 6d 5f 70 4f 62 & m_nCur < m_pOb
1030: 6a 2d 3e 6d 5f 46 6f 72 6d 61 74 4c 69 73 74 2e j->m_FormatList.
1040: 6c 65 6e 28 29 3b 20 69 2b 2b 2c 6d 5f 6e 43 75 len(); i++,m_nCu
1050: 72 2b 2b 20 29 0d 0a 09 09 09 09 2a 70 46 6d 74 r++ )......*pFmt
1060: 2b 2b 20 3d 20 6d 5f 70 4f 62 6a 2d 3e 6d 5f 46 ++ = m_pObj->m_F
1070: 6f 72 6d 61 74 4c 69 73 74 5b 6d 5f 6e 43 75 72 ormatList[m_nCur
1080: 5d 3b 0d 0a 09 09 09 69 66 28 20 66 65 74 63 68 ];.....if( fetch
1090: 65 64 20 29 0d 0a 09 09 09 09 2a 66 65 74 63 68 ed )......*fetch
10a0: 65 64 20 3d 20 69 3b 0d 0a 09 09 09 72 65 74 75 ed = i;.....retu
10b0: 72 6e 20 69 3d 3d 63 65 6c 74 20 3f 20 53 5f 4f rn i==celt ? S_O
10c0: 4b 20 3a 20 53 5f 46 41 4c 53 45 3b 0d 0a 09 09 K : S_FALSE;....
10d0: 7d 0d 0a 70 72 69 76 61 74 65 3a 0d 0a 09 55 4c }..private:...UL
10e0: 4f 4e 47 20 20 20 20 20 20 20 20 20 6d 5f 63 52 ONG m_cR
10f0: 65 66 3b 0d 0a 09 55 4c 4f 4e 47 20 20 20 20 20 ef;...ULONG
1100: 20 20 20 20 6d 5f 6e 43 75 72 3b 0d 0a 09 6b 69 m_nCur;...ki
1110: 44 61 74 61 4f 62 6a 65 63 74 2a 20 6d 5f 70 4f DataObject* m_pO
1120: 62 6a 3b 0d 0a 7d 3b 0d 0a 0d 0a 53 54 44 4d 45 bj;..};....STDME
1130: 54 48 4f 44 49 4d 50 20 6b 69 44 61 74 61 4f 62 THODIMP kiDataOb
1140: 6a 65 63 74 3a 3a 45 6e 75 6d 46 6f 72 6d 61 74 ject::EnumFormat
1150: 45 74 63 28 20 44 57 4f 52 44 20 64 72 63 74 6e Etc( DWORD drctn
1160: 2c 20 49 45 6e 75 6d 46 4f 52 4d 41 54 45 54 43 , IEnumFORMATETC
1170: 2a 2a 20 70 70 45 6e 6d 20 29 0d 0a 7b 0d 0a 09 ** ppEnm )..{...
1180: 69 66 28 20 21 70 70 45 6e 6d 20 29 0d 0a 09 09 if( !ppEnm )....
1190: 72 65 74 75 72 6e 20 45 5f 49 4e 56 41 4c 49 44 return E_INVALID
11a0: 41 52 47 3b 0d 0a 09 2a 70 70 45 6e 6d 20 3d 20 ARG;...*ppEnm =
11b0: 4e 55 4c 4c 3b 0d 0a 09 69 66 28 20 64 72 63 74 NULL;...if( drct
11c0: 6e 21 3d 44 41 54 41 44 49 52 5f 47 45 54 20 29 n!=DATADIR_GET )
11d0: 0d 0a 09 09 72 65 74 75 72 6e 20 45 5f 4e 4f 54 ....return E_NOT
11e0: 49 4d 50 4c 3b 0d 0a 0d 0a 09 28 2a 70 70 45 6e IMPL;.....(*ppEn
11f0: 6d 20 3d 20 6e 65 77 20 6b 69 44 61 74 61 4f 62 m = new kiDataOb
1200: 6a 65 63 74 5f 45 6e 75 6d 28 20 74 68 69 73 20 ject_Enum( this
1210: 29 29 2d 3e 41 64 64 52 65 66 28 29 3b 0d 0a 09 ))->AddRef();...
1220: 72 65 74 75 72 6e 20 53 5f 4f 4b 3b 0d 0a 7d 0d return S_OK;..}.
1230: 0a .