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

У ComboBox на фрейме не случается MeasurmentComboBoxDrawItem   Найти похожие ветки 

← →
Kolan ©   (2007-08-09 14:47) [0]

Здравствуйте,
 Есть фрейм. На нем лежит ComboBox с csOwnerDrawFixed.

И есть обработчик:

procedure TMeasurmentFrame.MeasurmentComboBoxDrawItem(Control: TWinControl;
 Index: Integer; Rect: TRect; State: TOwnerDrawState);
begin
 if Control is TComboBox then  
   {&#133}
end;


Дык вот не отрабатывает этот код&#133

Проверял, — ставил брейк поинт — ничего. Вставлял ShowMessage — ничего&#133
Другие события(OnKeyPress напрмер) работают&#133

---

← →
Lacmus ©   (2007-08-09 16:02) [1]

Проверить ComboBox.Style на форме.
На форме по правой кнопке "мыши" "View as Text" - проверить, что обработчик события не nil

---

← →
Игорь Шевченко ©   (2007-08-09 16:04) [2]

> csOwnerDrawFixed.


А для этого стиля это событие должно вызываться ? Он же fixed

---

← →
Kolan ©   (2007-08-09 16:04) [3]

object MeasurmentComboBox: TComboBox
{&#133}
     OnChange = MeasurmentComboBoxChange
     OnDrawItem = MeasurmentComboBoxDrawItem
   end

---

← →
Kolan ©   (2007-08-09 16:06) [4]

> А для этого стиля это событие должно вызываться ? Он же
> fixed

Да вроде должно, этот КомбоБокс лежит на GroupBox"е. Так вот этот GroupBox я целиком из другого проекта скопировал. Там работает&#133

---

← →
Lacmus ©   (2007-08-09 16:25) [5]

> Kolan ©   (09.08.07 16:04) [3]

Надо смотреть для формы, на которую помещен Frame

---

← →
Leonid Troyanovsky ©   (2007-08-09 17:51) [6]

> Kolan ©   (09.08.07 16:06) [4]

>  Там работает…

Items заполнены?

--
Regards, LVT.

---

← →
Kolan ©   (2007-08-09 18:06) [7]

> Надо смотреть для формы, на которую помещен Frame

Дело в том. Что Фрейм в пакете. И в опр. время пакет передает это фрейм в гл. форму, а та распологает(устанавливает Parent) полученый фрейм на панель&#133

Items заполнены?

Блииин, ессно нет:
Добавил
MeasurmentComboBox.Items.Add(IntToStr(Manager.Graphs[I].Color))
Все ок,
Благодарю.

---

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

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



Память: 0.46 MB
Время: 0.015 c