Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как узнать в TDBLookupComboBox выбранное значение? [D6]

Страницы: 1 2 >
Explorer © (2002-04-10 11:42:00)
Помогите "тёмному"!
Как узнать в TDBLookupComboBox выбранное значение?

Леха (2002-04-10 16:03:00) [1]
DBLookupComboBox1.Text; - поле отображения
DBLookupComboBox1.KeyValue; - ключевое поле

Lusha (2002-04-10 15:24:00) [2]
Как говорит Val...
Это просто праздник какой-то...

Explorer (2002-04-10 15:22:00) [3]
>fnatali

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

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

Anatoly Podgoretsky (2002-04-10 14:50:00) [4]
Explorer © (10.04.02 14:30)
Совсем, совсем не работает?
Тогда у тебя обработчик не вызывается.

Johnmen (2002-04-10 14:49:00) [5]
>fnatali © : Милая барышня, не ведите его в еще дальше в темную чащу !
Вы же понимаете, что case <тип string> of работать не будет !

Johnmen (2002-04-10 14:43:00) [6]
Да вы, батенька, просто очередной IronHawk !

fnatali (2002-04-10 14:41:00) [7]
Попробуй через case .. of, а не через if.

Explorer (2002-04-10 14:30:00) [8]
Вот с таким кодом, вообще не работает!
Названия полей проверил.

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:21:00) [9]
Explorer © (10.04.02 14:07)
Код покажи

Explorer (2002-04-10 14:07:00) [10]
>fnatali
работает, но почему-то только с одной записью.
Если выбрал "Салют",то в Едите он отображается постоянно.
Не смотря на то, что когда я выбираю другие записи (а для них прописаны совсем другие значения для отображения в Едите)!

Johnmen (2002-04-10 13:32:00) [11]
Сначала надо определиться, что же на самом деле :
TDBLookupComboBox или TDBComboBox ?

Lusha (2002-04-10 13:25:00) [12]
И убедитесь, пожалуйста, в том, что многострадальное слово "Салют" занесено в таблицу именно как "Салют" и никак иначе... :)

Johnmen (2002-04-10 13:24:00) [13]
Виноват - это из другой оперы и не совсем так... :(

fnatali (2002-04-10 13:22:00) [14]
Смотри PoweR (10.04.02 11:49)
procedure TForm1.DBLookupComboBox1CloseUp(...)
if DBLookupComboBox1.keyvalue="САЛЮТ" then
EditSum1.Text:="Привет";

end;

Johnmen (2002-04-10 13:19:00) [15]
if (DBComboBoxAccount.LookupDisplay="Салют")
then begin
EditSum1.Text:="Привет";
end;

Explorer (2002-04-10 13:05:00) [16]
>Lusha
:)))
Я хочу, чтобы пользователь значение из списка выбрал, а ему(user"у), в зависимости от выбранного значения, в Edit разные словечки выводились.Но почему-то не выводяться!

Lusha (2002-04-10 12:50:00) [17]
Да-а-а? А у меня работает. Может Вы от него (от кода) чего то не того ожидаете? :)

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

Explorer (2002-04-10 12:38:00) [18]
>Lusha

не работает

Lusha (2002-04-10 12:21:00) [19]
if (DBComboBoxAccount.ListSource.DataSet.FieldByName(DBComboBoxAccount.ListField).AsString="Салют")
then begin
EditSum1.Text:="Привет";
end;

Explorer (2002-04-10 12:14:00) [20]
Text срабатывает почему-то только на пустую строку.
А когда выбираю конкретное значение, то цикл:

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

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

Страницы: 1 2 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »