查看單個文章
舊 2008-05-30, 03:09 PM   #2 (permalink)
mini
管理版主
 
mini 的頭像
榮譽勳章
UID - 4144
在線等級: 級別:98 | 在線時長:10160小時 | 升級還需:37小時級別:98 | 在線時長:10160小時 | 升級還需:37小時級別:98 | 在線時長:10160小時 | 升級還需:37小時級別:98 | 在線時長:10160小時 | 升級還需:37小時級別:98 | 在線時長:10160小時 | 升級還需:37小時級別:98 | 在線時長:10160小時 | 升級還需:37小時級別:98 | 在線時長:10160小時 | 升級還需:37小時級別:98 | 在線時長:10160小時 | 升級還需:37小時
註冊日期: 2002-12-07
文章: 13488
精華: 0
現金: 26849 金幣
資產: 3024779 金幣
預設



http://www.FunP.net/324341

改用 Listview 控制項
因為 List 控制項,只能整個拖曳,會不好看
Listview可以對個別 subitem作拖曳動作 (對應到 Text1_OLEDragDrop)

範例中
拖曳text時
需反白整個字串(text1.text),才能形成 OLE拖曳 (ListView1_OLEDragDrop)
所以對 lbl控制項陣列 也作了個 拖曳設定 (對應到 ListView1_DragDrop)

詳細"事件"反應,請自行作中斷點以利了解

ListViewOP 及 AddRecond2ListView 副程式
是個人直接提取 個人以前的成品
之 副程式
所以有些地方會有點多此一舉
請自行斟酌刪除、修改
mini 目前離線  
送花文章: 2053, 收花文章: 8067 篇, 收花: 26918 次
回覆時引用此帖
向 mini 送花的會員:
飛行船大大 (2008-05-30)
感謝您發表一篇好文章