Discussion :

[seiken02]

Bonjour,

J'ai dans mon programme un composant Opendialog1 qui permet d'ouvrir un fichier "user.dat"

Celui ci s'exécute lorsque je clique sur un bouton rechercher.

Voici le code :

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
int j, row;
		TReplaceFlags Flags = Flags << rfReplaceAll;
		AnsiString T0 = " \n";
		AnsiString T1 = "Nom\n";
		AnsiString T2 = "Prenom\n";
		AnsiString T3 = "Tel\n";
		AnsiString T4 = "Adresse\n";
		AnsiString T5 = "Ville\n";
		AnsiString T6 = "CP\n";
		AnsiString T7 = "Digicode\n";
		AnsiString T8 = "Mail\n";
 
		AnsiString N = T0 + T1 + T2 + T3 + T4 + T5 + T6 + T7 + T8;
 
		if(OpenDialog1->Execute())
		{
			TStringList *Fichier = new TStringList;
			Fichier->LoadFromFile(OpenDialog1->FileName);
			StringGrid1->RowCount = Fichier->Count +1; // + 1 ligne grisée
 
			// titres des colonnes
			StringGrid1->Rows[0]->Text = N;
			for(j = 0; j < Fichier->Count; j++)
			{
				row = j+1;
				StringGrid1->Rows[row]->Text = IntToStr(row) + "\n" +
									   StringReplace(Fichier->Strings[j], ";", "\n", Flags);
				if(Edit2->Text==StringGrid1->Cells[1][row])
				{
					Form2->Memo1->Lines->Add(StringGrid1->Rows[row]->Text);
				}
				else if(Edit2->Text==StringGrid1->Cells[3][row])
				{
					Form2->Memo1->Lines->Add(StringGrid1->Rows[row]->Text);
				}
			}
			Fichier->Clear();
			delete Fichier;
 
		}

Lors du clique sur le bouton rechercher, j'ai une fenêtre qui s'ouvre me demandant de sélectionner le fichier.

Mon fichier étant toujours le même, j'aimerai que l'ouverture se fasse automatiquement, donc de plus avoir de fenêtre de sélection de fichier.

J'ai regardé dans les paramètre pour forcer l'ouverture du fichier, mais je n'ai pas trouvé.

est ce possible???

Merci par avance !

[cedni]

Salut
Oui bien sur , de cette façon :

Code :

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

1
2
3
4
 
TStringList *Fichier = new TStringList;
Fichier->LoadFromFile("user.dat");  
// ou X\\Dossier\\user.dat  ( ne pas oublier d echaper le caractere \ avec \ )

++

[sat83]

Code :

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

1
2
TStringList *Fichier = new TStringList;
Fichier->LoadFromFile("C:\\MonDossier\\user.dat");

[Edit:] Réponse en doublon avec celle de cedni. A noter que les séparateurs à doubler sont "\\" et non "//".

[seiken02]

Que dire à part merci pour cette réponse rapide

La solution était toute simple, parfois il ne faut pas chercher trop compliqué...

[cedni]

Autant pour moi , une petite erreur dans ma hâte