Форум: "Основная";
Текущий архив: 2006.07.30;
Скачать: [xml.tar.bz2];
ВнизПерехват сообщения от клавы Найти похожие ветки
← →
Max4 (2006-06-16 12:01) [0]Есть класс от TCustomControl;
при выполнении не приходит в процедуру -
procedure KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
пытаюсь прописать даже
procedure WMCommand(var Message: TWMCommand); message WM_COMMAND;
тот же результат.
класс создаю в форме1. у формы стоит кей привью.
if not Assigned(FView) then
begin
FView := TView.Create(Self);
with FView do
begin
Align := alClient;
Parent := TWinControl(Self);
end;
end;
Где грабли ? что пропустил ?
← →
Dimka Maslov © (2006-06-16 13:17) [1]FView.OnKeyDown := KeyDown наверное пропущено
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2006.07.30;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.011 c