bonjour,
mon grand problème c'est d'afficher plusieurs textes unicode dans un memo, je suis arrivée à afficher un seul texte unicode dans un memo avec ce code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
void __fastcall TFORM1::Ouvrir1Click(TObject *Sender)
{        if (this->TOpenDialog1->Execute())
               {
		 int nbFichiers = this->TOpenDialog1->Files->Count;
		 for(int i=0; i<nbFichiers ; i++)
		    {
			AnsiString  File = this->TOpenDialog1->Files->operator [](i);
			if(FileExists(File))
				this->TMemo1->Lines->LoadFromFile(File);
 
                    }
               }
}
et je suis arrivée avec le code ci-dessous à afficher plusieurs textes mais en caractères bizarres (c'est à dire il n'a pas connu les caractères unicodes)
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
void __fastcall TMIRACL::Ouvrir1Click(TObject *Sender)
{if (this->TntOpenDialog1->Execute())
      {
	int nbFichiers = this->TntOpenDialog1->Files->Count;
	for(int i=0; i<nbFichiers ; i++)
	   {
	      WideString File = this->TntOpenDialog1->Files->operator [](i);
              wchar_t ph[800];
	      FILE *doc ;
	      doc =  _wfopen(File.c_bstr(),L"r");
	      while(fgetws(ph,800,doc))
		   this->TntMemo1->Lines->Add(ph);
	      fclose(doc);
	   }
       }
  }
est ce que quelqu'un peut m'aider svp