| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Component KeyDown

SIV5000 ©   (2010-11-17 12:58:00) 

Народ привет. Подскажите пожалуйста, пишу компонент, почемуто  procedure KeyDown(var Key: Word; Shift: TShiftState); override;
не реагирует на нажатие клавиш VK_LEFT, VK_RIGHT ???

И еще один вопрос, не по теме но все же, есть
type
TState  = (tsNormal, tsActive, ......)
Как сохранить и загрузить tsNormal из INI файла ?

---

SIV5000   (2010-11-17 13:20:00) [1]

Спасибо, с остальним разобрался. Кому интересно: нужно перехватить

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

procedure TMyComponent.WMGetDlgCode(var Msg: TMessage);
begin
inherited;
Msg.Result:= Msg.Result or DLGC_WANTARROWS;
end;

---

clickmaker   (2010-11-17 13:01:00) [2]

> Как сохранить и загрузить tsNormal из INI файла ?

TState(ReadInteger(...))

---

Наверх