Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.12.18;
Скачать: CL | DM;

Вниз

Обработка клавиши VK_UP(DOWN) потомком TCustomControl   Найти похожие ветки 

 
Rep ©   (2005-05-27 07:14) [0]

Создаю потомка TCustomControl и хочу обработать клавиши курсора (VK_UP и т.д.) почему-то при их нажатии процедура KeyDown не выполняется. при нажатии на другие клавиши вход в процедуру происходит.
Не пойму в чем может быть проблема.
Спасибо.


 
ancara ©   (2005-05-27 09:06) [1]

Может у нас похожие ситуации?
http://delphimaster.net/view/5-1109751986/


 
Rep ©   (2005-05-27 09:40) [2]

да, спасибо, один в один, то что нужно :)


 
Просто Джо ©   (2005-05-27 09:44) [3]

Как нибудь эдак:

protected
 ...
 procedure WMGetDlgCode (var Message: TMessage); message WM_GETDLGCODE;
 ...

implementation

procedure TMyCustomControl.WMGetDlgCode(var Message: TMessage);
begin
 inherited;
 Message.Result := Message.Result + DLGC_WANTARROWS
end;


 
Rep ©   (2005-05-27 11:18) [4]

Просто Джо ©   (27.05.05 09:44) [3]
Ага именно так.


 
Юрий Зотов ©   (2005-05-27 11:35) [5]

Просто Джо ©   (27.05.05 09:44) [3]

5 + 1 = 6, но 5 or 1 = 5.

В случае DLGC_WANTARROWS разницы нет, но лучше соблюдать правильный стиль всегда. Чтобы он стал автоматическим.


 
Просто Джо ©   (2005-05-29 03:00) [6]


>  [5] Юрий Зотов ©   (27.05.05 11:35)

Да, спасибо за напоминание. Дурной стиль, знаю.



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

Текущий архив: 2005.12.18;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.031 c
3-1130784851
iXT
2005-10-31 21:54
2005.12.18
dll + MS SQL + ADO


6-1126018861
Ландграф Павел
2005-09-06 19:01
2005.12.18
Сервер на XP


3-1130748382
Sanich
2005-10-31 11:46
2005.12.18
Проблема спередачей параметров в функцию.


1-1132172994
gdaujk
2005-11-16 23:29
2005.12.18
ListView без полос прокрутки


2-1132482425
Officeman
2005-11-20 13:27
2005.12.18
listview.Items.Item[t].Selected:=true; как scrollbar подвинуть ?