VPF::Приходится дважды щёлкать по TDBLookupComboboxEh

Akella

Дата 12.6.2009, 10:24 (ссылка)

(нет голосов)

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 36
Всего: 329

На форме несколько TDBLookupComboboxEh
Когда нажимаю кнопку спрва для того, чтобы список раскрылся, то список раскрывается и сразу же закрывается. Когда щёлкаешь уже по кнопке второй раз и более, то эффекта самозакрывания нет. Никаких событий у TDBLookupComboboxEh нет. Если щёлкать не по кнопке, а непосредственно по самому элементу, то такой проблемы не наблюдаю.
CodeGear™ RAD Studio 2007 Version 11.0.2902.10471
EhLib 4.3 Build 4.3.21 Russian version

Написал автору. Не знаю, когда ответит.

Добавлено @ 10:38
Я нашёл проблему.
При создании окна всем этим выпадающим спискам присваивалось событие

Код


procedure TfmArendaAdd.DBLookupComboboxEhDropDown(sender: TObject);
begin
  if sender is TDBLookupComboboxEh then
    (sender as TDBLookupComboboxEh).DropDown;
end;
....

  for i := 0 to ComponentCount-1 do
    if (Components[i] is TDBLookupComboboxEh) then
      (Components[i] as TDBLookupComboboxEh).OnEnter    := DBLookupComboboxEhDropDown;

Для того, чтобы при попадании фокуса на список, он автоматически бы раскрывался сам. Если этот код закоментировать, то список не выпадает, даже есть установить AutoDrop в True smile

Что можно придумать для "автовыпадания" списка?

Это сообщение отредактировал(а) Akella - 12.6.2009, 11:18

Akella

Дата 12.6.2009, 11:14 (ссылка)

(нет голосов)

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 36
Всего: 329

В общем проблема в том, что DBLookupComboboxEh должен раскрыться сам при попадании на него фокуса ввода.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »