| Newsgroups |
gmane.comp.windows.power-pro |
| Message-ID |
<[email protected]> |
Here is a simple script:
<<<<<<<<<<<<<<<Start of script>>>>>>>>>>>>>>>>>
static TB = cl.Create("TestBar", 1)
local Width = 100
setstring Quote "
TB.Insert(0)
TB.SetLabel(0, "*control combobox dropdown " ++ Quote ++ "first|second|third" ++ Quote)
TB.SetWidth(0, Width)
TB.SetId(0, "Combo")
cl.AddCtrlListItem("TestBar", 0, "forth", -1) //doesn't work
TB.AddCtrlListItem(0, "fifth") //doesn't work
cl.AddCtrlListItem("TestBar", 0, Quote ++ "sixth" ++ Quote, -1) //doesn't work
TB.AddCtrlListItem(0, Quote ++ "seventh" ++ Quote, -1) //doesn't work
cl.AddCtrlListItem("TestBar", 0, Quote ++ "eighth" ++ Quote) //doesn't work
TB.ClearCtrlList(0) //doesn't work
TB.Insert(0)
TB.SetLabel(0, "OK")
TB.SetWidth(0, Width)
TB.AddLeft(0, cb("@GetInfo"))
TB.SetProperties("Format=barsize position: leftcaption vertical")
*bar Show TestBar
quit
Function GetInfo
win.debug(TB.GetId("Combo"), ": ", TB.GetCtrlValue("Combo"))
TB.close
quit
<<<<<<<<<<<<<<<End of script>>>>>>>>>>>>>>>>>
Comments say that AddCtrlListItem and ClearCtrlList commands don't work.
I haven't tested all cl commands with *control buttons, but most of them work.
Is this a bug or I did something wrong?
Thanks