Artifact
f976fc7154b1ef8b39e1c1485ad0cb63daf0aa8f:
0000: 0d 0a 23 69 6e 63 6c 75 64 65 20 22 53 74 64 41 ..#include "StdA
0010: 66 78 2e 68 22 0d 0a 23 69 6e 63 6c 75 64 65 20 fx.h"..#include
0020: 22 56 37 43 6f 6e 74 72 6f 6c 2e 68 22 0d 0a 0d "V7Control.h"...
0030: 0a 23 70 72 61 67 6d 61 20 6f 6e 63 65 0d 0a 0d .#pragma once...
0040: 0a 42 4f 4f 4c 20 5f 62 44 72 61 67 4f 6e 20 3d .BOOL _bDragOn =
0050: 20 46 41 4c 53 45 3b 0d 0a 43 56 61 6c 75 65 20 FALSE;..CValue
0060: 5f 76 44 72 61 67 56 61 6c 75 65 3b 0d 0a 0d 0a _vDragValue;....
0070: 76 6f 69 64 20 43 56 37 43 6f 6e 74 72 6f 6c 3a void CV7Control:
0080: 3a 42 65 67 69 6e 44 72 61 67 28 63 6f 6e 73 74 :BeginDrag(const
0090: 20 43 56 61 6c 75 65 26 20 76 44 72 61 67 56 61 CValue& vDragVa
00a0: 6c 75 65 29 0d 0a 7b 0d 0a 09 5f 62 44 72 61 67 lue)..{..._bDrag
00b0: 4f 6e 20 3d 20 54 52 55 45 3b 0d 0a 09 5f 76 44 On = TRUE;..._vD
00c0: 72 61 67 56 61 6c 75 65 20 3d 20 76 44 72 61 67 ragValue = vDrag
00d0: 56 61 6c 75 65 3b 0d 0a 7d 0d 0a 0d 0a 42 4f 4f Value;..}....BOO
00e0: 4c 20 43 56 37 43 6f 6e 74 72 6f 6c 3a 3a 49 73 L CV7Control::Is
00f0: 44 72 61 67 4f 6e 28 29 0d 0a 7b 0d 0a 09 72 65 DragOn()..{...re
0100: 74 75 72 6e 20 5f 62 44 72 61 67 4f 6e 3b 0d 0a turn _bDragOn;..
0110: 7d 0d 0a 0d 0a 76 6f 69 64 20 43 56 37 43 6f 6e }....void CV7Con
0120: 74 72 6f 6c 3a 3a 47 65 74 44 72 61 67 56 61 6c trol::GetDragVal
0130: 75 65 28 43 56 61 6c 75 65 26 20 76 44 72 61 67 ue(CValue& vDrag
0140: 56 61 6c 75 65 2c 20 43 4f 6c 65 44 61 74 61 4f Value, COleDataO
0150: 62 6a 65 63 74 2a 20 70 44 61 74 61 4f 62 6a 65 bject* pDataObje
0160: 63 74 29 0d 0a 7b 0d 0a 09 69 66 20 28 5f 62 44 ct)..{...if (_bD
0170: 72 61 67 4f 6e 29 0d 0a 09 7b 0d 0a 09 09 76 44 ragOn)...{....vD
0180: 72 61 67 56 61 6c 75 65 20 3d 20 5f 76 44 72 61 ragValue = _vDra
0190: 67 56 61 6c 75 65 3b 0d 0a 09 09 72 65 74 75 72 gValue;....retur
01a0: 6e 3b 0d 0a 09 7d 0d 0a 0d 0a 09 2f 2f ce e1 f9 n;...}.....//...
01b0: e5 e5 20 ef f0 e5 ee e1 f0 e0 e7 ee e2 e0 ed e8 .. .............
01c0: e5 20 e7 ed e0 f7 e5 ed e8 ff 20 43 4f 6c 65 44 . ........ COleD
01d0: 61 74 61 4f 62 6a 65 63 74 20 e2 20 43 56 61 6c ataObject . CVal
01e0: 75 65 0d 0a 09 69 66 20 28 70 44 61 74 61 4f 62 ue...if (pDataOb
01f0: 6a 65 63 74 2d 3e 49 73 44 61 74 61 41 76 61 69 ject->IsDataAvai
0200: 6c 61 62 6c 65 28 43 46 5f 54 45 58 54 29 29 0d lable(CF_TEXT)).
0210: 0a 09 7b 0d 0a 09 09 48 47 4c 4f 42 41 4c 20 68 ..{....HGLOBAL h
0220: 47 6c 6f 62 61 6c 20 3d 20 70 44 61 74 61 4f 62 Global = pDataOb
0230: 6a 65 63 74 2d 3e 47 65 74 47 6c 6f 62 61 6c 44 ject->GetGlobalD
0240: 61 74 61 28 43 46 5f 54 45 58 54 29 3b 0d 0a 09 ata(CF_TEXT);...
0250: 09 76 44 72 61 67 56 61 6c 75 65 20 3d 20 28 4c .vDragValue = (L
0260: 50 43 53 54 52 29 3a 3a 47 6c 6f 62 61 6c 4c 6f PCSTR)::GlobalLo
0270: 63 6b 28 68 47 6c 6f 62 61 6c 29 3b 0d 0a 09 09 ck(hGlobal);....
0280: 3a 3a 47 6c 6f 62 61 6c 55 6e 6c 6f 63 6b 28 68 ::GlobalUnlock(h
0290: 47 6c 6f 62 61 6c 29 3b 0d 0a 09 7d 0d 0a 7d 0d Global);...}..}.
02a0: 0a 0d 0a 76 6f 69 64 20 43 56 37 43 6f 6e 74 72 ...void CV7Contr
02b0: 6f 6c 3a 3a 45 6e 64 44 72 61 67 28 29 0d 0a 7b ol::EndDrag()..{
02c0: 0d 0a 09 5f 62 44 72 61 67 4f 6e 20 3d 20 46 41 ..._bDragOn = FA
02d0: 4c 53 45 3b 0d 0a 09 5f 76 44 72 61 67 56 61 6c LSE;..._vDragVal
02e0: 75 65 2e 52 65 73 65 74 28 29 3b 0d 0a 7d 0d 0a ue.Reset();..}..