Sign up on the Revelation Software website to have access to the most current content, and to be able to ask questions and get answers from the Revelation community

At 27 OCT 1998 10:34:33AM Dimitri wrote:

Does anyone know how to add the right double click event to a control?

I've successfully added the left double click using the 0x203 and qualify event commands but when I tried using the 0x206 for Right double click it just delivers the right click (edit,cut paste popop).

What am I Missing?

Thanks,

Dimitri

Dimitri@clandt.com


At 28 OCT 1998 12:35AM Bob Carten, WinWin Solutions Inc. wrote:

Dmitri-

The qualify event should be set on the Create event of the window, as you are doing.

However, you must also put the appropriate message in the WINMSG event of the control:

eg:

To qualify the event for every control on the window, on the create event of the window, put something like this (use the appropriate event codes) :

Declare Function Send_Message

Win_Name=CtrlEntID1,'.'

* Create Event For Form

*—

* mouse_move

*—

Equ WM_MOUSEMOVE$ to 512 ;* \0200\

MAP=@CtrlEntID-]CtrlMap

col='

loop

remove control from map at col setting pos

while control

rv=Send_Message(Control, 'QUALIFY_EVENT', '0x204', 1)
rv=Send_Message(Control, 'QUALIFY_EVENT', '0x203', 1)
rv=Send_Message(Control, 'QUALIFY_EVENT', '0x206', 1)
rv=Send_Message(Control, "QUALIFY_EVENT", "0x7b", 1)
rv=Send_Message(Control, "QUALIFY_EVENT", wm_MouseMOve$, 1)

repeat

/* Events I know:

0x204 Right Mouse

0x203 Left Mouse Double Click

0x206 Right Mouse Double Click

The rest are in the windows.h header file

*/

On the winmsg event of the control, put this:

Declare Function Msg

begin case

case message=516
	text=Right Mouse Click'
Case message=515'
	text=Double Left Mouse Click'
Case Message=512'
	text=MouseOver'

end case

x=msg('','Message Received:': text)

RETURN 0

Hope it helps-

Bob


At 28 OCT 1998 10:13AM Dimitri wrote:

Thanks I think I've done all that but will double check my code.

Do you actually use the right double click on a control?

View this thread on the forum...

  • third_party_content/community/commentary/forums_nonworks/efd2f86b41f873e4852566aa0050115e.txt
  • Last modified: 2023/12/28 07:40
  • by 127.0.0.1