Фокус у TWinControl
Как заставить наследник от TWinControl получать и терять фокус?
Типа TEdit, например. Необходимо чтобы события от клавиатуры направлялись моему класуу, когда у него есть фокус ввода.
Типа TEdit, например. Необходимо чтобы события от клавиатуры направлялись моему класуу, когда у него есть фокус ввода.
Цитата:
Originally posted by Sagittarius
Типа TEdit, например. Необходимо чтобы события от клавиатуры направлялись моему класуу, когда у него есть фокус ввода.
Типа TEdit, например. Необходимо чтобы события от клавиатуры направлялись моему класуу, когда у него есть фокус ввода.
Так вроде по умолчанию должен, если не путаю...
Цитата:
Originally posted by smartsoft
Так вроде по умолчанию должен, если не путаю...
Так вроде по умолчанию должен, если не путаю...
Про TEdit я пример привел.
У меня есть наследник класса TWinControl, и мне его надо научить получать и терять фокус. Я думаю, надо где-то в стиле окна поковыряться... или может еще где? :)
Цитата:
Originally posted by Sagittarius
Про TEdit я пример привел.
У меня есть наследник класса TWinControl, и мне его надо научить получать и терять фокус. Я думаю, надо где-то в стиле окна поковыряться... или может еще где? :)
Про TEdit я пример привел.
У меня есть наследник класса TWinControl, и мне его надо научить получать и терять фокус. Я думаю, надо где-то в стиле окна поковыряться... или может еще где? :)
Процедура CreateParams.
По непроверенным данным
procedure TCustomEdit.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
CreateSubClass(Params, 'EDIT');
...
end;