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

Свой компонент   Найти похожие ветки 

 
Алекса   (2003-12-22 10:48) [0]

Добрый день всем! Пишу свой компонент. Хотела кое-какое изменение внести в событие Enter, но Delphi ругается(говорит, что нет такого события в классе Tedit),когда я пытаюсь это событие прописать в protected(хотя KeyUp и KeyPress нормально приняла).В чем может быть причина?


 
Skier ©   (2003-12-22 10:51) [1]

Код !


 
Silver Alex ©   (2003-12-22 11:16) [2]

а какое событие надо OnEnter или реакция на нажатие клавиши Enter.Если OnEnter тогда надо переопределять DoEnter, а если нет то KeyDown и смотреть Key=VK_RETURN


 
Алекса   (2003-12-22 11:29) [3]

Код
type
Tdate = class(TEdit)
private
Fsize:boolean;
protected
procedure KeyUp(var Key:Word;Shift:TShiftState);override;
procedure KeyPress(var Key: Char); override;
procedure Enter(Sender: TObject);override;
public
{ Public declarations }
published
constructor Create(AOwner:TComponent);override;
property Sizedate:boolean read Fsize write Fsize;
end;


 
Юрий Зотов ©   (2003-12-22 11:37) [4]

Смотрим в Великое Священное Писание - исходники VCL. И находим ответ на эту неразрешимую загадку - оказывается, нужный нам метод называется DoEnter.


 
Skier ©   (2003-12-22 11:39) [5]

Юрий Зотов © (22.12.03 11:37) [4]
Думаю что и DoEnter не поможет.
Такое впечатление что автор путает получение фокуса ввода и нажатие Enter-а
Если я не ошибаюсь...


 
Алекса   (2003-12-22 11:42) [6]

Skier - ни фига! Все получилось! Спасибо Зотов!


 
Skier ©   (2003-12-22 11:43) [7]

Ну, значит я ошибался. Приношу извинения.



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

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



Память: 0.46 MB
Время: 0.017 c
6-25472
Кен
2003-11-07 02:34
2004.01.09
TWebbrowser Как отловить ссылку на которую кликнул пользователь ?


3-25222
loki128
2003-12-11 13:36
2004.01.09
Работа с TADOQuery


1-25373
Indy
2003-12-25 04:45
2004.01.09
Документация по Indy


3-25262
LinOS
2003-12-08 13:48
2004.01.09
Мигает DBGrid


1-25330
bon
2003-12-25 15:28
2004.01.09
DeskTop




   Наверх