访问量: 34338次,访客数: 29381人,浏览量: 1次 
首页  编辑  

怎样判断鼠标的双击

Tags: /超级猛料/Message.消息和事件/   Date Created: Wed Aug 15 2001 04:00:51 GMT+0000 (Coordinated Universal Time)

怎样判断鼠标的双击

if (Shift=[ssRight,ssDouble])右键

if (Shift=[ssLeft,ssDouble])右键

*********

if ssDouble in Shift then

模拟鼠标的事件

Control1.Perform( WM_LBUTTONDOWN, Keys, MakeLong(yPos, xPos) ); // 鼠标按下

Control1.Perform( WM_LBUTTONUP, Keys, MakeLong(yPos, xPos) ); // 鼠标抬起