|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Нужна помощь с запретом использования кнопки
В прикрепленной картинке красным обведено поле "заказано" возможно как-то написать код что-бы если в поле стоит "Да" то кнопка "Изменить" была заблокирована???
|
#2
|
|||
|
|||
Ну, типа:
Код:
Button1.Enabled := Query1.FieldByName('Zakazano').AsString = 'Нет'; |
Этот пользователь сказал Спасибо lmikle за это полезное сообщение: | ||
Ekler1 (28.11.2017)
|
#3
|
|||
|
|||
Спасибо
Цитата:
Спасибо! А событие в итоге оказалось OnDataChange))) OnBrowse - Вообще такого не нашел( |
#4
|
|||
|
|||
Ну я ж говорю - не помню точно как называется.
Главное, что нашел |
#5
|
|||
|
|||
Цитата:
Код:
Button1.Enabled := Query1.FieldByName('Zakazano').AsString = 'Нет'; Код:
Button1.Enabled := Query1.FieldByName('Zakazano').AsString = 'Нет'; Button1.Enabled := Query1.FieldByName('Zakazano').AsString = ''; |
#6
|
|||
|
|||
В таком варианте у тебя второе условие перетирает первое. Надо объединить в одно условие. Ну еще до кучи сделал case insensitive...
Код:
Button1.Enabled := (AnsUpperCase( Query1.FieldByName('Zakazano').AsString) = 'НЕТ') Or (Query1.FieldByName('Zakazano').AsString = ''); |
#7
|
|||
|
|||
Цитата:
Я так понимаю ansiuppercase - вот так должно быть? Последний раз редактировалось Ekler1, 30.11.2017 в 19:36. |
#8
|
|||
|
|||
Ага, i пропустил...
|
Этот пользователь сказал Спасибо lmikle за это полезное сообщение: | ||
Ekler1 (01.12.2017)
|