Page 1 of 1

VLWeb, Keyboard Tab Through list column

Posted: Mon Nov 28, 2022 10:26 pm
by mark.civ
Hi,

What I am trying to achieve is to create a grid with a column that holds a menu icon that will fire a popup menu, where the icon for each row will be included in the tab order for the page.

Creating the list and adding the icon where the click event on the column fires the menu is simple.

Code: Select all

Define_Com Class(#PRIM_LIST) Name(#List) Columnlines(False) Displayposition(1) Tabposition(1) Top(114) Parent(#ContentPanel) Rowheight(36) Columnheaderheight(36) Alternateitemthemedrawstyle('AlternateItem') Rowsperpage(15) Height(330) Width(538)
Define_Com Class(#PRIM_LIST.Icon) Name(#ListColumn1) Columnwidth(60) Displayposition(2) Parent(#List) Columncaptiontype(Caption) Columncaption('Actions') Icon('more_vert')
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#PMBEdit) Caption('Edit') Displayposition(2) Tabposition(2) Width(123) Height(20) Top(20) Parent(#PopupMenuBar)
Define_Com Class(#PRIM_PPNL.Menu) Name(#PopupMenuBar) Height(62) Width(125) Left(533) Top(66)

Evtroutine Handling(#ListColumn1.Click)
#PopupMenuBar.ShowPopup
Endroutine

Evtroutine Handling(#POPUPMENUBAR.Click) Com_Sender(#MenuItem)
Endroutine
The question is, how do I add the '#ListColumn1' to the keyboard tab order so that I can include it within the keyboard navigation as well as by mouse navigation? Thanks.