
22.06.2013, 15:01
|
 |
Специалист
|
|
Регистрация: 07.09.2007
Адрес: Украина, г. Днепропетровск
Сообщения: 892
Версия Delphi: 7 + ОгнеПтица
Репутация: выкл
|
|
Код:
if ((Edit1.Text = '0')and (Edit2.Text = '1') //если х1=0 и х2=0
or //или
(Edit1.Text = '1')and (Edit2.Text = '0') //если х1=1 и х2=0
or //или
(Edit1.Text = '1')and (Edit2.Text = '1')) //если х1=1 и х2=1
__________________
Поживу - увижу, Доживу - узнаю, Выживу - учту. 
[P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
|