Hi Borislav
Thanks
KEY+Shift goes through KeyPress - this works.

I need Mouse+ SHIFT or CTRL

Lutz
>With a little help from WIN32API project from VFPx
>

>#define VK_SHIFT   0x10    && SHIFT key
>#define VK_CONTROL 0x11    && CTRL key
>#define VK_MENU    0x12    && ALT key
>
>DECLARE INTEGER GetAsyncKeyState IN user32;
>     INTEGER vKey
>
>lbLoop = .t.
>DO WHILE lbLoop 
>   CLEAR
>   ? "Shift", GetAsyncKeyState (VK_SHIFT)        # 0
>   ? "Ctrl" , GetAsyncKeyState (VK_CONTROL) # 0
>   ? "Alt"  , GetAsyncKeyState (VK_MENU)        # 0
>   lbLoop = INKEY(0) # 27 && Press ESC to exit the loop, press any other key to see the result. To Alt+A, Ctrl+A, Shift+A, only A etc. becuase if you press only Shift/Ctril/Alt Inkey(0) do not work :-)
>ENDDO
>

>
>
>
>
>>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