Discussion :

[darkman13130]

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
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
//Déclarations de variables
        int i,val1;
        AnsiString pos,pos1,racine,utilisateur,ligne3,enregistrer,rechercher;
        TStringList *file = new TStringList() ;
        TStringList *myStringList= new TStringList() ;
        TStringList *li = new TStringList() ;
 
 
        //Recuperation de la racine du fichier a enregistrer dans edit 6
        enregistrer=Edit5->Text;
 
        //Recuperation du nom d'utilisateur dans Edit4
        utilisateur=Edit3->Text;
 
        //Recuperation de la racine du fichier dans Edit2
        racine=Edit1->Text;
 
        //Lecture du fichier
        file->LoadFromFile( racine );
        for( i=0; i< file->Count; i++)
        {
                //Lecture de chaque ligne
                rechercher = file->Strings[i];
 
                //Teste sur chaque ligne la valeur ,264,
                if(rechercher.Pos(",264,"))
                {
                       //Enregistre la valeur dans val1
                       val1=i;
                }
 
        }
 
 
        //Recuperation de ligne selectionner
        ligne3 = file->Strings[val1] ;
 
 
        //Decoupage de la ligne a chaque virgule
        li->Delimiter = ',' ;
 
        li->DelimitedText = ligne3 ;
 
 
        //Ouverture du fichier
        myStringList->LoadFromFile(enregistrer);
        //Ajout dans le fichier
        myStringList->Add(utilisateur+"," +li->Strings[5]);
 
        //Enregistre dans le fichier
        myStringList->SaveToFile( enregistrer ) ;
 
        //libérer les ressources
        delete myStringList ;
        delete li ;
 
        delete file ;

Voici mon code, le bute est de chercher dans un fichier un code qui renvoie la valeur de la ligne, et avec le numero de la ligne on copie un champ (ou plusieur)..

Le souci c'est que si ce numero n'y est pas, la recherche ce fait mais apres au niveau de l'ajout du champs dans le fichier sa fait une erreur et sa copie rien.

Moi je voudrais essayer d'eviter afficher cette erreur et de copier tous ce qu'il y a..

merci d'avance

[sat83]

pour gerer les exception, regarde du coté de try/catch

Code :

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

1
2
3
4
5
6
7
8
try
{
    //code qui peut générer une exception
}
catch(...)
{
   //code executer si une exception survient
}

[sat83]

Un petit exemple avec la classique division par zero :

Code :

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

1
2
3
4
5
6
7
8
9
10
  try
  {
     int x = 10;
     int y = 0 ;
     int z = x / y ;
  }
  catch(...)
  {
     ShowMessage( "Division par zéro" ) ;
  }

[darkman13130]

Code :

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

1
2
//Ajout dans le fichier
        myStringList->Add(utilisateur+"," +li->Strings[5]);

Merci pour le try j'y avais penser mais je vois pas comment mettre si pour li->Strings[5] comme il avait pas trouver la ligne donc la valeur a ecrire sera vide sa mettra l'erreur j'essaye sa

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
19
20
21
22
23
24
try
        {
                 Application->Initialize();
                 Application->CreateForm(__classid(TForm1), &Form1);
                 Application->Run();
                 if(val1==0);
        }
        catch (Exception &exception)
        {
                ShowMessage("val1=0");
                 Application->ShowException(&exception);
        }
        catch (...)
        {
                 try
                 {
                         throw Exception("");
                 }
                 catch (Exception &exception)
                 {
                         Application->ShowException(&exception);
                 }
        }
        return 0;

Mais l'erreur y est toujours

[sat83]

Quel est la ligne qui pose problème?

Si c'est celle ci :

Code :

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

myStringList->Add(utilisateur+"," +li->Strings[5]);

tu as juste a faire :

Code :

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

1
2
3
4
5
6
7
try
{
  myStringList->Add(utilisateur+"," +li->Strings[5]);
}
catch(...)
{
}

A noter que selon la configuration de ton Borland, il se peux que l'erreur apparaisse quand même quand tu lance l'exécutable depuis Borland. Mais quand tu le lancera en dehors de l'IDE, l'exception sera bien interceptée et aucun message d'erreur n'apparaitra

[darkman13130]

Ton try tu le mais dans le Unit1.cpp ou dans le project1.cpp car le project1.cpp il y a deja sa

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
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
USEFORM("Unit1.cpp", Form1);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
        try
        {
                 Application->Initialize();
                 Application->CreateForm(__classid(TForm1), &Form1);
                 Application->Run();
        }
        catch (Exception &exception)
        {
                 Application->ShowException(&exception);
        }
        catch (...)
        {
                 try
                 {
                         throw Exception("");
                 }
                 catch (Exception &exception)
                 {
                         Application->ShowException(&exception);
                 }
        }
        return 0;
}
//---------------------------------------------------------------------------

ton try je les mi dans mon code sourci normale il me dit que je doit declarer myStringList,utilisateur,li je comprend pas merci de m'aider