http://www.FunP.net/324341
改用 Listview 控制項
因為 List 控制項,只能整個拖曳,會不好看
Listview可以對個別 subitem作拖曳動作 (對應到 Text1_OLEDragDrop)
範例中
拖曳text時
需反白整個字串(text1.text),才能形成 OLE拖曳 (ListView1_OLEDragDrop)
所以對 lbl控制項陣列 也作了個 拖曳設定 (對應到 ListView1_DragDrop)
詳細"事件"反應,請自行作中斷點以利了解
ListViewOP 及 AddRecond2ListView 副程式
是個人直接提取 個人以前的成品
之 副程式
所以有些地方會有點多此一舉
請自行斟酌刪除、修改