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:
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 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); } } }
est ce que quelqu'un peut m'aider svp
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); } } }![]()
Partager