Как сделать меню

Чтбы сделать меню вы можете использовать редактор меню.
Для того,чтобы открыть его, только щелкните правой клавишей мышки в вашей Form.

open-menu-editor.pngmenu-editor.png

Программа

При старте "дерево" команд меню не доступно.
Но вы можете активизировать его, используя команду "enableTree"

Код:

' Gambas class file


PUBLIC SUB Ford_Click()
TextLabel1.Text = "Ford"
END

PUBLIC SUB Audi_Click()
TextLabel1.Text = "Audi"
END

PUBLIC SUB Flowers_Click()
TextLabel1.Text = "Flowers"
END

PUBLIC SUB enableTrees_Click()
JoTrees.enabled = TRUE
TextLabel1.Text = "Now you can use Trees!"
END

PUBLIC SUB Trees_Click()
TextLabel1.Text = "Trees"
END

-- JochenGeorges - 28 Dec 2004


Attachment: Action: Size: Date: Who: Comment:
src-MyMenu.tgz action 1586 28 Dec 2004 - 08:11 JochenGeorges