Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.10.14;
Скачать: [xml.tar.bz2];

Вниз

Как поймат событие после изменения Text у DBLookUpComboBox?   Найти похожие ветки 

 
Kolan ©   (2007-09-20 13:20) [0]

Здравствуйте,
 Сабж.

Пробовал AfterScroll запроса, но при его срабатывании Text у связанного с ним DBLookUpComboBox Text еще старый&#133


 
Вася Правильный   (2007-09-20 13:31) [1]

а для чего это?


 
Kolan ©   (2007-09-20 13:33) [2]

> [1] Вася Правильный   (20.09.07 13:31)
> а для чего это?

Надо проверить на пустоту. Мне любой вариант подойдет&#133 Задача — проверить, что что-то выбрали из ComboBox"а.


 
Ega23 ©   (2007-09-20 13:34) [3]

у DBLookupCombo нет текста. Он всего лишь отражает положение дел в НД, с которым связан.
Пользуй TDataSource.OnDataChange


 
Kolan ©   (2007-09-20 13:39) [4]

> TDataSource.OnDataChange

Что мне там проверять? Я просто наверно незнаю&#133


 
Ega23 ©   (2007-09-20 13:40) [5]


> Что мне там проверять? Я просто наверно незнаю…


Погодь, я тебя не понял.
Твоя задача?


 
Kolan ©   (2007-09-20 13:44) [6]

> [5] Ega23 ©   (20.09.07 13:40)
>
> > Что мне там проверять? Я просто наверно незнаю…
>
>
> Погодь, я тебя не понял.
> Твоя задача?

Открывается форма, пользователь видит пустой DBLookUpBox, кнопка недоступна.
Пользователь вибирает строку — кнопка становится доступной.


 
Ega23 ©   (2007-09-20 13:49) [7]

А как это он его пустой видит? У тебя в НД есть пустая строка?


 
Kolan ©   (2007-09-20 13:55) [8]

> У тебя в НД есть пустая строка?

KeyValue := —1;


 
Kolan ©   (2007-09-20 13:56) [9]

> У тебя в НД есть пустая строка?

KeyValue := —1;

Так и должно быть. При открытии формы он должен быть пустым.


 
Ega23 ©   (2007-09-20 14:02) [10]

Ну коли так, то ничего другого, кроме как использовать OnDropDown в паре с OnCloseUp у меня нет...


 
Kolan ©   (2007-09-20 14:06) [11]

> Ну коли так, то ничего другого, кроме как использовать OnDropDown
> в паре с OnCloseUp у меня нет&#133

Так работает, а что делать если мышкой выбирали, и список не выподал?


 
Ega23 ©   (2007-09-20 14:11) [12]


> Так работает, а что делать если мышкой выбирали, и список
> не выподал?


TDataSet.OnDataChange
Но тут придётся идеологию менять. А точнее - добавлять в НД запись с KeyField=-1 и ListField="". И позиционироваться уже на неё. А потом перемещение курсора отслеживать.


 
Kolan ©   (2007-09-20 14:20) [13]

> Но тут придётся идеологию менять.

О проверка:
if MedicalSpecialityDBLookupComboBox.KeyValue = —1 then
работает как надо — нормально?


 
Ega23 ©   (2007-09-20 14:31) [14]


> О проверка:
> if MedicalSpecialityDBLookupComboBox.KeyValue = —1 then
> работает как надо — нормально?
>


Ну если работает - то всё замечательно.


 
Kolan ©   (2007-09-20 14:32) [15]

Благодарю.


 
Ega23 ©   (2007-09-20 14:54) [16]

СТОЙ!!!!!

> TDataSet.OnDataChange


TDataSource.OndataChange


 
Kolan ©   (2007-09-20 15:01) [17]

> СТОЙ!!!!!

Вот честно, хоть это интернет, и я просто читаю&#133 но, я перепугался.

TDataSource.OndataChange
Я понял что это и имелось ввиду&#133



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.10.14;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.48 MB
Время: 0.046 c
2-1190037815
F@T@L_Err0r
2007-09-17 18:03
2007.10.14
Регулятор громкости


2-1188218496
Riply
2007-08-27 16:41
2007.10.14
Объявление "лишних" переменных в процедуре.


15-1189788494
Nic
2007-09-14 20:48
2007.10.14
Дизайн сайта


4-1176093941
VladSel
2007-04-09 08:45
2007.10.14
Delphi ,сотовый телефон и AT команды


3-1181203109
Sergey13
2007-06-07 11:58
2007.10.14
Что будет при нехватке места в БД





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский