| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Dbgrid+DBLookupComboBox1
vitv © (2007-02-19 17:03:00)Поместил вот так:
procedure TTest.DBGrid11DrawDataCell(Sender: TObject; const Rect: TRect;
Field: TField; State: TGridDrawState);
begin
if (gdFocused in State) then
begin
if (Field.FieldName = DBLookupComboBox1.DataField) then
begin
DBLookupComboBox1.Left := Rect.Left + DBGrid11.Left;
DBLookupComboBox1.Top := Rect.Top + DBGrid11.top;
DBLookupComboBox1.Width := Rect.Right - Rect.Left;
DBLookupComboBox1.Height := Rect.Bottom - Rect.Top;
DBLookupComboBox1.Visible := True;
end;
end;
end;
Когда в ColumsEditor делаю Add all fields,add - не работает.
vitv (2007-02-19 17:34:00) [1]Проблема в том, что он появляется после того как:
1. Выбрать ячейку
2. Кликнуть на ячейке
3. Выбрать значение
.....
А тут только надо навести на нужный столбец.
Amoeba (2007-02-19 17:30:00) [2]Не понял, зачем весь этот огород городить? В DBGrid и так уже встроено то, что тебе надо - выпадающий список в колонке, связанной с LookUp полем.
| |
