-- JochenGeorges - 18 Dec 2004

Как организовать группы переключателей (radiobuttons)

Radiobuttons (переключатели) могут быть организованы в независимые группы.
Каждый переключатель может получить групповое свойство (group-property), которое может быть
установлено в редакторе свойств (property-editor).
Помните: В группе переключателя может задаваться только одна кнопка!

Программа

Если радио-кнопка задана, сообщение показывает, какая именно.

constructor _new() задает две радио-кнопки при запуске.
Не смущайтесь именем и текстом радио-кнопки!
Есть только одна, названная radiobutton1, но две с этим текстом!

Две группы названы Radio1 и Radio2.
Эти группы получают собственные методы, похожие на метод click(),
так что вы не должны поддерживать 8 единичных радио-кнопок, а только две группы!
message.png radiobuttongroup.png

Код:

STATIC PUBLIC SUB Main()
DIM hForm AS Form
hForm = NEW FTest
hForm.Show
END

PUBLIC SUB _new()
Radiobutton1.Value = TRUE
Radiobutton8.Value = TRUE
END

PUBLIC SUB Radio1_Click()
Message.Info("Radio 1 : " & LAST.Text)
'LAST returns a reference to the last
'object that raised an event
'see gambas-language-encyclopaedia
END

PUBLIC SUB Radio2_Click()
Message.Info("Radio2 : " & LAST.Text)
END


Attachment: Action: Size: Date: Who: Comment:
message.png action 3174 18 Dec 2004 - 13:27 JochenGeorges  
radiobuttongroup.png action 4763 18 Dec 2004 - 13:28 JochenGeorges  
src-radiobuttongroup.tgz action 2130 18 Dec 2004 - 13:28 JochenGeorges