Discussion :

[darkman13130]

Bonjours tous le monde je vous explique mon petit probleme.

Je doit realiser un petit programme qui me permet de lire dans un fichier en selectionnant certains champs sur differente ligne séparrer par des ',' et les copiers dans un autre fichier. La copie de c'est champs doit etre toujours separer par une ',' et chaque ligne copier doit etre mit a la ligne sur le nouveau fichier.

exemple du fichier:

Rapport,Mornas
Rapport,,,263,Système d'exploitation,Microsoft Windows 2000 Professional
Rapport,,,264,Date,2003-05-30
Rapport,,,265,Heure,14:41
Résumé,,Ordinateur,513,Système d'exploitation,Microsoft Windows 2000 Professional
Résumé,,Ordinateur,540,Service Pack du système,Service Pack 3
Résumé,,Ordinateur,564,Internet Explorer,6
Résumé,,Ordinateur,566,DirectX,4.07.00.0700 (DirectX 7.0)
Résumé,,Ordinateur,514,Nom du système,PLANNING
Résumé,,Ordinateur,515,Nom d'utilisateur,PLANNING

Je vous montre exemple ce que je voudrais en rouge

Voila donc avoir en resultat

Mornas,Système d'exploitation,Microsoft Windows 2000 Professional,Service Pack 3,Internet Explorer

Merci je compte sur vous

[sat83]

Bonjour, je n'ai pas C++ Builder sous la main, donc je fais ça de mémoire mais ca devrait etre correct :

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
   TStringList *file = new TStringList() ;
//lire le fichier
   file->LoadFromFile( "C:\\MonDossier\\MonFichier.txt" );
 
//recuperer la 3ème ligne du fichier
   AnsiString ligne3 = file->Strings[2] ;
 
   TStringList *ligne = new TStringList() ;
//decouper la ligne a chaque virgule
   ligne->Delimiter = ',' ;
   ligne->DelimitedText = ligne3 ;
 
//afficher le 5ème élement de la 3ème ligne
   ShowMessage( ligne->Strings[4] ) ;
 
//libérer les ressources
   delete ligne ;
   delete file ;

En esperant que ca te sera utile

[darkman13130]

Sa mes vraiment utile mais juste une truc il me faudrait une commande pour que je puise aussi enregistrer dans une fichier texte a la suite de chaque champs qui minteresse comme l'exemple que j'ai marquer et aussi quand je lit un fichier different pour mettre les informations une ligne en dessous et faire la meme chose

Merci d'avance

[darkman13130]

et encore un truc stp voila il y a un petit souci je te montre

Résumé,,Carte mère,520,Mémoire système,256 Mo (PC133 SDRAM)

Je voudrais extraire 256 Mo (PC133 SDRAM)
il faut que je face cette ligne mais on dirai que les seperateurs ne foncionne pas bien

ShowMessage( ligne->Strings[7]+ligne->Strings[8]+ ligne->Strings[9]+ligne->Strings[10]);

donc si tu peux m'aider aussi

Merci

[sat83]

Edit : correction de la fonction FindToken (elle fonctionnait avant, mais une ressource n'était pas libérée!)


Je pense que tu as tous les éléments pour faire ce que tu veux faire, en sachant encore que pour enregistrer un TStringList dans un fichier tu fais :

Code :

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

myStringList->SaveToFile( "C:\\monfichier.txt" ) ;

Essai de faire des fonctions réutilisable, en voici une pour récupérer le n-ième élement d'une AnsiString :

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
AnsiString FindToken( AnsiString aSource, int aPosition, char aDelimiter )
{
/*
aSource : la chaîne de caractère à découper
aPosition: l'élément dans la chaîne que tu veux récupérer
aDelimiter: le caractère de séparation
*/
  TStringList *tokenizer = new TStringList() ;
  tokenizer->Text = StringReplace(aSource, aDelimiter , "\n", TReplaceFlags()<< rfReplaceAll );
 
  AnsiString resultat = "" ;
  if( aPosition < tokenizer->Count )
    resultat = tokenizer->Strings[ aPosition ] ;
  delete tokenizer ;
  return( resultat );
}

PS : en passant, ca montre une autre methode pour decouper une string que celle que je t'avais donné dans mon premier post

[darkman13130]

Je suis désolé de de dire sa mes ce code ne marche pas

Code :

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

myStringList->SaveToFile( "C:\\monfichier.txt" ) ;

Je fais comment

[sat83]

Je suis désolé de de dire sa mes ce code ne marche pas

Code :

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

myStringList->SaveToFile( "C:\\monfichier.txt" ) ;

Je fais comment

Ca ne marche pas? As tu déclarer au moins le TStringList?

Code :

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

1
2
3
4
5
6
TStringList *myStringList= new TStringList() ;
//[...]
// tu remplis comme tu veux chaque ligne (chaque élement du TStringList correspondra a une ligne du fichier)
//[...]
myStringList->SaveToFile( "D:\\SaveFile.txt" ) ;
delete myStringList ;

[darkman13130]

Code :

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

ligne->Delimiter = ',' ;

Avec cette commande le separateur marche tres bien mais les espace conte pour lui comme un separateur et moi je veux pas car j'ai des phrases ex Systeme d'exploitation et il me prend que Systeme

comment je peut remedier a sa et faire la sauvegarde sur un fichier et j'orai eu tous ce que je vouler

Merci bonne journée