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

Вниз

Подстановка в 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 должна происходить.


 
Sandman25   (2003-09-17 13:20) [9]

>Когда я прописиваю ету строку, то при виборе значения из випадающего списка строка 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 но его не видно. Потому что поверх него находится строка из списка которую никак нельзя убрать.


 
dataMaster   (2003-09-19 09:08) [12]

Вот как надо было сделать:

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;



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

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

Наверх





Память: 0.47 MB
Время: 0.499 c
14-4077
Layner
2003-09-15 10:52
2003.10.02
Посоветуйте карту(можно вирт.) для оплаты в инете. По миним.


4-4161
SergeySEM
2003-07-29 12:58
2003.10.02
Всем профи про EM_EXLIMITTEXT


3-3799
mfender
2003-09-11 01:10
2003.10.02
Как dataset сделать активным?


1-3822
ДмитрийК
2003-09-19 09:12
2003.10.02
Сохранение ширины столбцов в DBGrid-е


1-3957
Virus.ex
2003-09-20 13:46
2003.10.02
обработчики.......





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