Salut à tous !!!

Bon, ben je crois que la question est dans le sujet...
J'ai beau fouiller tout le web à la recherche de tableaux de conversion "codes touches virtuelles" <--> "codes ascii", bizarrement, pour le code ascii 61, je trouve jamais la correspondance...

Alors, est-ce qu'elle existe cette conversion ??? Et sinon, comment je fais, moi, pour simuler ma touche "égal" ?

PS (ça peut toujours servir ) :
Pour trouver le code touche virtuel d'une touche du clavier, tu peux utiliser un Memo et mettre le code suivant dans son événement OnKeyDown :

procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
ShowMessage(IntToStr(Key));
end;

@+
Bonne Prog'
Nico [www.ni69.new.fr]

---

Si tu veux envoyer un message à windows voilà ce que j'ai

procedure EnvoieCaractere(objet : TWinControl; Caractere : integer; Nombre : integer);
var i: integer;
begin
  try
    objet.SetFocus;

    for i:=1 to nombre do
     begin
        PostMessage(objet.handle,WM_KEYDOWN,Caractere,$1);
        PostMessage(objet.handle,WM_KEYUP,Caractere,$1);
     end;
  except

  end;

A bientôt

Merci bien !!!

Et merci aussi pour le code du mémo, ça m'évitera de reposer la question pour le "ç" ou le "à" ou un autre truc du genre...

Tiens, si t'es en forme, je pose une autre question sur le forum, enfin je m'en vais la poser dans les minutes à venir... ;-)

Thomas.

Hey hey même 3 ans après, le post sert encore ^^

Merci ni69 pour ton code =)