Подстановка в Combobox

← →
Berezne (2003-09-17 11:28) [0]

Есть в файле БД два поля: FIO и ZAG.
Есть програмно заполнений список Combobox данними из поля ZAG.
Там в одной строке указано: ФИО Адрес №заказа.
Нужно следующее: при виборе из списка нужного ФИО с нужним адресом и № заказа после клика на нем и поиска нужной записи в файле БД програма автоматом подставляла данние из поля FIO. Тоесть в строке должна бить отображена только одна ФИО.
А делается все наоборот: отображается строка из випадающего списка.
Как мне сделать чтоби оно работало так ка мне надо.

Пример действий таков:

/Вибор нужного значений из випадающего списка Combobox

/Поиск нужной записи в файле БД

/Подстановка в сторку Combobox вместо строки из випадающего списка данний из поля FIO.
Combobox.text:=baza.Fieldbyname("FIO").asstring;

Вот после етого шага ничего не происходит. То что било в строке Combobox так и осталось.

Подскажите что я не так делаю или как ето сделать.

← →
Berezne (2003-09-17 11:48) [1]

Кто нибуть напишите чего нибуть!!!

← →
dataMaster © (2003-09-17 11:54) [2]

Так что ли?
ComboBox1.Items[ComboBox1.ItemIndex]:=baza.Fieldbyname("FIO").asstring;

← →
Sandman25 © (2003-09-17 11:54) [3]

У Combobox Style = csDropDownList?

← →
Berezne (2003-09-17 12:15) [4]

Как би ето обьяснить. После из випадающего списка (данние из поля ZAG) нужного мне значения и клика по нему в строке Combobox отображается значение из випадающего списка. А мне надо чтоби после клика и поиска нужной записи строка автоматически изменилась на данние которие находятся в поле FIO текущей записи.
Прописиваю строку изменения текста в строке Combobox: Combobox.text:=baza.Fieldbyname("FIO").asstring. И ничего. Все равно отображается вибранная строка из випадающего списка.

← →
Sandman25 © (2003-09-17 12:18) [5]

У Combobox Style = csDropDownList?

← →
Berezne (2003-09-17 12:21) [6]

Проще сказать текст в строке Combobox заменятся на другой текст

← →
dataMaster © (2003-09-17 12:22) [7]

>Berezne

Смотри пост [2]

← →
Berezne (2003-09-17 13:02) [8]

ComboBox1.Items[ComboBox1.ItemIndex]:=baza.Fieldbyname("FIO").asstring;

Чего то у меня не виходит.
Когда я прописиваю ету строку, то при виборе значения из випадающего списка строка Combobox становится пустая. И опять же програмно туда нельзя вставить никакой текст.

Если не трудно напишите как согласно етой строке кода ета вся заменя текста в строке Combobox должна происходить.

>Когда я прописиваю ету строку, то при виборе значения из випадающего списка строка Combobox становится пустая

Значит, baza.Fieldbyname("FIO").asstring = ""

← →
Berezne (2003-09-17 14:05) [10]

Прикол в том что поле FIO как раз то и не пустое.

← →
Berezne (2003-09-17 14:59) [11]

Я тут посмотрел. Оказивается вот ета строка кода Combobox.text:=baza.Fieldbyname("FIO").asstring делает свое дело. И текст из поля FIO печатается в Combobox но его не видно. Потому что поверх него находится строка из списка которую никак нельзя убрать.

Вот как надо было сделать:
procedure TForm1.ComboBox1Change(Sender: TObject); begin with ComboBox1 do begin Items[ItemIndex]:=baza.Fieldbyname("FIO").asstring; ItemIndex:=Items.IndexOf(baza.Fieldbyname("FIO").asstring); end; end;

Подстановка в Combobox Найти похожие ветки