Одновременное нажатие клавиш.

[Вадим Буренков]

Вот возникла проблема. Я пользуюсь функцией Keypressed, а она определяет только 2 или 3 нажатые клавиши одновременно.
Попробуйте в примере нажать одновременно клавиши вверх, вправо и пробел, все будет работать.А если нажать влево, вниз и пробел, то системный блок запищит.
Как от этого избавиться?

Вот код обработки движения

if AI.AIType = 'Player' then  
begin
if Keypressed(38) then Ypos:=Ypos-Yspeed;
if Keypressed(40) then Ypos:=Ypos+Yspeed;
if Keypressed(37) then Xpos:=Xpos-Xspeed;
if Keypressed(39) then Xpos:=Xpos+Xspeed;
if Keypressed(32) then Animation.EnableAnim;
end;

[Kostia]

Именно из-за этого я и не люблю клавиши стрелок, если жать вверх и влево, а потом пробел или некоторые другие кнопки, то они не "нажмутся".
Вердикт: нужно поменять клавиши!
Например: WASD