Как заставить автоматически выпадать список в DBGrid

← →
bobsan © (2004-02-09 05:55) [0]

Как при получении ячейкой DBGida фокуса, заставить выпадать список, содержащийся в PickList, не нажимая кнопочку.

← →
Byte © (2004-02-12 17:33) [1]

Я бы залез в компонент DBGrid и подправил его.

Но можно, например, сымитировать раскрытие списка с клавиаатуры:

В событии Грида OnColEnter (для перемещения по горизонтали) и событии Тэйбла AfterScroll (по вертикали) написать

with DBGrid1 do
if (SelectedField.FieldKind=fkLookup) or
(SelectedField.CanModify and
(Columns[SelectedIndex].PickList.Text<>"")) then
begin
EditorMode:=true;
SendMessage(GetWindow(DBGrid1.Handle,GW_CHILD),WM_SYSKEYDOWN,$28,$21500001);
end;

Как заставить автоматически выпадать список в DBGrid Найти похожие ветки