Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Разные действия для одной кнопки. [D7, XP]


EZHIK ©   (2006-05-14 02:46:00) 

Как сделать так, что бы какое-то определенное действие выполнялось по-разному в зависимости от выбранного параметра? например, если выбран один радиобаттон, то это выполняет один набор действий, а при нажатии на кнопку 1 - выполняется действие 1, а если выбран другой радиобаттон, то выполняется другой набор действий, а при нажатии на кнопку 1 - действие 2? Если можно, то с примером, пожалуйста, а то у меня что-то не выходит... :(


EZHIK   (2006-05-14 14:38:00) [1]


> Еще есть case ...


Спасибо за совет!


Kolan   (2006-05-14 14:08:00) [2]

Еще есть caseэто если параметр может принимать более 2х значений.
case Param of
 1: DoFirstOperation;
 2: DoSecondOperation;
 ...
end;

итд...


EZHIK   (2006-05-14 03:23:00) [3]

if RadioButton1.Checked then
DoSomething
else
if RadioButton2.Checked then
DoAnotherThing

и так далее.


А вот это мысль, СПАСИБО!!! Громоздко у меня получится, но думаю сойдет!!! По истине - все гениальное просто!!!


EZHIK   (2006-05-14 03:19:00) [4]

Я пытался сделать это через if и then, а дальше программа или серия действий, но появляется тьма ошибок... Так же пробовал "засунуть" от procedure...
begin до end действия между begin и end нужного переключателя, но та же картина...
Может есть другой способ?


Джо   (2006-05-14 03:17:00) [5]

> EZHIK   (14.05.06 02:46)

if RadioButton1.Checked then
 DoSomething
else
if RadioButton2.Checked then
 DoAnotherThing

и так далее.

Когда такой вариант начнет неустраивать, появятся другие вопросы, наверное.


Германн   (2006-05-14 03:05:00) [6]


> Если можно, то с примером, пожалуйста, а то у меня что-то
> не выходит... :(
>

Что именно "не выходит"?


Наверх

Титульная страница Поиск, карта сайта Написать письмо