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

Вниз

Как узнать в TDBLookupComboBox выбранное значение?   Найти похожие ветки 

 
Explorer   (2002-04-10 11:42) [0]

Помогите "тёмному"!
Как узнать в TDBLookupComboBox выбранное значение?


 
Val   (2002-04-10 11:47) [1]

.Text?


 
PoweR   (2002-04-10 11:49) [2]

TDBLookupComboBox.KeyValue


 
Explorer   (2002-04-10 11:58) [3]

не хочет работать.
Text не катит, т.к. я значение в цикле использую.
А в TDBLookupComboBox значения из БД беру.
Может подскажите, как номер строки в определить в TDBLookupComboBox?
Есть ещё все варианты, мастаки? Позарез надо!


 
Val   (2002-04-10 12:04) [4]

задача неясна :(


 
Explorer   (2002-04-10 12:14) [5]

Text срабатывает почему-то только на пустую строку.
А когда выбираю конкретное значение, то цикл:

if (DBComboBoxAccount.Text="Салют")
then begin
EditSum1.Text:="Привет";
end;

не срабатывает! В чем может быть причина?


 
Lusha   (2002-04-10 12:21) [6]

if (DBComboBoxAccount.ListSource.DataSet.FieldByName(DBComboBoxAccount.ListField).AsString="Салют")
then begin
EditSum1.Text:="Привет";
end;


 
Explorer   (2002-04-10 12:38) [7]

>Lusha

не работает


 
Lusha   (2002-04-10 12:50) [8]

Да-а-а? А у меня работает. Может Вы от него (от кода) чего то не того ожидаете? :)

Если все еще хотите решить свою проблему попробуйте ясно и четко сформулировать вопрос...


 
Explorer   (2002-04-10 13:05) [9]

>Lusha
:)))
Я хочу, чтобы пользователь значение из списка выбрал, а ему(user"у), в зависимости от выбранного значения, в Edit разные словечки выводились.Но почему-то не выводяться!


 
Johnmen   (2002-04-10 13:19) [10]

if (DBComboBoxAccount.LookupDisplay="Салют")
then begin
EditSum1.Text:="Привет";
end;



 
fnatali   (2002-04-10 13:22) [11]

Смотри PoweR (10.04.02 11:49)
procedure TForm1.DBLookupComboBox1CloseUp(...)
if DBLookupComboBox1.keyvalue="САЛЮТ" then
EditSum1.Text:="Привет";


end;


 
Johnmen   (2002-04-10 13:24) [12]

Виноват - это из другой оперы и не совсем так... :(


 
Lusha   (2002-04-10 13:25) [13]

И убедитесь, пожалуйста, в том, что многострадальное слово "Салют" занесено в таблицу именно как "Салют" и никак иначе... :)


 
Johnmen   (2002-04-10 13:32) [14]

Сначала надо определиться, что же на самом деле :
TDBLookupComboBox или TDBComboBox ?


 
Explorer   (2002-04-10 14:07) [15]

>fnatali
работает, но почему-то только с одной записью.
Если выбрал "Салют",то в Едите он отображается постоянно.
Не смотря на то, что когда я выбираю другие записи (а для них прописаны совсем другие значения для отображения в Едите)!


 
fnatali   (2002-04-10 14:21) [16]

Explorer © (10.04.02 14:07)
Код покажи


 
Explorer   (2002-04-10 14:30) [17]

Вот с таким кодом, вообще не работает!
Названия полей проверил.


procedure TFormOrder.DBComboBoxAccountCloseUp(Sender: TObject);
begin

if (DBComboBoxAccount.KeyValue="Салют")
then begin
EditSum1.Text:="613";
end
else begin
if (DBComboBoxAccount.KeyValue="Мир")
then begin
EditSum1.Text:="603";
end
else begin
if (DBComboBoxAccount.KeyValue="Страна")
then begin
EditSum1.Enabled:=true;
EditSum1.Text:="701";

end;
end;





 
fnatali   (2002-04-10 14:41) [18]

Попробуй через case .. of, а не через if.


 
Johnmen   (2002-04-10 14:43) [19]

Да вы, батенька, просто очередной IronHawk !


 
Johnmen   (2002-04-10 14:49) [20]

>fnatali © : Милая барышня, не ведите его в еще дальше в темную чащу !
Вы же понимаете, что case <тип string> of работать не будет !


 
Anatoly Podgoretsky   (2002-04-10 14:50) [21]

Explorer © (10.04.02 14:30)
Совсем, совсем не работает?
Тогда у тебя обработчик не вызывается.


 
Explorer   (2002-04-10 15:22) [22]

>fnatali

Спасибочки!!!
Заработало, правда пришлось заменить .KeyValue на .Text

Всем очень признателен!


 
Lusha   (2002-04-10 15:24) [23]

Как говорит Val...
Это просто праздник какой-то...


 
Леха   (2002-04-10 16:03) [24]

DBLookupComboBox1.Text; - поле отображения
DBLookupComboBox1.KeyValue; - ключевое поле



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

Форум: "Базы";
Текущий архив: 2002.05.02;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.49 MB
Время: 0.004 c
3-2444
vitnt2000
2002-04-10 14:26
2002.05.02
Подключение к InterBase без драйверов


1-2538
LazorenkoX
2002-04-18 10:21
2002.05.02
Рисование в консоли


7-2708
Mainstream
2002-02-05 13:52
2002.05.02
Properites


14-2665
VN1
2002-03-27 00:46
2002.05.02
Кто-нибудь пользовался абонетским ящиком?


6-2629
handra
2002-02-18 11:13
2002.05.02
DayTime-сервисы





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский