topic-19571

Posts: 159

Joined: Wed Mar 28, 2007 01:19 PM

BTNBMP lButtonDown
Posted: Wed Aug 11, 2010 09:10 PM

Hi to all!
I need to trigger an action with the mouse left Button down (and not at the release) in a BTNBMP. Any help would be appreciated.
TIA
Euclides

Daniel Garcia-Gil

Posts: 2365

Joined: Wed Nov 02, 2005 11:46 PM

Re: BTNBMP lButtonDown
Posted: Wed Aug 11, 2010 09:31 PM

Euclides

Try...

oBtn:bLClicked = {|| MyAction() }

and not define "ACTION" in button

our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5Njk4MDc1OQ?src=global9

Euclides

Posts: 159

Joined: Wed Mar 28, 2007 01:19 PM

Re: BTNBMP lButtonDown
Posted: Thu Aug 12, 2010 02:08 PM

Danie, thanks for the answer, but...
...
REDEFINE BTNBMP oBtn RESOURCE "RESOURCE" ID 100 OF oDlg
oBtn:bLClicked = {|| MsgInfo(oBtn:lPressed) }
...
does not execute (maybe is trapped somewhere before)
Regards
Euclides

Daniel Garcia-Gil

Posts: 2365

Joined: Wed Nov 02, 2005 11:46 PM

Re: BTNBMP lButtonDown
Posted: Thu Aug 12, 2010 02:22 PM

Euclides...

i checked the class... and this behavior isn't supported

sorry...

you can try modify the class

METHOD LButtonDown( nRow, nCol )

change to this line

Code (fw): Select all Collapse

if ::lDrag .or. ! Empty( ::oDragCursor ) .or. ! Empty( ::bLClicked )

our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5Njk4MDc1OQ?src=global9

Euclides

Posts: 159

Joined: Wed Mar 28, 2007 01:19 PM

Re: BTNBMP lButtonDown
Posted: Thu Aug 12, 2010 05:01 PM

OK, working as expected.
Thanks Daniel!
Regards
Euclides

FiveTech Support Forums

Continue the discussion