±ÍÇÏ´Â ¼Õ´Ô À̽ʴϴÙ
·Î±×ÀÎ
ȸ¿ø°¡ÀÔ
  
  µ¨¸¶´ç °ø½Ä ÀºÇà°èÁÂ
  ÇϳªÀºÇà 227-910235-83607
  ¿¹±ÝÁÖ ÀÌ»ó±¹(¿î¿µÁø)
ÇÁ·ÎÁ§Æ® °Ô½ÃÆÇ
ÅõÇ¥°Ô½ÃÆÇ
µ¨¸¶´ç¼Ò°³
±âÃʺÎÅÍ È°¿ë±îÁö! µ¨ÆÄÀÌ ±³À° - µ¥ºê±â¾î
Áú¹®°ú ´äº¯ Áú¹®°ú ´äº¯ ÀÔ´Ï´Ù.
±Û³»¿ë - Áú¹®°ú ´äº¯
 [Áú¹®]µ¨ÆÄÀÌ7, ShellListView À©µµ¿ì10¿¡¼­ BeginDrag½Ã ±ô¹ÚÀÓ
¶óÀ̶óÀ̶ó
(ÇѼºÈ£)
2019-06-17 ¿ÀÈÄ 4:18:58
635ȸ Á¶È¸


µî·ÏµÈ ÆÄÀÏÀÌ ¾ø½À´Ï´Ù.

1. °³¹ß/½ÇÇà Ç÷§Æû

(1) OS : Window10

(2) °³¹ßÅø : Delphi7

µ¨ÆÄÀÌ7¿¡¼­ ShellListView¸¦ ÀÌ¿ëÇÏ¿© Drag&DropÀ» Çϱâ À§ÇØ begindrag¸¦ »ç¿ëÇÏ¿´±¸¿ä

¹®Á¦´Â À©µµ¿ì7ÀÇ È¯°æ¿¡¼­´Â ¹®Á¦¾øÀÌ ÀÛµ¿ÇÏ¿´À¸³ª À©µµ¿ì10¿¡¼­ »ç¿ë½Ã ½© ÄÄÆ÷³ÍÆ® ¸®½ºÆ®ÀÇ ÆÄÀÏÀ̳ª Æú´õ À§·Î µå·¡±× ÁßÀÎ ¸¶¿ì½º Ä¿¼­°¡ À̵¿ÇÏ¸é ±ô¹ÚÀÌ´ÂÁõ»óÀÌ ¹ß»ýÇÕ´Ï´Ù.

±â´É»óÀÇ ¹®Á¦´Â ¾øÀ¸³ª, ÇØ´ç ±ô¹ÚÀÓ°ú ÇÔ²² ¸¶¿ì½º À̵¿¿¡ Áö¿¬ÀÌ ¹ß»ýÇÏ´Â »óȲÀÔ´Ï´Ù.

Ȥ½Ã ¸ô¶ó¼­ ¾Æ·¡¿Í °°Àº ¼Ò½º¸¸ ÀÖ´Â Å×½ºÆ® ÇÁ·Î±×·¥À» ¸¸µé¾úÀ¸³ª. µ¿ÀÏ ÇÑ »óȲÀÔ´Ï´Ù.

MouseDownÀ̺¥Æ®¿¡ 

  If Button in [mbLeft] then
  Begin
    Item:= ShellListView1.GetItemAt(X, Y);
    ShellListView1.BeginDrag(True, 5);
  End;

´Ù¸¥ Shell ÄÄÆ÷³ÍÆ®¸¦ ¸î°³ »ç¿ëÇغ¸¾ÒÀ¸³ª ´Ù µ¿ÀÏÇÑ »óȲÀÔ´Ï´Ù.

ÀÌ·± Çö»ó °æÇèÇϽŠ¼±¹è´Ôµé Á¶¾ðÀÌ ÇÊ¿äÇÕ´Ï´Ù. °¨»çÇÕ´Ï´Ù.