Página 1 de 1
En un TListBox al pulsar con el botón derecho seleccione el Item sobre el que está el cursor del ratón
Publicado: Lun Abr 19, 2021 9:34 pm
por josemanuel
En un TListBox al pulsar con el botón derecho (evento :OnRButtonUp u :OnRButtonDown), seleccione el Item sobre el que está el cursor del ratón.
Lo mismo que sucede con SelectCellFromPoint en “TBrowse”
Re: En un TListBox al pulsar con el botón derecho seleccione el Item sobre el que está el cursor del ratón
Publicado: Mar Abr 20, 2021 2:38 pm
por ignacio
Código: Seleccionar todo
METHOD Listbox1ContextMenu( oSender, nPosX, nPosY ) CLASS TForm1
LOCAL nItem
WITH OBJECT oSender
nItem := :ItemFromPoint( nPosX, nPosY )
if nItem >= 0
:nIndex := nItem + 1
ENDIF
END WITH
RETURN Nil
Re: En un TListBox al pulsar con el botón derecho seleccione el Item sobre el que está el cursor del ratón
Publicado: Mar Abr 20, 2021 4:15 pm
por josemanuel
Funciona perfectamente
Muchas Gracias