Интересная задачка.

[Inbox]

У продавца имеется около 5ти марок отечественных сигарет- Ява, Пегас, Прима и тд.
И около 10ти марок импортных-Winston, Kent,Salem и т.д.
За один раз продавец может продать не более двух пачек сигарет в одни руки. Если покупатель берет отечественую пачку сигарет, то ему полагается зажигалка в подарок, в противном случае НЕТ.
И так если покупатель берет одну пачку отечеств, а вторую импортную то зажигалка есть, если две пачки импортных, то зажигалки нет, если две отечественных то Есть....
Теперь вопрос!
Имеется два комбо бокса в них (в Items) список сигарет.
И один TEdit.
Как сделать, если в двух комбобоксах мы выбрали марку сигарет, то в Edit отображается 'Зажигалка есть' или 'Зажигалки нет'
В зависимости какую марку мы выбрали.... Сам алгоритм посоветуйте плиз, а то чо то голова уже ломается.....

[Jeni]

Пожалуй зависит от того, как хранятся данные в списках. Я так понимаю, что в обоих списках находятся и отечественные и импортные сигареты. Можно конечно хранить вместе со строками и специальные "метки", например в свойстве Objects[], а можно, например, для отечественных ставить после названия марки пробел - его все-равно не будет видно, зато можно проверить наличие у строки пробела в конце и понять какая марка выбрана:
if (последний_символ_строки_списка1 = пробел) or (последний_символ_строки_списка2 = пробел) then Edit.Text = 'Получай зажигалку!' else Edit.Text = 'Получай ...что-то другое!'

Это конечно так, простейший вариант.

[Inbox]

Эту идею с пробелами я попробую. Спасибо.
Я хотел по индексу (if комбобокc.итем>6 then 'Зажигалки нет'
Но это как то не солидно

[Wolfheart]

"А ларчик просто открывался": в названиях отечественных марок - кириллица, в ином случае - латинница. Использование пробелов допустимо, но бессмысленно, по большому счёту.
Просто-напросто проверям вхождение кириллицы / латинницы в название.