Comment ouvrir un fichier en utilisant le composant "OpenDialog" ?

Version imprimable

01/09/2008, 15h31
petitclem

Comment ouvrir un fichier en utilisant le composant "OpenDialog" ?

Bonjour à tous,

je m'explique :

j'utilise pour l'instant sur mon IHM les composants "DriveComboBox", "DirectoryListBox", "FileListBox".
Lorsque je sélectionne un fichier dans ma "FileListBox" et que j'appuie sur le bouton "Ovrir" je mets certaines des informations contenues dans le fichier dans des "EditBox".

Maintenant, j'aimerai changer de manière d'ouverture du fichier : cliquer sur le bouton "Ouvrir" de mon IHM, une "OpenDialog" apparaisse pour ensuite sélectionner un fichier, cliquer sur "ouvrir" de la "OpenDialog" et que les informations contenues dans le fichier soit mises comme avant dans mes "EditBox".

Merci d'avance pour votre aide, à bientôt !!!
01/09/2008, 15h47
jehrikhan

Si j'ai bien compris ce que tu veux faire il faut mettre le code qui était derriere ton bouton ouvrir sur l'evenement OnCanClose.

Le chemin vers le fichier sélectionné se trouve dans la propriété FileName de l'OpenDialog.
01/09/2008, 15h48
bakaneko
Le TOpenDialog est un composant servant à l'affichage de la boite de dialogue de sélection d'un fichier. Il ne fait rien d'autre...

Voici un exemple rapide :
Code:

1 2 3 4 5 6 7 8 9 10 TOpenDialog* Open = new TOpenDialog(); if (Open->Execute())//ouverture de la boite de dialogue { AnsiString FileName = Open->FileName; //mon traitement } delete Open;
Tu peux également donner un titre à la fiche et faire des filtres sur le type de fichier à ouvrir

Je vous poste le code qui est derrière mon bouton "ouvrir" :

Code:

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
 
 
void __fastcall TFormClient::FileListBoxFichiersChange(TObject *Sender)
{
   FormClient->FileListBoxFichiers->Mask = "*.gm";
   DOC = FormClient->FileListBoxFichiers->FileName;
 
}
 
void __fastcall TFormClient::OuvrirClick(TObject *Sender)
{
 
// Création de la liste
TStringList *Fichier;
 
 
if(FileExists(DOC)) {
 
   // Chargement du fichier sélectionné dans la liste
   Fichier->LoadFromFile(DOC.c_str());
 
   FormClient->EditNom->Text = Fichier->Strings[1];
 
   [...]
 
   delete Fichier;
 
 
   }
 
}

Comment dois je m'y prendre avec ce code pour effectuer la même chose en utilisant le composant "OpenDialog" ???

:?:?:?:?:?:?:?:?

03/09/2008, 13h05
petitclem

Ok, c'est bon : j'arrive à faire la même chose avec le composant "OpenDialog".

Mais, lorsque j'ai ouvert un fichier et que je reclique sur le bouton "ouvrir" pour afficher la boite "OpenDialog" et ouvrir un autre fichier il y a une erreur : "Violation d'accès à l'adresse 00403278 dans le module PClient.exe. lecture de l'adresse 00000000".

Qu'est ce que cela veut dire ??? 8O8O8O8O8O

Comment dois je faire pour ne plus avoir cette erreur ????

:?:?:?:?:?:?
03/09/2008, 13h42
bakaneko

Ce genre d'erreur vient généralement d'une erreur de lecture mémoire.
Regardes du côté de ta gestion des new/delete.

Et bien, j'ai fait normalement ce qu'il fallait !!!!

Lorsque je met "TOpenDialog* OpenDialog1 = new TOpenDialog();" et que je compile il y a une erreur : "Impossible de trouver une correspondance pour TOpenDialog::TOpenDialog()".
Alors, je supprime cette ligne, ça compile, mais ça fait l'erreur de mon dernier post !!!! 8O8O8O8O8O

Je poste mon code pour que vous puissiez voir où est le problème :

Code:

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
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
 
void __fastcall TFormClient::Button1Click(TObject *Sender)
{
 
 
 
        FastLineSeriePH->Clear();
	FastLineSerieConductivite->Clear();
	FastLineSerieTemperature->Clear();
	FastLineSerieOxygene->Clear();
 
	// Création de la liste
	TStringList *Fichier;
 
	//TOpenDialog* OpenDialog1;
	//OpenDialog1 = new TOpenDialog ( );
 
 
	if (OpenDialog1->Execute())//ouverture de la boite de dialogue
	{
		DOC = OpenDialog1->FileName;
 
		//mon traitement
        AnsiString N;
		Fichier = new TStringList();
 
		// Chargement du fichier sélectionné dans la liste
		Fichier->LoadFromFile(DOC.c_str());
 
		for(int j = 0; j < Fichier->Count; j++)
        {
			N = Fichier->Strings[j];
			for(int i = 1; i <= N.Length(); i++)
			{
				if( (N[i] == '.') || (N[i] == ',') )
                {
					N[i] = DecimalSeparator;
                }
            }
        	Fichier->Strings[j] = N;
		}
 
 
 
 
		AnsiString NumSerie;
		int ConvInt;
		AnsiString ConvHex;
 
 
		FormClient->EditNom->Refresh();
 
 
		// Nom de la bouée
		FormClient->EditNom->Text = Fichier->Strings[1];
 
		// Numéro de série de la bouée avec affichage en Héxadécimal
 
		/*NumSerie = Fichier->Strings [2];
		ConvInt = atoi (NumSerie.c_str());
		ConvHex = IntToHex (ConvInt,2);
		FormClient->EditNumSerie->Text = ConvHex;   */
 
		FormClient->EditNumSerie->Text = Fichier->Strings[2]; 
 
 
		// RAZ des tableaux
		ZeroMemory(TabMoy, sizeof(double) * 4);
		ZeroMemory(TabGraph, sizeof(double) * 4);
 
 
		// Ligne par ligne
		for(int i = 3; i < Fichier->Count ; i++) {
 
			Colonnes(Fichier->Strings[i]);
 
		}
 
		 // CALCUL DES MOYENNES
		for(int i = 0; i < 4; i++) {
 
			TabMoy[i] = TabMoy[i] / (Fichier->Count-3);
 
		}
 
		// Affichage des différentes moyennes
		FormClient->EditPH->Text = FormatFloat("0.000",TabMoy[0]) ;
		FormClient->EditConductivite->Text = FormatFloat("0.000",TabMoy[1]) ;
		FormClient->EditTemperature->Text = FormatFloat("0.0",TabMoy[2]);
		//FormClient->EditOxygene->Text = FormatFloat("0.000",TabMoy[3]);
 
 
 
 
 
		// Utilisation des graphes
 
	   AnsiString asTMP;
 
 
	   for(int i=3; i< Fichier->Count; i++)
	   {
 
		   asTMP = "Valeur " + IntToStr(i);
		   Colonnes(Fichier->Strings[i]);
		   FastLineSeriePH->AddXY(i , TabGraph[0], (i-2), clBlue);
		   FastLineSerieConductivite->AddXY(i , TabGraph[1], (i-2), clGreen);
		   FastLineSerieTemperature->AddXY(i , TabGraph[2], (i-2), clRed);
		   //FastLineSerieOxygene->AddXY(i , TabGraph[3], (i-2), clPurple);
 
	  }   
 
 
		//Libération de la mémoire
		Fichier->Clear();
 
		delete Fichier;
 
 
	}
 
 
	delete OpenDialog1;
 
 
 
}

:?:?:?:?:?:?:?:?:?:?:?:?:?:?:?

03/09/2008, 14h36
pottiez
Il faut un TComponent en paramètre, cela définit le propriétaire du composant que tu vient d'instancier.

Tu peut mettre NULL ou this :
Code:

1 2 3 TOpenDialog* OpenDialog1; OpenDialog1 = new TOpenDialog (this);
03/09/2008, 14h51
bakaneko

Si c'est ce code que tu as dans ton source, je vois ton erreur.

Ton OpenDialog1 est un composant TOpenDialog que tu as posé sur ta fiche. Hors, à la fin de ta méthode, tu fais un delete OpenDialog1 donc, tu supprimes ta déclaration de ton OpenDialog.

Tu as 2 options :
1/ supprimer le delete à la fin de ta méthode
2/ supprimer le composant posé sur ta fiche et passer par un composant instancié comme l'indique pottiez.
03/09/2008, 14h57
petitclem

Ok merci les amis !!! :king::king::king::king:

J'ai opté pour la méthode de création instanciée !!!

Tout fonctionne très bien !!!

A bientôt !!!

:yaisse2::yaisse2::yaisse2::yaisse2::yaisse2: