壮士留步!
在窗体上有一ListView, DragKing属性设为"dkDrag",DragMode属性设为"dmAutomatic",当我在ListView的OnChanging属性中加入
ShowMessage('hello taxi')时,当对话框关闭后,ListView的光标就变为drNoDrop了,请问应该解决这个问题。
问题点数:20、回复次数:10Top
1 楼zx_wang(wzx)回复于 2002-04-09 18:16:31 得分 0
我没有这样的问题Top
2 楼hch_d(城城)回复于 2002-04-09 19:05:21 得分 0
关注一下…………Top
3 楼taxi(当时明月在,曾照彩云归)回复于 2002-04-09 19:33:30 得分 0
再说一次:
在窗体上有一ListView, DragKing属性设为"dkDrag",DragMode属性设为"dmAutomatic",假设有三个项目1,ListView的OnChanging属性事件代码为:
ShowMessage('hello taxi'),
当我选中其它项目时,显示出该消息框,当消息框关闭后,ListView的光标就变为drNoDrop了,请问应该如何解决这个问题。
Top
4 楼iroi()回复于 2002-04-09 20:03:50 得分 0
procedure TForm1.ListView1Changing(Sender: TObject; Item: TListItem;
Change: TItemChange; var AllowChange: Boolean);
begin
ShowMessage('hello taxi');
AllowChange := false;
end;
相信你选中的时候,不需要拖动吧Top
5 楼taxi(当时明月在,曾照彩云归)回复于 2002-04-09 20:29:06 得分 0
将AllowChange设为False,就不能选择其它项目了!
我说的只是一个简单的例子,实际的情况是在ListView的OnChanging事件中,我要作出一个判断,如果XXXXX改动了,就询问用户是否保存对XXXX的改动。所以就出现上面的情况,还有就是ListView的项目是可由用户自由拖放的。Top
6 楼taxi(当时明月在,曾照彩云归)回复于 2002-04-09 20:51:47 得分 0
悲呼!Top
7 楼taxi(当时明月在,曾照彩云归)回复于 2002-04-10 10:25:25 得分 0
极度失望中!Top
8 楼chenjbjbjb(哈哈)回复于 2002-04-10 12:59:48 得分 20
只能同情你一下,我也出现过类似问题。不过是treeview,我选中一个节点。
然后点击右键,弹出另一个窗体。等鼠标回答treeview上后,光标变成NoDrop。我的程序允许在treeview是拖动的。但是这个错在我程序里,影响不大,至少客户同意了。呵呵
Top
9 楼taxi(当时明月在,曾照彩云归)回复于 2002-04-10 19:32:33 得分 0
大侠呢,都闭关修炼了?Top
10 楼Linux2001(闭关开发中)回复于 2002-04-11 11:59:40 得分 0
大侠早就走光了Top




