If PressKey

[bosshunts]

Is it possible to make this program do an action if I press a certain key?

For example. If I press 'a', can I make it push 1?

I tried to do this:

begin
if PressKey('a') then
PressKey(chr(49));
wait (1000);
end.

But I had the error "Type Mismatch"

Can anyone help?

[Wanted]

http://wiki.scar-divi.com/GetCurrentKeyState

[bosshunts]

I was looking for more of an example. lol

[slacky]

PressKey does what it says.. it presses a key. You need to check the STATE of the key.. So GetCurrentKeyState would work fine.

 

begin
 if GetCurrentKeyState('a') then
   PressKey(chr(49));

 Wait (1000);
end.

 

Also, the Wiki contains an example which is as clear as sunny day:

begin
 repeat
   Wait(500)
 until GetCurrentKeyState(VK_DOWN);
 WriteLn('Pressed down');
end.