Page 1 of 1

left click menu bar menu

Posted: Mon Apr 22, 2019 11:59 pm
by dhunt
When i click a menu bar, the more i click on it the smaller it gets. How can i prevent this?
Annotation 2019-04-22 085532.jpg
Annotation 2019-04-22 085532.jpg (14.43 KiB) Viewed 18500 times
Annotation 2019-04-22 085618.jpg
Annotation 2019-04-22 085618.jpg (8.08 KiB) Viewed 18500 times

Code: Select all

Define_Com Class(#PRIM_PPNL) Name(#PopupMenuBar) Height(30) Width(148) Layoutmanager(#Layout1) Closeonclick(True)

Define_Com Class(#PRIM_PPNL.MenuBar) Name(#MenuBar) Parent(#PopupMenuBar) Displayposition(1) Tabposition(1) Width(148)

Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem1) Parent(#MenuBar) Caption('Disable Popup') Displayposition(2) Tabposition(2) Width(148) Height(30) Left(1)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem2) Parent(#MenuBar) Caption('AR Status') Menupopup(#PopupMenu1) Displayposition(3) Tabposition(3) Width(148) Height(30) Left(1)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem3) Parent(#MenuBar) Caption('Other Lists') Menupopup(#PopupMenu2) Displayposition(4) Tabposition(4) Width(148) Height(30) Left(1)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem4) Parent(#MenuBar) Caption('Display All') Displayposition(5) Tabposition(5) Width(148) Height(30) Left(1)

Define_Com Class(#PRIM_PPNL.Menu) Name(#PopupMenu1) Left(-990) Top(-188) Height(100)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem5) Parent(#PopupMenu1) Caption('30 Days Past Due') Displayposition(1) Tabposition(1) Width(148)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem6) Parent(#PopupMenu1) Caption('60 Days Past Due') Displayposition(2) Tabposition(2) Width(148) Top(25)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem7) Parent(#PopupMenu1) Caption('90 Days Past Due') Displayposition(3) Tabposition(3) Width(148) Top(50)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem8) Parent(#PopupMenu1) Caption('120 Days Past Due') Displayposition(4) Tabposition(4) Width(148) Top(75)

Define_Com Class(#PRIM_PPNL.Menu) Name(#PopupMenu2) Left(-990) Top(-188) Height(25)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem9) Parent(#PopupMenu2) Caption('Show Jobs List') Displayposition(1) Tabposition(1) Width(148)

Re: left click menu bar menu

Posted: Tue Apr 23, 2019 2:46 am
by dhunt
if i remove the menu bar i have to click on each sub menu to show it and then looks blank if even though the data is there. i have tried to apply a themedrawstyle but it doesnt effect the submenu.
Annotation 2019-04-22 114053.jpg
Annotation 2019-04-22 114053.jpg (9.06 KiB) Viewed 18496 times
Annotation 2019-04-22 114154.jpg
Annotation 2019-04-22 114154.jpg (11.4 KiB) Viewed 18496 times

Code: Select all

Define_Com Class(#PRIM_TBLO) Name(#Layout1)
Define_Com Class(#PRIM_TBLO.Row) Name(#Layout1Row1) Displayposition(1) Parent(#Layout1)
Define_Com Class(#PRIM_TBLO.Row) Name(#Layout1Row2) Displayposition(1) Parent(#Layout1)
Define_Com Class(#PRIM_TBLO.Row) Name(#Layout1Row3) Displayposition(1) Parent(#Layout1)
Define_Com Class(#PRIM_TBLO.Row) Name(#Layout1Row4) Displayposition(1) Parent(#Layout1)
Define_Com Class(#PRIM_TBLO.Column) Name(#Layout1Column1) Displayposition(1) Parent(#Layout1)
Define_Com Class(#PRIM_TBLO.Item) Name(#Layout1Item1) Column(#Layout1Column1) Manage(#MenuItem1) Parent(#Layout1) Row(#Layout1Row1)
Define_Com Class(#PRIM_TBLO.Item) Name(#Layout1Item2) Column(#Layout1Column1) Manage(#MenuItem2) Parent(#Layout1) Row(#Layout1Row2)
Define_Com Class(#PRIM_TBLO.Item) Name(#Layout1Item3) Column(#Layout1Column1) Manage(#MenuItem3) Parent(#Layout1) Row(#Layout1Row3)
Define_Com Class(#PRIM_TBLO.Item) Name(#Layout1Item4) Column(#Layout1Column1) Manage(#MenuItem4) Parent(#Layout1) Row(#Layout1Row4)

Define_Com Class(#PRIM_PPNL) Name(#PopupMenuBar) Height(100) Width(148) Closeonclick(True) Layoutmanager(#Layout1)

Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem1) Parent(#PopupMenuBar) Caption('Disable Popup') Displayposition(1) Tabposition(1) Width(148)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem2) Parent(#PopupMenuBar) Caption('AR Status') Menupopup(#PopupMenu1) Displayposition(2) Tabposition(2) Width(148)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem3) Parent(#PopupMenuBar) Caption('Other Lists') Menupopup(#PopupMenu2) Displayposition(3) Tabposition(3) Width(148)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem4) Parent(#PopupMenuBar) Caption('Display All') Displayposition(4) Tabposition(4) Width(148) Height(30)

Define_Com Class(#PRIM_PPNL.Menu) Name(#PopupMenu1) Height(100) Themedrawstyle('Menu') Left(-1231) Top(-373)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem5) Parent(#PopupMenu1) Caption('30 Days Past Due') Displayposition(1) Tabposition(1) Width(148)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem6) Parent(#PopupMenu1) Caption('60 Days Past Due') Displayposition(2) Tabposition(2) Width(148) Top(25)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem7) Parent(#PopupMenu1) Caption('90 Days Past Due') Displayposition(3) Tabposition(3) Width(148) Top(50)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem8) Parent(#PopupMenu1) Caption('120 Days Past Due') Displayposition(4) Tabposition(4) Width(148) Top(75)

Define_Com Class(#PRIM_PPNL.Menu) Name(#PopupMenu2) Height(25) Themedrawstyle('Menu') Left(-1231) Top(-373)
Define_Com Class(#PRIM_PPNL.MenuItem) Name(#MenuItem9) Parent(#PopupMenu2) Caption('Show Jobs List') Displayposition(1) Tabposition(1) Width(148)

Re: left click menu bar menu

Posted: Tue Apr 23, 2019 11:40 pm
by jyoung
You may want to contact support with this.
The MenuBar Popup is doing the same thing to me, and the doc sample does it too.
https://docs.lansa.com/14/en/lansa016/p ... enubar.htm

Have not been able to find a way to stop or correct it.
Capture.PNG
Capture.PNG (4.09 KiB) Viewed 18476 times
Joe