Manipulation sur la composante 'Edit'

salut a tous! bonne journée :D
Pour introduire un polynôme comme (2)X1+(3)X2+(5)X3+....+(5)Xn j'ai utilisé l'événement onKeyPress de la composante Edit, alors je voulais réaliser la chose suivante:
Quand l'utilisateur fini d'introduire le coefficient de X et Tape La lettre X,on aura X suivi de son indice automatiquement.
exemple: l'utilisateur tape 1.5X alors ça s'affichera 1.5Xi dans L'edit.
sachant que j'ai déjà le compteur i et tout.
mon problème c que quand je met: Edit->Text=Edit->Text+IntToStr(i) il m'affiche les donnée que j'avais au paravent avec une autre disposition comme
XXX1+2+3 c-a-dir les x d'un coté et les chiffres de l'autre!
je voudrais savoir aussi s'il vous plais comment mettre le curseur a la fin de l'edit!
je m'excuse si j'ai trop écrit ou mal exprimé:oops:
Merci

Pour le texte dans le TEdit, il vaut mieux que tu passe par une variable intermédiaire : tu récupère ce qu'il y as dans le TEdit, tu ajoute ce que tu veut, puis tu remet le contenu de cette variable dans le TEdit.

Pour le curseur il suffit de mettre la propriété SelStart égale à la taille de ta chaine

Citation:

---

Envoyé par pottiez

Pour le texte dans le TEdit, il vaut mieux que tu passe par une variable intermédiaire : tu récupère ce qu'il y as dans le TEdit, tu ajoute ce que tu veut, puis tu remet le contenu de cette variable dans le TEdit.

Pour le curseur il suffit de mettre la propriété SelStart égale à la taille de ta chaine

---

Merci beaucoup Pottiez! je vais essayer tout ça!

Citation:

---

Envoyé par pottiez

Pour le texte dans le TEdit, il vaut mieux que tu passe par une variable intermédiaire : tu récupère ce qu'il y as dans le TEdit, tu ajoute ce que tu veut, puis tu remet le contenu de cette variable dans le TEdit.

Pour le curseur il suffit de mettre la propriété SelStart égale à la taille de ta chaine

---

j'ai fait ça

valeur=Edit1->Text;
valeur=valeur+IntToStr(compteur);
Edit1->Text=valeur;
J'ai toujours le Même problem! :?
est ce qu'il ya quelqu'un qui puisse m'aider

essayer de faire ça pour mieux me comprendre

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

int i; AnsiString c;   void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key) { if(Key==120) //la lettre x { c=Edit1->Text+StrToInt(i); Edit1->Text=c; i++; } }

---

Essaye de débuger pour voir ce que vaut ta variable valeur

Bonjour,

Si je comprends ce qui est recherché, peut être qqhose comme:
(avec flagX en int , private)

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27

void __fastcall TForm6::Edit2KeyDown(TObject *Sender, WORD &Key, TShiftState Shift) { switch(Key) { case 'X': flagX++; break; default: break; } } //---------------------------------------------------------------------------   void __fastcall TForm6::Edit2KeyUp(TObject *Sender, WORD &Key, TShiftState Shift) { switch(Key) { case 'X': Edit2->Text = Edit2->Text.Insert(IntToStr(flagX), Edit2->Text.Length()+1) ; break; default: break; } }

---

J'ai voulu forcer le repositionnement du 'Caret' au bout du texte, et dans le OnKeyUp, j'ai fait un essai (un peu trop vite) avec:

Code:

---

1 2 3 4 5

keybd_event(VK_CONTROL, 0,1,0); keybd_event(VK_RIGHT, 0,1,0); keybd_event(VK_RIGHT, 0,2,0); keybd_event(VK_CONTROL, 0,2,0);

---

-> ben c'est pas a faire ! On dirais que mon PC considère que la touche 'ctrl' est restée appuyée, j'ai du faire un 'restart' :mouarf:
Ya surement mieux ...

@+
;)

et un truc tout simple comme ça?

Code:

---

1 2 3 4 5 6 7 8 9

void __fastcall TForm1::Edit1Change(TObject *Sender) {   if (Edit1->Text.SubString(Edit1->Text.Length(),1) == "x" || Edit1->Text.SubString(Edit1->Text.Length(),1) == "X" ) { Edit1->Text=Edit1->Text+IntToStr(i); i++; } }

---

avec i initialisé à 0 kkpart en dehors du onchange

Salut à tous,

A mon avis ce n'est pas une très bonne idée que tu programmes ton code dans "OnKeyPress", parce que même quand tu effaces par exemple ton conteur va continuer à s'incrémenter, donc tu vas te retrouver avec des indices qui ne correspondent pas à ton polynôme !!! J'ai essayé de procéder ainsi :

Tu programmes ton code dans OnClique, à chaque fois que tu cliques sur ton Edit, il va t'afficher ce que t'as entré comme nombre plus "X"+"le nombre de fois que t'as cliqué qui correspond à ton vrai indice" et tu continue comme cela en rajoutant + et la suite de ton polynôme. Voici le code pour que ça soit plus clair :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30

//------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; int i=0; //Initialisation du compteur String var; int l;     //------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) {   } //-------------------------------------------------------------------------     void __fastcall TForm1::Edit1Click(TObject *Sender) { i=i+1; var=Edit1->Text; l=var.Length(); Edit1->Text=var+"X"+IntToStr(i); var=Edit1->Text; Edit1->SelStart=var.Length(); } //-------------------------------------------------------------------------

---

J'espère que c'est ce que tu cherches.

Bon courage.

Re,

Pardon, j'ai rajouté la variable "l" inutilement :(.

@+

Salut Sunchaser
Le comportement de la simulation des touches tel que tu l'a ecrit est normal, si tu simule l'appuie il faut simuler le relachement, voir le lien sur les hooks

Citation:

---

http://tcharles.developpez.com/simul/

---

Voici l'exemple qui est donne

Code:

---

1 2 3 4 5 6 7

keybd_event(VK_LMENU,0,0,0); // appuie ALT   keybd_event(VK_RETURN,0,0,0); // appuie ENTER keybd_event(VK_RETURN,0,KEYEVENTF_KEYUP,0); // relache ENTER   keybd_event(VK_LMENU,0,KEYEVENTF_KEYUP,0); // relache ALT

---

Hoopsy :

pourquoi tu mets ça dans un OnClick?
ta remarque sur la suppression est judicieuse mais tu ne donnes pas de solution au final..si?
mais en effet, ce que je suggères ne gère pas ce cas..

Salut !

On peut essayer ceci :

Code:

---

1 2

int Xn=1;

---

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key) { AnsiString N = Edit1->Text; if((Key == 'x') || (Key == 'X')) { N = N + "X" + IntToStr(Xn); Edit1->Text = N; Edit1->SelStart = N.Length(); Xn++; Key = 0; } }

---

A plus !

Bonjour,

Oui bravo, si je comprends bien 'Edit1->SelStart = N.Length();' doit résoudre le repositionnement du 'Caret' d'une manière bien plus simple et sure ...

++
;)

Salut !

Edit1->Text est modifié ainsi que la position du Caret en amont de la gestion de l'événement.
A ce stade l'Edit n'a pas encore traité le caractère 'X' ou 'x'.
En aval, la gestion n'aboutira à rien puisque l'on transmet un NUL (ASCII 0x00) en lieu et place du 'x' ou du 'X'.

La position du Caret et SelStart sont liés.

A plus !

Merci beaucoup les gars, vous m'avez beaucoup aidé à résoudre mon problème.
Encore merci a tous !!!:D

Citation:

---

Envoyé par henderson

Salut !

On peut essayer ceci :

Code:

---

1 2

int Xn=1;

---

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key) { AnsiString N = Edit1->Text; if((Key == 'x') || (Key == 'X')) { N = N + "X" + IntToStr(Xn); Edit1->Text = N; Edit1->SelStart = N.Length(); Xn++; Key = 0; } }

---

A plus !

---

Merci HENDERSON :king: