Вниз
Скачать: CL | DM;

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

← →
alex-ran   (2003-09-30 15:34) [0]

Ув. мастера, подскажите, плиз, как в обработчике события onEnter определить какой элемент потерял фокус, т.е. у кого он до этого был.


← →
Игорь Шевченко ©   (2003-09-30 15:50) [1]

ActiveControl ?


← →
BillyJeans ©   (2003-09-30 15:58) [2]

WM_SETFOCUS

Value of wParam. Identifies the window that has lost the keyboard focus (may be NULL).


← →
han_malign ©   (2003-09-30 16:17) [3]

onExit ?


← →
BillyJeans ©   (2003-09-30 16:26) [4]

han_malign © (30.09.03 16:17) [3]

и чего ты в событии onExit узнаешь???


← →
Alex_Raider ©   (2003-09-30 16:38) [5]

обычно задача формулируется так,
что элемент узнает о том что он потерял фокус,
или бриобрел его,
а не какой элемент из...


← →
alex-ran   (2003-09-30 17:32) [6]

Уточняю.
Есть приложение с дочерними окнами.
У каждого дочернего окна есть панель инструментов, при создании окна родителем панели инструментов делаю главную форму. На FormActivate & FormDeactivate - ToolBar1.Visible:=True, False соответственно. Все нормально пока панель инструментов содержит только ToolButton. При попытке вставить в панель инструментов компонент который может получать фокус ввода алгоритм отображения панели нарушается, так как перед получением им фокуса возникает FormDeactivate:
procedure TfmFinCred.FormDeactivate(Sender: TObject);
begin
ToolBar1.Visible:=False;
end;
Поэтому надо отслеживать или кто получит фокус ввода в этой процедуре или кто теряет в onEnter компонента.


← →
BillyJeans ©   (2003-09-30 17:32) [7]

Повторю: параметр wParam сообщения WM_SETFOCUS вернет контрол, который потерял фокус!



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

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



Память: 0.46 MB
Время: 0.014 c
3-40282
ViKS
2003-09-22 13:33
2003.10.13
Перенос базы данных на другой компьютер


6-40548
malamba
2003-08-15 10:45
2003.10.13
проверка ссылок на странице


3-40316
Илайдж
2003-09-22 09:56
2003.10.13
2k: backup


1-40405
SPIRIT
2003-10-01 00:49
2003.10.13
Всей проге делаем визибле=фолс


1-40437
Charly
2003-10-02 20:26
2003.10.13
TPageControl -> AllowChange




   Наверх