Discussion :

[EricNO]

Bonjour,

Quelqu'un peut il me dire comment écrire en RAD Studio 10.4 ces quelques lignes qui marchaient très bien avec C++ Builder 6

Code :

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

1
2
3
4
5
6
7
8
9
10
11
char chn1[10];
 
 void __fastcall TForm1::Edit1Change(TObject *Sender)
{
  int Size = Edit1->GetTextLen();
  Size++;
  char *Buffer = new char[Size];
  Edit1->GetTextBuf(Buffer,Size);
  strcpy(chn1,Buffer);
  delete Buffer;
}

Merci par avance

Eric NOE

[PocoYote]

Bonjour,

à partir des versions XE, les chaines de caractères des composants sont de type UnicodeString au lieu de AnsiString...

Code :

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

1
2
3
4
5
6
 
char chn1[10];
void __fastcall TForm1::Edit1Change(TObject *Sender)
{
  strcpy(chn1, AnsiString(Edit1->Text).c_str());
}

Cordialement

[Crayon]

La réponse de PocoYote est fonctionnel, par contre je me question sur l'utilisation d'un array de char. Pourquoi ne pas utiliser String qui est normalement utilisé sous C++Builder ou std::string qui supporte UTF-8 et qui est standard en C++? Sinon, si ton texte peut contenir des caractères Unicode il te faudrait plutôt un array de wchar_t (wide-character). Aussi au lieu de strcpy utilise plutôt strncpy qui est plus sécuritaire.

[DjmSoftware]

La réponse de PocoYote est fonctionnel, par contre je me question sur l'utilisation d'un array de char. Pourquoi ne pas utiliser String qui est normalement utilisé sous C++Builder ou std::string qui supporte UTF-8 et qui standard en C++? Sinon, si ton texte peut contenir des caractères Unicode il te faudrait plutôt un array de wchar_t (wide-character). Aussi au lieu de strcpy utilise plutôt strncpy qui est plus sécuritaire.

Parfitement d’accord avec les propos de Crayon,
le code posté initialement est du C et non du C++ pourquoi utiliser de l'allocation statique via un tableau de caractère ou de l'allocation dynanique via new alors que C++ Builder propose des classes AnsiString,ou UnicodeString ou encore mieux l'utilisation de la STD.
la classe AnsiString existait déja avec C++ Builder 1.

ainsi ton code retravaillé

Code :

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

1
2
3
4
5
6
7
8
9
 
String BuffReseultat
 
 
 void __fastcall TForm1::Edit1Change(TObject *Sender)
{
BuffReseultat=Edit1->Text; // C'est tout
}
// l'èvenenement OnChange est appelé a chaque fois que la propriété texte est changée donc 1 caractère

cdlt

[EricNO]

Merci pour vos réponses,
mais j'utilise l'événement "OnChange" car dans certains de mes projets j'ai besoin de contrôler chaque caractères saisis.
comment écrire la même fonction en C++ ?
Merci par avance
Eric NOE

[DjmSoftware]

salut
je crois qu’il y a une certaine confusion
l'évenenment Onchange c’est du C++ creé a partir de la VCL qui est écrite en Delphi
en utilisant le code que j'ai posté BuffReseultat sera une copie exacte de l'Edit box
ton code de contrôle ou de traitement doit être appelé depuis le gestionnaire d'évenement

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
 
String BuffReseultat
 
 
void __fastcall TForm1::Edit1Change(TObject *Sender)
{
BuffReseultat=Edit1->Text; // C'est tout
// ton code de traitement sera placé ici
// exemple 
char* LastChar=BuffReseultat.AnsiLastChar();
//  Tu peux tester Maintenenant LastChar et en fonction du résultat désiré agir ex conséquence
//
 
 
}

cdlt

[EricNO]

Bonjour,
j'ai essayé

Code :

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

char* LastChar=BuffResultat.AnsiLastChar();

Message du compilateur :

[bcc32c Erreur] Unit1.cpp(41): no member named 'AnsiLastChar' in 'System::UnicodeString'

[DjmSoftware]

Mille excuses,
voici un petit code qui teste si dernier caractère tapé dans l'editBox est la lettre A alors il la remplace par un X

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
 
void __fastcall TForm122::Edit1Change(TObject *Sender) {
	String BuffTmp;
	BuffTmp = Edit1->Text;
	if(BuffTmp!="") // teste si la chaîne contient des caractères
	{
		if (*BuffTmp.LastChar() == 'A') {
                                                                 //le dernier caractère de la chaine est un A 
			int found = BuffTmp.Pos(*BuffTmp.LastChar());// On trouve sa position 
 			BuffTmp[found] = 'X';// remplacement du caratère A par un X
			Edit1->Text = BuffTmp; // On réecrit la EditBox
		}
	}
 
 
 
} // ---------------------------------------------------------------------------

cdlt

[EricNO]

Merci beaucoup pour ton aide
Eric NOE