Показать сообщение отдельно
  #2  
Старый 22.12.2013, 00:00
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от vers0
Создал проект, в котором на Form1 имеется 4 Panel с картинками. Перемещение между ними происходит только клавишами (стрелками) на клавиатуре, при нажатии Enter'a на определенной картинке запускается другая форма (картинка 1 запускает Form2, 2 - Form3 и т.д.).

На второй форме так же навигация происходи только при помощи клавиатуры (стрелки и Enter, закрытие по Esc). Проблема возникла со второй формой (Form2, с остальными пока еще не работал), т.к. не обрабатывается KeyDown на ней, только на главной форме (Form1).
У меня нормально обрабатываются KeyDown и во второй форме.
Только несколько замечаний.
Вот здесь:
Код:
var
  Form2: TForm2;
сделай так:
Код:
var
  Form2: TForm2 = nil;
Так же сделай и в других формах которые автоматически не создаются.

И ещё убери упоминание Form2 вот здесь:
Код:
procedure TForm2.FormCreate(Sender: TObject);
begin
  p := 0;
  a := 1;
  img3.Picture.Bitmap.LoadFromFile('Pictures\name.bmp');
  Form2.DoubleBuffered := true;
end;
Ответить с цитированием