dsd1-10 / dsd-08=skill / pivo
.docload("two_1.il")
; pivka bi sha.... !!!
hiDeleteBannerMenu(hiGetCIWindow() 0)
g = "cadense"
Menu1 = hiCreateMenuItem(?name 'Menu1 ?itemText "kruzhka 1"
?callback "println(g)")
Menu2 = hiCreateMenuItem(?name 'Menu2 ?itemText "kruzhka 2"
?callback "println(2)")
Menu31 = hiCreateMenuItem(?name 'Menu31 ?itemText "kill 1"
?callback "println(31)")
form = "not form"
Field1 = hiCreateListField(?name 'Field1 ?prompt "Day mne list !!")
hiCreateAppForm(?name 'Form1
?fields '(Field1)
?callback "pingvin(Field1->value)"
?formTitle "Hy !!!"
)
Menu32 = hiCreateMenuItem(?name 'Menu32 ?itemText "lisiy 2"
?callback "hiDisplayForm('Form1)")
hiCreatePulldownMenu('pullMenu2 "Nuh champion" '(Menu31 Menu32))
SlideMenu = hiCreateSliderMenuItem(?name 'SlideMenu ?itemText "Nuh champion" ?subMenu pullMenu2)
hiCreatePulldownMenu('pullMenu "Pivo" '(Menu1 Menu2 SlideMenu))
hiInsertBannerMenu(hiGetCIWindow() 'pullMenu 0)