Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
MouseDown on Grid
Message
From
15/06/2022 03:17:03
Lutz Scheffler (Online)
Lutz Scheffler Software Ingenieurbüro
Dresden, Germany
 
 
To
14/06/2022 18:57:21
General information
Forum:
Visual FoxPro
Category:
Object Oriented Programming
Miscellaneous
Thread ID:
01684512
Message ID:
01684517
Views:
52
Hi Hank,

Thanks
CRLT+Mouse; SHIFT+Mouse. I need to figure out the CTRL and the SHIFT, Mouse alone works as expected.

Lutz
>Have you checked mdown() value in BeforeRowColChange?
>
>>Hi All,
>>
>>I have an oddness in grids events.
>>
>>The event MousDown is called by the system, but code in MousDown is not executed in this moment but later on.
>>
>>My MousDown looks like
>>
>>LPARAMETERS ;
>> tnButton,;
>> tnShift,;
>> tnXCoord,;
>> tnYCoord,;
>> toColumn
>>
>>DEBUGOUT PROGRAM(),' ',ALIAS(),' ',RECNO()
>>
>>If I MouseClick I got EventLog / Debuglog
>>
>>46736,246, frmnutzer.pgfmain.page1.cntlist.grdlistgrid.MouseDown(1,0, 2,0, 461,0, 208,0)
>>46736,246, frmnutzer.pgfmain.page1.cntlist.grdlistgrid.BeforeRowColChange(3,0)
>>46736,246, frmnutzer.pgfmain.page1.cntlist.grdlistgrid.column3.text1.When()
>>46736,246, frmnutzer.pgfmain.page1.cntlist.grdlistgrid.column3.text1.Valid()
>>46736,249, frmnutzer.pgfmain.page1.cntlist.grdlistgrid.column3.text1.Valid()
>>46736,249, frmnutzer.pgfmain.page1.cntlist.grdlistgrid.column3.text1.When()
>>46736,254, frmnutzer.pgfmain.page1.cntlist.grdlistgrid.AfterRowColChange(3,0)
>>46736,262, frmnutzer.pgfmain.page1.cntlist.grdlistgrid.column3.text1.MouseDown(1,0, 2,0, 461,0, 208,0)
>>FRMNUTZER.PGFMAIN.PAGE1.CNTLIST.GRDLISTGRID.MOUSEDOWN   CURMITARBEITER_EDIT           16,0
>>
>>The last line is the DEBUGOUT of MouseDown
>>
>>Yeah, nice, I would like to know if the mouse is pressed with SHIFT or CTRL, if I reach BeforeRowColChange...
>>
>>Could somebody please check that he got this odd event behaviour? Does somebody have an idea how to get the code running the right moment?
>>
>>Thanks
>>Lutz
Words are given to man to enable him to conceal his true feelings.
Charles Maurice de Talleyrand-Périgord

Weeks of programming can save you hours of planning.

Off

There is no place like [::1]
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform