retour à la ligne ( sans multiligne)

Question

Bonjour, 

Dans une application avec une textbox (mono ligne), je souhaite faire un retour chariot.



Je voudrai que lorsque la ligne de la texbox est remplit, que le curseur revienne en d&#233;but de ligne, ceux qui me permettrai d'&#233;craser la phrase pr&#233;c&#233;dente.

J'utilise les fonctions "vbcr" ou Chr$13 &#224; la fin de chaque phrase, mais &#224; chaque fois j'obtiens quelque chose qui ressemble &#224; sa :
"ma phrase"|

quelqu'un peu t'il me sortir de cette impasse 
Merci.

jpleroisse · Answer

Bonsoir,

Soit tu uitlises un contr&#244;le RichTextBox o&#249; tu mets la propri&#233;t&#233; Multiligne du TextBox &#224; True, elle est faite pour &#231;a.



jpleroisse



Si une r&#233;ponse vous convient, cliquez R&#233;ponse Accept&#233;e.

PCPT · Answer

salut,

"Je voudrai que lorsque la ligne de la texbox est remplit"

&#231;&#224; veut dire quelquechose? remplie genre MaxLength atteind? ou lettres au bout &#224; droite?



il y a une propri&#233;t&#233; multiligne pour le TextBox classique. aucun code taper....

PCPT   [AFCK]

violent_ken · Answer

Violent Ken

Salut !
Soit tu mets MultiLine=true &#224; ta TextBox
Soit tu utilise "1ere ligne" & vbNewline & "2eme ligne"
@+

ScSami · Answer

Hum... Comme en chat tu veux dire !
En somme, tu veux que d&#232;s que tu valides un texte via la touche "Enter", l'ancienne phrase disparaisse et que donc, le curseur revienne au d&#233;but...

C'est bien &#231;a ou pas ???
Parce qu'il est vrai que tu n'es pas tr&#232;s clair!!!
Et pense &#224; toujour nous indiquet dans quel langage tu codes...

Enjoy 

<hr size="2" width="100%">
( Si une r&#233;ponse vous convient, cliquez sur le bouton "R&#233;ponse accept&#233;e". )

babyboydu92 · Answer

Ouai c'est exatement sa, tu as tout compris ! et je codes en VB6...
Sais tu comment je peux atteindre ce fonctionnement ?

Merci pour vos r&#233;ponses

ScSami · Answer

R&#233;ponse pour super d&#233;butants!!! Si tu t'&#233;tais donn&#233; la
peinne de chercher juste un peu tu aurais trouv&#233; sans trop de probl&#232;mes
je pense!!!

Private Sub Text1_KeyPress(KeyAscii As Integer)
 If KeyAscii = vbKeyReturn Then
  '-----------------------------------------------
  'Si tu veux faire des choses avec le texte entr&#233;
  'fait-les ici...
  ...
  varAncienTexte = Text1.Text
  ...
  '-----------------------------------------------
  Text1.Text = ""
  KeyAscii = 0
 End If
End Sub

Bon, ceci dit, &#231;a m&#233;rite quelques explications :
Dans "Private Sub Text1_KeyPress(KeyAscii As Integer)" Text1 est le nom de ta zone de saisie.
Ne change rien.
C'est une proc&#233;dure dite "&#233;v&#233;nementielle". Elle se d&#233;clanche lors de l'&#233;v&#233;nement "KeyPress". Autrement dit, d&#232;s qu'un utilisateur a appuy&#233; sur une touche (enfonc&#233; le bouton puis relach&#233; le bouton = presser le bouton). Donc, tout le code qui sera dedans sera ex&#233;cut&#233; &#224; ce moment l&#224; (et uniquement &#224; ce moment l&#224; !!!
La touche sur laquelle a appuy&#233; l'utilisateur a un code transmit par le VB &#224; la proc&#233;dure via l'argument "KeyASCII". Autrement dit, toutes les touches on un code ASCII. Et le code ASCII de la touche qui a &#233;t&#233; press&#233;e se trouve dans cette "variable" (argument)

On teste si ce code est bien celui de la touche "Return" ("Enter" quoi!). Pour &#231;a, on utilise une constante VB. Autrement dit, "vbKeyReturn" est une "variable" "constante" (donc pas variable ;-) que le VB poss&#232;de en interne. Cette constante VB a pour valeur le code ASCII de la touche "Return". Pourquoi une constante VB plutot que la valeur directement ??? Tu pourrais mettre la valeur si tu voulais mais &#224; condition de t'en souvenir!!! Et comme ont est pas tous des machines &#224; m&#233;moriser des infos inutiles, ben... on utilise ces constantes. Remarque que le VB n'a pas que cette constante en "m&#233;moire", il a toutes les autres touches du clavier. Du coup, si tu &#233;cris "vbKey" ("Key" en anglais = Clef, Touche), il te suffit de rajouter le nom (originel, pas en fran&#231;ais!!!) de touche pour y faire r&#233;f&#233;rence. Par exemple : vbKeyF1 pour la touche "F1", vbKeyShift pour la touche Majuscule, vbKeyBack pour la touche Del (retour arri&#232;re), vbKeyB pour la lettre "B", ..., ..., ...

Donc, on a :
Si touche_press&#233;e_par_l'utilisateur = toucheReturn Alor
 fait tout &#231;a
Fin du Si

Dans le "fait tout &#231;a" tu dois mettre ce que tu veux faire. Ben wai, c'est pas tout d'entrer des lignes de texte puis de les effacer mais faut aussi en faire quelque chose (des lignes de texte) !!! C'est donc ici que tu dois mettre ce que tu veux leur faire faire.

Ensuite, on efface le contenu de la zone de texte, tout simplement en faisant appel &#224; sa propri&#233;t&#233; Text (qui fait r&#233;f&#233;rence au texte qui est dedans!). On efface en lui assignant un texte vide (=""). Si on avait voulu lui mettre un texte par d&#233;faut ont aurait fait (="texte par d&#233;faut"), mais l&#224;, on n'a rien mis pour effacer la zone. Mais quoi qu'on y mette, comme &#231;a, le nouveau texte remplacera toujours l'ancien (y'a bien une technique pour &#233;viter cela mais l&#224; n'est pas le sujet).

Apr&#232;s avoir fait &#231;a, on assigne 0 au code de la touche press&#233;e afin que cette m&#234;me touche de soit pas renvoy&#233;e pour &#234;tre affich&#233;e (ce qui, pour la touche Enter, causerait une exclamation [sonor tout du moins] de la part de Windows!). Si tu veux voir ce que &#231;a donne sans cette ligne, met la en commentaire (en placant une apostrophe au d&#233;but).

Diable, est-ce qu'avec toutes ces explications tu as pu avancer ???

Enjoy 

<hr size="2" width="100%">
( Si une r&#233;ponse vous convient, cliquez sur le bouton "R&#233;ponse accept&#233;e". )

babyboydu92 · Answer

Sa fonctionne, merci !
Et pour une r&#233;ponse, sa c'est une r&#233;ponse !
il est vrai que maintenant que tu m'&#224; tout expliqu&#233; c'est tr&#232;s facile mais il fallait quant m&#234;me le savoir !
Bonne soir&#233;e A++

ScSami · Answer

Ben fallait lire l'aide  !!! (la MSDN... juste pour info!)

Enjoy 

( Si une r&#233;ponse vous convient, cliquez sur le bouton "R&#233;ponse accept&#233;e". )

violent_ken · Answer

Violent Ken

C'est sur qu' apres une telle r&#233;ponse, il serait de bonne augure de l'accepter !
@+

Retour à la ligne ( sans multiligne)

9 réponses

Discussions similaires