VLWeb, Keyboard Tab Through list column

This Q&A forum allows users to post and respond to "How Do I Do ....." questions. Please do not use to report (suspected) errors - you must use your regional help desk for this. The information contained in this forum has not been validated by LANSA and, as such, LANSA cannot guarantee the accuracy of the information.
Post Reply
mark.civ
Posts: 8
Joined: Wed Jan 27, 2021 11:34 pm

VLWeb, Keyboard Tab Through list column

Post 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.
Top
Post Reply

Return to “Questions & Answers”