Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.03.2013, 20:06   #1
Kvizl
 
Аватар для Kvizl
 
Регистрация: 27.03.2013
Сообщений: 9
По умолчанию Не могу разобратся с RadioGroup в Delphi

В программе использую 3 RadioGroup. В них 2, 3 и 6 позиций(Всего 36 комбинаций). Для каждой комбинации нужно прописать свою процедуру, но у меня не віходит их связать между собой.
Код:
1procedure TForm1.BitBtn1Click(Sender: TObject);
2begin
3   if RadioGroup1.ItemIndex=0 and RadioGroup2.ItemIndex=0 and RadioGroup3.ItemIndex=0 then
4      begin
5         ZvenoElerStypen
6      end;
ZvenoElerStypen - название процедуры для этой комбинации позиций в RadioGroup-ах, которая описана выше и к проблене отношения не имеет, но при попытке скомпилировать программу выбивает ошибку:
[Error] Unit1.pas(3): Incompatible types
К чему там неподхлдящий тип понятия не имею. вроде бы как переменных и нету.
Kvizl вне форума Ответить с цитированием
Старый 27.03.2013, 20:29   #2
BDA
МегаМодератор
СуперМодератор
 
Аватар для BDA
 
Регистрация: 09.11.2010
Сообщений: 7,430
По умолчанию

Пример во вложении.
Вложения
Тип файла: rar Процедуры по комбинации в радиогруппах.rar (326.8 Кб, 28 просмотров)
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
BDA вне форума Ответить с цитированием
Старый 27.03.2013, 21:44   #3
Kvizl
 
Аватар для Kvizl
 
Регистрация: 27.03.2013
Сообщений: 9
По умолчанию

Благодарю за такой хороший пример. Очень помог.
Kvizl вне форума Ответить с цитированием
Старый 27.03.2013, 21:47   #4
phomm
personality
Старожил
 
Аватар для phomm
 
Регистрация: 28.04.2009
Сообщений: 2,899
По умолчанию

Тип несовместимый из-за неверного по паскалевому синтаксису (а точнее даже приоритету операций) совмещению логических условий.
Код:
if RadioGroup1.ItemIndex=0 and RadioGroup2.ItemIndex=0 and RadioGroup3.ItemIndex=0
a надо
Код:
if (RadioGroup1.ItemIndex=0) and (RadioGroup2.ItemIndex=0) and (RadioGroup3.ItemIndex=0)
Скобки укажут правильный приоритет вычисления логического выражения.
phomm вне форума Ответить с цитированием
Старый 28.03.2013, 08:00   #5
Kvizl
 
Аватар для Kvizl
 
Регистрация: 27.03.2013
Сообщений: 9
По умолчанию

Благодарю. Заработало
Kvizl вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Не могу разобратся!!! Hooligan Общие вопросы C/C++ 1 11.03.2012 13:30
Не могу разобратся в Dle L'oneke Свободное общение 2 27.08.2011 15:36
Не могу разобратся с датами MrBobyara SQL, базы данных 9 14.04.2011 17:20
не могу разобратся с TreeView L11L Помощь студентам 5 29.04.2010 11:20
Не могу разобратся с постусловием ArteMAN Паскаль, Turbo Pascal, PascalABC.NET 8 23.04.2010 23:28