Add a Child Menu to an aItems{x] object
Publicado: Dom Jul 29, 2012 7:58 am
Hello to Team
How we can add a child menu to a aItems[x] object at runtime?
i try this, with no success
WITH OBJECT ::oPM1:aItems[10]:AddMenu()
:additem("Απλά ΑΠΑΞ",,1,,,,,, {|o|o:Cargo=101,:nJob:= 101,MsgInfo(STR(o:Cargo,,,TRUE)),::Choose(o)})
:additem("Ελεγχόμενα ΑΠΑΞ",,1,,,,,, {|o|o:Cargo=102,:nJob:= 102,MsgInfo(STR(o:Cargo,,,TRUE)),::Choose(o)})
END WITH
T.I.A
How we can add a child menu to a aItems[x] object at runtime?
i try this, with no success
WITH OBJECT ::oPM1:aItems[10]:AddMenu()
:additem("Απλά ΑΠΑΞ",,1,,,,,, {|o|o:Cargo=101,:nJob:= 101,MsgInfo(STR(o:Cargo,,,TRUE)),::Choose(o)})
:additem("Ελεγχόμενα ΑΠΑΞ",,1,,,,,, {|o|o:Cargo=102,:nJob:= 102,MsgInfo(STR(o:Cargo,,,TRUE)),::Choose(o)})
END WITH
T.I.A