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

Вниз

OnKeyDown в наследнике TPaintBox   Найти похожие ветки 

 
Soft(Unpowered Kiborg) ©   (2002-08-10 12:34) [0]

Здравствуйте.

Возникла проблемма. Нужно в наследнике от TpaintBox ловить сообщения от клавиш(например Del). Делаю перехват собщения

procedure WMKeyDown(var Message: TWMKeyDown); message WM_KEYDOWN;

procedure TNTDScreen.WMKeyDown(var Message: TWMKeyDown);
begin
ShowMessage("Keydown");
canvas.TextOut(0,0,"Keydown");
end;

И ничего не происходит. Где ошибка совсем не понимаю.


 
Юрий Зотов ©   (2002-08-10 13:54) [1]

TPaintBox - наследник TGraphicControl. То есть, это не окно. О каких же сообщениях Windows может идти речь? Только о тех, которые пересылает компоненту его Parent - а в данном случае он, видимо, этого не делает.

Зато можно отнаследоваться от TCustomControl и добавить код, содержащийся в TPaintBox (всего-навсего два небольших кусочка). В итоге получим тот же TPaintBox, но оконный - он будет сам получать все сообщения.


 
Soft(Unpowered Kiborg) ©   (2002-08-10 15:59) [2]

Большое спасибо. Большого и безглючного вам кода:)



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

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

Наверх




Память: 0.47 MB
Время: 0.011 c
3-85344
greyserg
2002-09-03 19:23
2002.09.26
Как задать в TQuery нужный тип таблицы


3-85319
KDS
2002-09-06 15:07
2002.09.26
SUSPEND в ХП


4-85763
Sergey___
2002-08-10 16:20
2002.09.26
Как взять часть экрана в буфер и потом вставить обратно


1-85476
Zelius
2002-09-16 10:49
2002.09.26
Как пр истарте программы установить Splitter в нулевое положение?


3-85350
Ag2002
2002-09-04 16:27
2002.09.26
DataBase DeskTop