🚀 go-pugleaf

"kme" <xzr@cnaqben.or.ROT13.invalid> schreef in bericht
news:Xns9328AD384E74Ekmepandorabe@195.130.132.68...
> Ik ben een spel snake aan het maken en zou graag hebben dat de slang
> reageert op de pijltoetsen. Nu had ik de volgende functie:
>
> void __fastcall TsnakeSpel::snakeSpelKeyPress(TObject *Sender, char &Key){
>   if (Key ==VK_UP) richting = 0;
>   else if (Key ==VK_DOWN) richting = 1;
>   [...]
>
> Als ik men programma link reageert men slang totaal niet. Waarschijnlijk
> moet ik een "actionlistener" of iets dergelijks op men Form  plaatsen...
>
> Wie kan mij helpen?

Occurs when a user presses a single character key.

typedef void __fastcall (__closure *TKeyPressEvent)(System::TObject* Sender,
char &Key);
__property TKeyPressEvent OnKeyPress = {read=FOnKeyPress,
write=FOnKeyPress};

Description

Use the OnKeyPress event handler to make something happen as a result of a
single character key press.

The Key parameter in the OnKeyPress event handler is of type Char;
therefore, the OnKeyPress event registers the ASCII character of the key
pressed. Keys that don't correspond to an ASCII Char value (Shift or F1, for
example) don't generate an OnKeyPress event. Key combinations (such as
Shift+A), generate only one OnKeyPress event (for this example, Shift+A
results in a Key value of "A" if Caps Lock is off). To respond to non-ASCII
keys or key combinations, use the OnKeyDown or OnKeyUp event hand


>
> --
> mvg,
> kme