Як користуватися групою компонентів raidobutton (radiogroup) в delphi?
RadioGroup (Delphi)
Ні для кого не секрет, що об'єктно-орієнтована мова програмування Delphi використовує досить таки широкий набір компонентів. Одним з них є RadioGroup, який буває таки часто використовується в певних видах програм. І ось виникає, як же користуватися даними компонентом і вникнути в його особливість?
Інструкція
1 крок
Для початку необхідно зрозуміти, що RadioGroup - це компонент, який об'єднує (группирующий) схожих за змістом компонентів Delphi. У даному компоненті є така властивість, як ItemIndex, яке вказує на те, яка ж кнопка знаходиться у включеному стані в даний момент, за замовчуванням ця властивість одно = -1. Задається питання чому саме -1? Відповідь проста, нумерація кнопок починає свій початок з 0, а значить якщо кнопка вимкнена, то дане значення дорівнює -1!
2 крок
Розмістіть компоненти приблизно таким чином
Тепер перейдемо до практики. Створіть нову форму у вашій програмі Delphi і скиньте на неї наступні 4 компоненти, які знаходяться у вкладці Standard: RadioGroup, Button, Lable і Edit.
Розташуйте їх приблизно так як показано на скріншоті.
3 крок
Робоче вікно
Потім змініть властивості caption у 'button'a на "Натиснути", у' label'a на "Номер" і у 'edit'a змініть властивість text, також на "Номер". Увійдіть у властивість items у radiogroup і впишіть туди кілька рядків, наприклад:
Футбол
Великий теніс
Хокей
Бейсбол
Дзюдо
4 крок
Створіть обработчкі onclick для RadioGroup і впишіть туди наступний код:
begin
Label1.Caption: = IntToStr (RadioGroup1.ItemIndex) -
end;
Тут властивість ItemIndex у RadioGroup показує яка кнопка зараз включена і виводить відповідь у Label.
5 крок
Створіть обработчкі onclick для КНОК і впишіть туди наступне:
begin
Edit1.Text: = IntToStr (RadioGroup1.ItemIndex) -
end;
Тут відбувається те ж саме, що і в попередньому кроці, але на цей раз відповідь виводиться в Edit, при натисканні на кнопку.
6 крок
Ось так ось буде виглядати робоче вікно даної невеликої програми
Запустіть вашу програму (яку ви можете запустити за допомогою клавіші F9, або за допомогою невеликої зелененький стрілочки вгорі програми Delphi) і починайте перевіряти її работоспособоность! Дані кроки допоможуть вам закласти початкову базу про даний компоненті і дадуть зрозуміти, що компонент RadioGroup є дуже корисним в деяких видах програм.