虚表 —— 拖入文件

光庆 1月前 530

import win.ui;
import godking.vlistEx;
/*DSG{{*/
mainForm = win.form(text="vlistEx - table adapter";right=455;bottom=247)
mainForm.add(
listview={cls="vlistEx";left=16;top=24;right=440;bottom=240;border=1;z=1}
)
/*}}*/

//======================= 创建虚表 =======================
mainForm.listview.noScroll =true
mainForm.listview.setColumns({"序号","文件"},{50,-1},1);
var t = {
    {"[@rowindex]",""} 
    {"[@rowindex]",""} 
    {"[@rowindex]",""} 
    {"[@rowindex]",""} 
    {"[@rowindex]",""}
}
mainForm.listview.setTable(t,false);
//======================= 功能演示 =======================
mainForm.listview.onDropFiles = function(row/*行*/,col/*列*/,files/*文件数组*/){
	/*鼠标拖入文件。row,col为拖放处的单元格行号、列号。files为拖入的文件数组。*/
	if row and col==2 owner.setCellText(row,col,files[1])
}
mainForm.show();
win.loopMessage();


最新回复 (3)
  • aardio 1月前
    0 引用 2
    一下子发这么多好,学不过来
  • kio 1月前
    0 引用 3

    对于管理员权限运行导致拖拽事件失效的,因UAC的影响,可以使用相应的函数允许消息传递。 

    ::User32.ChangeWindowMessageFilterEx(mainForm.listview.hwnd, 0x233/*_WM_DROPFILES*/, 1, null); 

    ::User32.ChangeWindowMessageFilterEx(mainForm.listview.hwnd, 0x0049, 1, null);

  • 光庆 1月前
    0 引用 4
    kio 对于管理员权限运行导致拖拽事件失效的,因UAC的影响,可以使用相应的函数允许消息传递。 ::User32.ChangeWindowMessageFilterEx(mainForm.l ...
    已加入虚表库,以备使用。谢谢提供。
返回