If Keypressed Then Ch:=readkey; Опции

[Morfey85]

Перешёл из паскаля в делфи

столкнулся с проблемой:

в паскале при нажатии кнопки считывал символ так: if KeyPressed then ch:=ReadKey;
В делфи такое что то не катит пишет Undeclared identifier...
Как мне реализовать это в Делфях подскажите.

[мисс_граффити]

я в змейке писала так:

procedure TForm1.KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 case Key of
  vk_down:  if napravl<>nup then
               napravl:=ndown;
  vk_up:    if napravl<>ndown then
               napravl:=nup;
  vk_left:  if napravl<>nright then
               napravl:=nleft;
  vk_right: if napravl<>nleft then
               napravl:=nright;
 end;
end;

то есть при нажатии стрелки менялось направление змейки.
мне кажется, тебя что-то подобное должно устроить... но это все равно обработчик события.