R redphoenix Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-27 #1 如果 鼠标左键按下 并且 鼠标移动 其实也就是 鼠标拖动 大大们帮个忙啊！！！
W weichao9999 Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-27 #2 不太明白你的问题 如果是鼠标拖动在控间的鼠标事件里编程就可实现。 onMouseDown( ) onMouseMove( ) onMouseUp( )
R redphoenix Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-27 #4 其实我说的是如何实现鼠标的拖动； mousedown是鼠标按下 mousemove是鼠标移动（不是拖动） mouseup是鼠标弹起 那么鼠标拖动该如何判断？？？？ 其实拖动就是一边按住鼠标键一边移动，但我不知道该怎么用语句判断
其实我说的是如何实现鼠标的拖动； mousedown是鼠标按下 mousemove是鼠标移动（不是拖动） mouseup是鼠标弹起 那么鼠标拖动该如何判断？？？？ 其实拖动就是一边按住鼠标键一边移动，但我不知道该怎么用语句判断
R redphoenix Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-27 #5 plzw兄弟，你的意思我知道，但该如何判断左键是否已经按下了呢？
X xtyygyiwf520 Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-27 #6 在onMouseDown( )中设标志 Flag=True; 在onMouseMove( )中判断 if flag then 执行所需操作 在onMouseUp( ) 中初始化标志 Flag=Flase;
在onMouseDown( )中设标志 Flag=True; 在onMouseMove( )中判断 if flag then 执行所需操作 在onMouseUp( ) 中初始化标志 Flag=Flase;
P plzw Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-27 #7 同意楼上 在OnMouseDown里面 if (Button = mbLeft) then //Set Flag 在OnMouseUp中 if (Button = mbLeft) then //Reset Flag 在OnMouseMove里面进行操作
同意楼上 在OnMouseDown里面 if (Button = mbLeft) then //Set Flag 在OnMouseUp中 if (Button = mbLeft) then //Reset Flag 在OnMouseMove里面进行操作
R redphoenix Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-27 #8 xtyygyiwf520兄弟，我觉得你说的很有道理，不过如何在onMouseDown( )中设标志 Flag=True;是不是var flag:boolean; begin ... flag:=true end ？？？
xtyygyiwf520兄弟，我觉得你说的很有道理，不过如何在onMouseDown( )中设标志 Flag=True;是不是var flag:boolean; begin ... flag:=true end ？？？
P plzw Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-27 #9 可以设置一个私有的成员 TForm1 = class(TForm) private FFlag: Boolean; //... end; 或者是一个全局变量 var Flag: Boolean;
R redphoenix Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-27 #10 哈哈谢谢各位大大了，在下明白了，不胜感激，这里就给你们送分！！
