Probleme avec les touches
g0belin
Messages postés
155
Date d'inscription
jeudi 6 décembre 2001
Statut
Membre
Dernière intervention
19 avril 2010
-
8 févr. 2002 à 18:16
g0belin Messages postés 155 Date d'inscription jeudi 6 décembre 2001 Statut Membre Dernière intervention 19 avril 2010 - 9 févr. 2002 à 17:46
g0belin Messages postés 155 Date d'inscription jeudi 6 décembre 2001 Statut Membre Dernière intervention 19 avril 2010 - 9 févr. 2002 à 17:46
A voir également:
- Probleme avec les touches
- Clavier 16 touches - Forum ASM
- Les touches de direction - Forum C# / .NET
- Touches de direction - Forum Delphi / Pascal
- Problème gestion touches ✓ - Forum C# / .NET
- Les touches ALT - Forum Visual Basic
2 réponses
DelphiCool
Messages postés
455
Date d'inscription
mardi 24 juillet 2001
Statut
Membre
Dernière intervention
10 mars 2009
9 févr. 2002 à 05:32
9 févr. 2002 à 05:32
Salut
Key est un caractere
pour avoir son code ascii essaye
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Case Ord(key) Of
38:direction:='h';
39:direction:='b';
37:direction:='g';
40:direction:='d';
end;
end;
Key est un caractere
pour avoir son code ascii essaye
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Case Ord(key) Of
38:direction:='h';
39:direction:='b';
37:direction:='g';
40:direction:='d';
end;
end;
g0belin
Messages postés
155
Date d'inscription
jeudi 6 décembre 2001
Statut
Membre
Dernière intervention
19 avril 2010
9 févr. 2002 à 17:46
9 févr. 2002 à 17:46
merci bien
