Discussion :

[Coussati]

salut, pour tester si un caractre était un chiffre j'utilisais :

in ['0'..'9']

pour les lettres je fais : in ['a'..'z']

mais si je veux tester si le caractère n'est pas une lettre, comment je fais ?

j'avais pensé à : not in ['a'..'z'] mais aperement ça marche pas

[AT]

Code :

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

if not(key in [',';':','!','/','*','-','+','"',''','(','-','_',#8,#13])then key:=#0;

[ero-sennin]

Salut,

Il faut bien utiliser le not in :

Code :

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

1
2
3
4
5
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if not(Key in ['a'..'z'])then
    ShowMessage('Tu as saisi un chiffre!');
end;

PS: Je pense que ton titre n'est pas vraiment en adéquation avec ce que tu demandes

A+

[Coussati]

Salut,

Il faut bien utiliser le not in :

Code :

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

1
2
3
4
5
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if not(Key in ['a'..'z'])then
    ShowMessage('Tu as saisi un chiffre!');
end;

PS: Je pense que ton titre n'est pas vraiment en adéquation avec ce que tu demandes

A+

oui j'ai compris après le poste de AT, c'est bizzard que je n'y avais pas pensé ! lol

pour le titre du poste, si on me donnait une solus je serai preneur, mais si on rectifie ce que j'avais déjà ça suffisait :d

[jmjmjm]

Si tu as eu ta réponse pense à mettre résolu ca evite les pertes de temps, ce qui facilite les reponses !!