Перехват курсорных клавиш

Благодарю за поддержку!

		Новости сайта
		Новости форума

Архив исходников

Automatic translation

Главная страница сайта "Delphi Sources"

Раздел "Исходники"

Форум

Перехват курсорных клавиш

Автор: Cheers, Julian (TeamB & TurboPower Software)

procedure WMGetDlgCode(var Msg : TMessage); message WM_GETDLGCODE;

...

procedure TMyControl.WMGetDlgCode(var Msg : TMessage);
begin
  Msg.Result := DLGC_WANTARROWS;
end;