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

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

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 21.04.2011, 00:25   #1
AndrYxo
Пользователь
 
Регистрация: 04.04.2008
Сообщений: 15
Вопрос Совместное появление событий

Здравствуйте. Хочу задать простой вопрос, ответ на который просто вылетел из моей головы.

Есть Событие1, Событие2 и Событие3.

Событие3 наступает при совместном наступлении событий 1 и 2 (при чем без разницы, какое из событий наступило раньше). Как это реализовать можно?

Просто помню, если событие Событие3 наступает при определенной череде событий 1 и 2, то будет как-то так

if Событие1 then if Событие2 then Событие3 - а как при совместном напрочь забыл.

Спасибо!
AndrYxo вне форума Ответить с цитированием
Старый 21.04.2011, 08:19   #2
Denager
Москоу
Форумчанин
 
Регистрация: 29.01.2008
Сообщений: 138
По умолчанию

if ((событие1) and (событие2)) tnen событие3
Denager вне форума Ответить с цитированием
Старый 21.04.2011, 12:47   #3
veniside
Старожил
 
Регистрация: 03.01.2011
Сообщений: 2,508
По умолчанию

Цитата:
if Событие1 then if Событие2 then Событие3 - а как при совместном напрочь забыл.
каша в голове. Приведенный код, как и код от Denager, работает одинаково: Событие3 происходит, если оба события 1 и 2 уже наступили (это больше всего подходит под ваше смутное определение "совместно").

Если нужно выполнить Событие3 при наступлении ЛЮБОГО из событий 1 или 2, то это OR:

Код:
if (Event1 or Event2) then Event3;
"Когда приходит положенное время, человек перестаёт играть в пинбол. Только и всего."
veniside вне форума Ответить с цитированием
Старый 24.04.2011, 11:06   #4
AndrYxo
Пользователь
 
Регистрация: 04.04.2008
Сообщений: 15
По умолчанию

Denager, veniside - большое спасибо)
AndrYxo вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
появление формы quarty Общие вопросы Delphi 6 20.01.2011 22:42
Совместное использование БД в mysql GreenShuller БД в Delphi 7 28.06.2010 10:54
Совместное написание игры. Casper-SC Свободное общение 20 14.06.2010 21:16
Совместное обучение с++ JOFRIF Свободное общение 0 24.05.2010 03:16
Совместное использование базой данных zenner Microsoft Office Access 9 01.03.2010 15:11