Keypresses

[asdfarkangel]

Hi I searched this on google but all I found was ascii codes. What I would need is check if for example the up arrow button is pressed. (I don't think that button has an ascii code or does it?)

[WILL]

Hi there is a way to capture key presses using just the system function units in FPC or Delphi, but you may find it easier and better to use something like SDL or DirectX where you have better control over detecting when different keys are pressed and/or released. JEDI-SDL and maybe DelphiX (only if you are using Delphi though!) could be a good starter library for you...?

[Carver413]

what would life be like without Google
http://delphi.about.com/od/objectpascalide/l/blvkc.htm

[asdfarkangel]

Thanks altough I never used those compilers before I will really look at how they work if I get back but now I'm at home my comp is at the student-hostel and I don't want to fill mom's comp with pascal stuff I use free pascal so those Delphi functions won't help me out but thanks anyways.

[Carver413]

Thanks although I never used those compilers before I will really look at how they work if I get back but now I'm at home my comp is at the student-hostel and I don't want to fill mom's comp with pascal stuff I use free pascal so those Delphi functions won't help me out but thanks anyways.

those are not delphi functions they are const. and you can use that chart to define them in free pascal

procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
const
VK_UP = $26;
begin
if key = VK_UP then LoggerUnit.Logger.Msg('Up Key');
end;

this works just fine in lazarus, minus the LoggerUnit which is my own code. those const are probable defined some where in lazarus but I don't have a clue where. in delphi I think that they are part of the win unit. just because you are using free pascal you shouldn't discard everything delphi. most code can be made to work on lazarus and there is a wealth of information out there for delphi. even old delphi books can be of use to you

[User137]

const
    VK_UP = $26;
begin
  if key = VK_UP then ...

Tip: You can add Lcltype in uses clause of your Lazarus project, all virtual keycodes such as VK_UP, VK_ESCAPE are there in cross-platform way.

[phibermon]

I use dogpile (http://www.dogpile.com/)

It's combination of search results from the various big names is quite useful when searching the more commonly spammed topics