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

В VCL было OnEnter, а в KOL как?   Найти похожие ветки 

← →
GuAV   (2004-04-17 12:56) [0]

Если в VCL есть TPanel (или TGroupBox, TFrame...) c контролами на ней, то когда один из них получает focus, TPanel генерирует событие OnEnter.
В KOL нет никакого события на этот случай и PPanel не получает никаких сообщений.

Вопрос: как создать Panel с событием OnEnter, которое вызывалось бы, когда вставленый в нее Control получал focus?

---

← →
Gandalf ©   (2004-04-17 13:05) [1]

Что первое пришло на ум. В OnEnter контролов вызывай какой тебе надо метод и считай что это PanelOnEnter.

---

← →
GuAV   (2004-04-17 20:35) [2]

Так не получилось, т. к. часть контролов вставлены через Frame и в разные панели. А в uses unit содержащий форму с панелью не пропишешь. Но решение найдено. Каждому контролу OnEnter:


procedure TMyFrame.TreeView1Enter(Sender: PObj);
begin
 with PControl(Sender)^ do Parent.OnEnter(Parent);
end;


---

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

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



Память: 0.45 MB
Время: 0.023 c