FiveTech Software tech support forums

Posted: **Wed Jan 11, 2023 5:08 am**

hi,

to "mark" multiple Item in Windows Explorer you need "Control + left Mouse Button down"

how to get that Event

---

i need it for my CLASS TGrid where i get "Keyboard" Input in Method Notify

   CASE nCode == LVN_KEYDOWN
      nKey := LV_GETGRIDVKEY( nPtrNMHDR )
      IF nKey = 13
         IF ::bClick != nil
            EVAL( ::bClick, ::nOption, Self )
         ENDIF

is this the Place to "ask" for CTRL + LBUTTONDOWN

Code: Select all | Expand

      //  CTRL + Left Mouse down  
      ELSEIF ( GetKeyState( VK_CONTROL ) .AND. ??? )

Posted: **Wed Jan 11, 2023 6:34 am**

Dear Jimmy,

Here you have a working example:

Code: Select all | Expand

#include "FiveWin.ch"

function Main()

    local oWnd 

    DEFINE WINDOW oWnd 

    oWnd:bLClicked = { || If( GetKeyState( VK_CONTROL ), MsgInfo( "Ctrl + left click" ),) }

    ACTIVATE WINDOW oWnd 

return nil

Posted: **Wed Jan 11, 2023 7:02 am**

hi Antonio,

Code: Select all | Expand

oWnd:bLClicked = { || If( GetKeyState( VK_CONTROL ), MsgInfo( "Ctrl + left click" ),) }

YES, thx to point me to Codeblock Slot

FiveTech Software tech support forums

how to get CTRL + LBUTTONDOWN Event ?

how to get CTRL + LBUTTONDOWN Event ?

Re: how to get CTRL + LBUTTONDOWN Event ?

Re: how to get CTRL + LBUTTONDOWN Event ?