Code: Select all
animals := ["elephant", "horse", "whale"]
favanimal := "elephant"
content :=
(
"I'd love to have a safari trip.
My most favorite animal is " favanimal
)
myGui := Gui()
myGui.AddText("w300", "Select animal:")
ddlanimal := myGui.AddDropDownList("w300 Choose1", animals)
myGui.AddText("w300", "Preview:")
preview := myGui.AddEdit("w300 R5", content)
ddlanimal.OnEvent("Change", selection)
selection(*) {
favanimal := ddlanimal.Text
}
SubmitBtn(*) {
ExitApp
}
myGui.AddButton("Default wp y+10", "Submit")
.OnEvent("Click", SubmitBtn)
myGui.Show()