| Статистика | 
|
|
Каталог статей
Перехват OnEnter в моем компоненте
Компоненты, имеющие возможность принимать фокус, уже имеют унаследованные
методы с именами DoEnter и DoExit.
Procedure DoExit; override;
Procedure DOEnter;
override;
procedure
MyClassName.DoExit;
begin
fIsFocused := FALSE;
inherited DoExit;end;
procedure
MyClassName.DoEnter;
begin
inherited DoEnter;
fIsFocused := TRUE;end;
|
|
|
Просмотров: 390
6
Оштрафовать
| Жаловаться на материал |
|
| Улучшенный поиск | | Поиск по сайту
Поиск по всему интернету
|
|
