数据窗口中行与行之间拖放问题
如何让拖动的图标变成行的样子,那个大框台难看了,我的拖放程序如下:
dragobject ldrg_object
ldrg_object = draggedobject()
if typeof(ldrg_object) = datawindow! then
if ldrg_object.classname() <> this.classname() then
this.Drag(cancel!)
return
end if
end if
//确定拖动发生在不同行之间
if il_dragedrow = row then return
//移动此行
this.rowsmove(il_dragedrow, il_dragedrow, primary!, this, row, primary!)
this.drag(end!)