Выпадающее меню

[Pitbull]

DBComboBox1 используется для ввода в предварительно указанное поле значения из свойства Items.
предварительно занеси туда значения нужного поля: DBComboBox1.Items.add('значение');

А потом уже при запуске ты сможешь выбирать внесенные значения

[ACE Valery]

Вот так я выводила поле FIO таблицы Table1, только в ComboBox. dm - это DataModule, в котором и расположен компонент Table1. Отображаются все записи поля таблицы.

ComboBox1.Clear;
dm.table1.First;
while not dm.table1.Eof do
begin
ComboBox1.Items.Append(dm.table1fio .Value);
dm.table1.Next;
end;
ComboBox1.Text:=ComboBox1.Items.Str ings[0];

[Pitbull]

Сообщение от Apollo_13

Ну НЕ выходит ничего... Может кто-то знает как сделать так что-бы в DBCombobox1 отображалось нужное поле (со всеми записями) из Table1?

Я тебе покажу на примере стандартной таблицы Country, которая есть в любой версии Делфи. Выше уже описывали, как проиндексирвоать таблицу, тоесть добавить индексы для полей... (правой кнопкой по таблице и AddFields). При нажатии на DBcomboBox происходит передача фокуса DBGrid, в результате чего автоматически выполняется команда table1.post...
В данном примере я хочу изменить значение поля Capital на любое значение из выпадающего списка (DBComboBox1.DataField := 'Capital')....
Ну, надеюсь все понятно написал.... Можно еще DBComboBox1.text сюда влепить... НО тут ты сам подумай... Просто зашел не на долго.... Успехов

rocedure TForm1.FormCreate(Sender: TObject);
begin

DBComboBox1.DataField := 'Capital'; // указываем столбец,который будем изменять

DBComboBox1 .DataSource :=DataSource1; // Привязка к таблице

Table1 .Edit;
Table1.First; // в начало таблицы
while Table1.Eof <> True do begin
DBComboBox1.Items.Add(Table1Name.As String ); // заносим в DBComboBox1 значения выпадающего списка

Table1.Next; // переход на следующую запись (обязательно... )
end;
end;

procedure TForm1.DBComboBox1Change(Sender: TObject);
begin
DBGrid1.SetFocus ; // передача фокуса DBGrid
end;

end.

[Pitbull]

Сообщение от CHERT

Вобщем, имеется некоторая база, которая находится в DBGrid'e. Там есть поле "STREET".
Необходимо: при выборе этого поля у любой записи, рядом с названием улицы, появляется кнопочка для выпадающего меню со списком всех улиц в базе. То есть с помощью этой кнопки можно поменять название улицы (из этого списка выбрать нужную).
Просто на ComboBox я это сделал, все меняется, как и надо, но препода не устроило... А вот как это делать прямо в DBGrid'e - ума не приложу...

Помогите, пожалуйста.

А вообще , я уже запутался... Тебе сначала нужно было одно, потом другое....

[Apollo_13]

Сообщение от Pitbull

Я тебе покажу на примере...

Спасибо за пример! Есть одна проблемка... все работает по твоему примеру только в том случае если все компаненты (DBGrid, DBCombobox, DBListbox) распаложенны в пределах одной формы. У меня форма где DBGrid и навигация по нему это одна форма а все остальное это уже другая, по сему назревает вопрос как сделать?

[Spass]

В меню Delphi File>Use Unit добавляешь соседнюю форму (впрочем это можно и не делать Делфя тебя при компиляции спросит)
а обращатся к компонентам можно приписывая вначале имя формы
Например Form2.Table1.Active:=true;

[Мохнатик]

Сообщение от CHERT

Вобщем, имеется некоторая база, которая находится в DBGrid'e. Там есть поле "STREET".
Необходимо: при выборе этого поля у любой записи, рядом с названием улицы, появляется кнопочка для выпадающего меню со списком всех улиц в базе. То есть с помощью этой кнопки можно поменять название улицы (из этого списка выбрать нужную).
Просто на ComboBox я это сделал, все меняется, как и надо, но препода не устроило... А вот как это делать прямо в DBGrid'e - ума не приложу...

Помогите, пожалуйста.

Выпадающий список DBGrid выглядит так:
DBGrid1.Columns[i].PickList.Add('Здесь твой текст');
где i - это номер столбца в котором хочешь создать список!

[Apollo_13]

Спасибо за ваши ответы! Мне они РЕАЛЬНО помогли, может эта тема еще кому-нить поможет...