Главная страница
    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.043 c
2-1190137123
hgd
2007-09-18 21:38
2007.10.14
Новая таблица в БД


1-1185960673
monkeyboy
2007-08-01 13:31
2007.10.14
Emuneration для индексов массива в Delphi: перевод на С++


15-1190112142
NOWICHOK
2007-09-18 14:42
2007.10.14
задачи на С++


15-1189762734
vladislavmsk
2007-09-14 13:38
2007.10.14
Специальный TGroupBox


15-1190031053
boa_kaa
2007-09-17 16:10
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский