Скачать: CL | DM;

Как программно заставить выпасть список в ValueListEditor e?   Найти похожие ветки 

← →
AlexDM   (2004-05-19 16:08) [0]

В ValueListEditor"e используются списки возможных значений (ItemProps[row].EditStyle = esPickList, типа встроенного Combobox как в Object Inspector Delphi).

Как сделать чтобы при щелчке ЛК мыши в ячейке, автоматически выпал ее ниспадающий список?

Заранее спасибо!

---

← →
Palladin ©   (2004-05-19 16:46) [1]

OnGetPickList

---

← →
AlexDM   (2004-05-19 17:24) [2]

Нет, OnGetPickList это уже последствие, где можно набить выпадающий список строками и объектами.
А я бы хотел чтобы при нажатии в ячейке рядом с кнопкой выпадающего списка принудительно появлялся сам список. Может какое то сообщение надо послать этому компоненту?

---

← →
AlexDM   (2004-05-19 17:25) [3]

Нет, OnGetPickList это уже последствие, где можно набить выпадающий список строками и объектами.
А я бы хотел чтобы при нажатии ЛК мыши в ячейке рядом с кнопкой выпадающего списка принудительно появлялся сам список. Может какое то сообщение надо послать этому компоненту?

---

← →
Palladin ©   (2004-05-19 17:25) [4]

Ты справку почитай прежде чем заявлять что то

---

← →
AlexDM   (2004-05-19 17:49) [5]

По моему возникло какое то недопонимание:

type TGetPickListEvent = procedure (Sender: TObject; const KeyName: String; Values: TStrings) of object;

property OnGetPickList: TGetPickListEvent;

"Возникает при щелчке по кнопке раскрытия (!!!) списка возможных значений. Параметр KeyName содержит имя строки, в которой произведен щелчок. Обработчик должен заполнить возможными значениями список Values. Свойство ItemProps. EditStyle должно содержать значение esPickList".

А я хочу добится чтобы как только ячейка содержащая список получила фокус (щелчок ЛК мыши в ячейке рядом(!) с кнопкой раскрытия списка)- сразу выпал этот самый список как это делается в Combobox"e:

MyComboBox.DroppedDown := True;
Или:
MyComboBox.Perform(CB_SHOWDROPDOWN, True, 0);

Спасибо

---

← →
WebErr ©   (2004-05-19 17:56) [6]

Вот тебе задачка на размышление:
Есть такая функция у ValueListEditor"a

function GetPickList(Values: TStrings; ClearFirst: Boolean = True): Boolean;

но находится она в protected секции!
Сможешь её достать - МОЛОДЕЦ - и используй ObjectInspector, а не сможешь - используй ObjectInspector. :))))

---

← →
Palladin ©   (2004-05-19 18:00) [7]

аа... прошу прощенья... теперь понял... надо посмотреть

---

← →
MU ©   (2004-05-19 18:12) [8]

type
TMyVL = class(TValueListEditor);
TMyIEL = class(TInplaceEditList);

procedure onXXXX
begin
 // проверки
 TMyIEL(TMyVL(ValueListEditor1).InplaceEditor).DropDown;
end;

---

← →
BFG9k   (2004-05-20 16:40) [9]

MU: Как использовать InplaceEditor для какой-то конкретной ячейки? Предлагаемый код виснет ...

---

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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.037 c