执行onDoubleClick事件时,同时引起了onMouseDown事件,该如何避免

执行onDoubleClick事件时,同时引起了onMouseDown事件,该如何处理。
onDoubleClick和onMouseDown事件中,各有各的功能,

问题是,执行onDoubleClick事件时,同时引起了onMouseDown事件,

该如何处理呢?

------解决方案--------------------
如果是我,我就会分离代码,不要产生这种混用,或者适时的动态的绑定相应事件
------解决方案--------------------
设置一个判断鼠标down 与 up间隔的 全局变量
i:
Mousedown
i:=gettickcount;
mouseup
i:=gettickcount-i;
if i<100 then //判断为双击
需要恢复mousemove的动作
dblclick:
 if i<100 then //判断为双击
 
------解决方案--------------------
其实你无非就是双击变大。单击移动是吧
换个代码就可以了

------解决方案--------------------
你做的就是 无标题窗口的拖动 和最大化 其实没那么复杂
procedure TForm1.imgCaptionMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if (button=mbleft) and not (WindowState = wsMaximized ) then
begin
ReleaseCapture;
Perform (WM_syscommand,$f012,0);
end;
end;
解决拖动问题

双击的用你的
------解决方案--------------------
双击用下面的也可以 
ReleaseCapture;


SendMessage(handle, wm_SysCommand, SC_MAXIMIZE, 0) else//最大化
SendMessage(handle, wm_SysCommand, SC_RESTORE, 0)//恢复
------解决方案--------------------
楼主还是自己重编DoubleClick和MouseDown事件吧
两次MouseDown的时间比较短判定为DoubleClick事件这时只响应onDoubleClic
两次MouseDown的时间较长判定为2次MouseDown事件 这时只响应onMouseDown


------解决方案--------------------
探讨
你做的就是 无标题窗口的拖动 和最大化 其实没那么复杂
procedure TForm1.imgCaptionMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if (button=mbleft) and not (WindowState = wsMa……