Übrigens: Wenn sich da nicht alles geändert hat, findet man eine Liste der VK-Konstanten unter
Virtuelle Tastencodes.
edit: Zur Not wäre auch noch GetAsyncKeystate / GetKeystate möglich (falls man eine sofortige Reaktion wünscht):
Delphi-Quellcode:
procedure TFormX.TimerXTimer(Sender: TObject);
// -------------------^ Intervall klein
begin
if GetAsyncKeystate(VK_LEFT) < 0 then
ShowMessage('Links');
end;