Tedit carriage return line feed touche enter [Résolu]
cs_couf
220
Messages postés
dimanche 5 janvier 2003Date d'inscription
6 janvier 2011
Dernière intervention
-
27 oct. 2005 à 00:55 - Dernière réponse :
jlen100
1651
Messages postés
samedi 10 juillet 2004Date d'inscription
25 juillet 2014
Dernière intervention
- 27 oct. 2005 à 17:01
- Tedit carriage return line feed touche enter
- Conversion carriage return line feed (Résolu) » Forum - C
- Attribuer l'action du bouton ok a la touche enter » Codes sources - Visual Basic / VB.NET (Souris, Clavier, etc…)
- Bloquer touche enter » Codes sources - Javascript (Formulaire)
- Textbox : numeric et touche enter » Codes sources - C# / .NET (.NET)
- Comment associer la touche Enter à un bouton (Résolu) » Forum - Java
5 réponses
Meilleure réponse
tu as certainement une routine d'acquisition il faut voir dans celle ci. Sinon il faut filtrer dans l'edit:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key= #10 then
begin
tag: =1; //on positionne le tag de l'edit comme indicateur
key: = #0;//pour ne pas perturber l'affichage
end ;
if( key =#13) and (tag= 1) then
begin
// traitement de l'action
tag: =0;key=#0;// on repositionne le tag
edit1.Clear;
end;
end;
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key= #10 then
begin
tag: =1; //on positionne le tag de l'edit comme indicateur
key: = #0;//pour ne pas perturber l'affichage
end ;
if( key =#13) and (tag= 1) then
begin
// traitement de l'action
tag: =0;key=#0;// on repositionne le tag
edit1.Clear;
end;
end;
Avec quelques mots c'est encore mieux Ajouter un commentaire
a aidé 125 internautes ce mois-ci
salut Merci,
Ok ,
Je vais être plus claire j'ai un lecteur code à barre
qui me fait un CRLF chaque fois que je flashe
je peux saisir aussi le CB à la main
Donc OK pour la 2 eme partie
Mais pour gérer un CRLF
ai je le droit de faire comme ceci?
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 or key =#13#10
then
begin
// traitement de l'action
edit1.Clear;
end;
end;
penses tu que je pourrais le CRLF avec?
couf
Ok ,
Je vais être plus claire j'ai un lecteur code à barre
qui me fait un CRLF chaque fois que je flashe
je peux saisir aussi le CB à la main
Donc OK pour la 2 eme partie
Mais pour gérer un CRLF
ai je le droit de faire comme ceci?
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 or key =#13#10
then
begin
// traitement de l'action
edit1.Clear;
end;
end;
penses tu que je pourrais le CRLF avec?
couf
non onkeypress ne transmet que la derniere touche appuyée.
key est une variable char elle ne peut être qu'égale à #13 ou #10 mais pas les 2 a la fois d'ailleurs à la compilation tu uaras une erreur.
pour le lecteur code à barre je suppose qu'il est lu par
l'intermediaire d'un port entree/sortie (liaison serie ou autre) c'est
donc la routine de gestion de ce port qui doit gerer le CRLF arrivant
du lecteur (affichage du code+CRLF)
key est une variable char elle ne peut être qu'égale à #13 ou #10 mais pas les 2 a la fois d'ailleurs à la compilation tu uaras une erreur.
pour le lecteur code à barre je suppose qu'il est lu par
l'intermediaire d'un port entree/sortie (liaison serie ou autre) c'est
donc la routine de gestion de ce port qui doit gerer le CRLF arrivant
du lecteur (affichage du code+CRLF)
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.