Discussion :

[El-Diablo-]

Bonjour,

Je suis en train d'essayer de faire un projet dans lequel j'ai plusieurs TEdit.. Puis au fait, quand je suis dans le premier TEdit et que l'utilisateur appuie sur la touche "TAB" je veux qu'il écrire un TAB et non qu'il passe au TEdit suivant...

Merci..

[DR]

As-tu regardé les évênements OnKeyPress ou OnKeyDown ?

[El-Diablo-]

Non pas du tout, je vois pas du tout comment y parvenir :S

[DR]

Il faut passer la propriété KeyPreview de la fiche à false (par défaut) pour que les TEdit reçoivent les évênements avant la fiche ; mais dans l'aide on peut lire la phrase suivante :

Les touches de navigation (Tab, les touches de déplacement, etc.) ne sont pas affectées par KeyPreview car elles ne génèrent pas d'événements clavier.

Problème.

Pour contourner le problème je propose de mettre un TAB dans le TEdit quand on tape sur CTRL+TAB.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
void __fastcall TForm1::Edit1KeyDown(TObject *Sender, WORD &Key, TShiftState Shift)
{
  if ((Key == '\t') && Shift.Contains(ssCtrl))
    {
      ((TEdit *)Sender)->Text = ((TEdit *)Sender)->Text + '\t';
      Key = '\0';  //Pour ne rien faire après
    }
}

A améliorer...

[El-Diablo-]

Salut, j'ai inserer ton code dans mon TEdit mais ca ne fonctionne pas, quand j'appuie sur TAB j'ai le meme probleme que avant, puis quand j'appuie sur CTRL+TAB j'ai un caractère spécial qui apparait.

[ac/dc]

Salut sinon tu peux utiliser un TMemo dont tu mets le paramètre WantTabs à true ...