Comment faire le changement de "Tabs" dans un TJvgTabControl ?

**petitclem** · 16/10/2008, 14h59

Oèp, c'est surtout que je ne comprends pas ce que tu veux dire par :

Salut,
il faut que tu enregistre en mémoire les données arrivant en fonction du numéro de serie, et qu'ensuite lorsque tu change de tab, tu vide ton graphique et que tu remette uniquement les données correspondant à ton tab.

**pottiez** · 16/10/2008, 15h06

Fallais le dire tout de suite

En faite, a chaque fois que tu reçoit une valeur, tu ne la met pas directement dans le graphique (TChart), tu le met dans des variable qui seront structurer en fonction de tes besoins (à toi de voir, vecteur, map, hash_map, multi hash_map,...)

Ensuite à chaque fois que tu changera de tab, tu appellera une fonction faite par tes soins qui affichera dans le graphique toutes tes valeurs concernant le numéro de série de ton tab (et uniquement ces valeurs la), qui seront facile à retrouver grace au fait que tu aurra bien structuré ton rangement en mémoire de tes données (comme précisé au debut de ce message

)

Cette fonction sera également appelé lorsque tu recevra une nouvelle valeur et quel aura été ajouté dans tes données pour permettre au graphique de ce rafraichir et d'integrer la nouvelle valeur.

Est-ce plus clair ? (Si non je peut essayer de réexpliquer une nouvelle fois différement

)

**petitclem** · 16/10/2008, 15h16

Toujours pas compris, désolé Pottiez !

Mais je te montre mon code pour que tu comprennes mieux ce que je veux faire :

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
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
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
 
	SetName();
	//---- Placer le code du thread ici ----
 
	setlocale( LC_NUMERIC, "French_France" );
 
	DCB dcb;
	bool etat;
	COMMTIMEOUTS timeouts={0};
	unsigned char buf [20];
	unsigned long nblu;
 
	// Création de la liste
	TStringList *leFichier;
 
	FILE *fichier;
 
    HDEVINFO hDevInfo;
	SP_DEVINFO_DATA DeviceInfoData;
	DWORD i;
	// Create a HDEVINFO with all present devices.
	hDevInfo = SetupDiGetClassDevs((LPGUID)&GUID_DEVCLASS_PORTS,
									0, // Enumerator
									0,
									DIGCF_PRESENT);
 
	if (hDevInfo == INVALID_HANDLE_VALUE)
	{
		// Insert error handling here.
		ShowMessage ("Erreur hDevInfo");
		// return ;
	}
 
	// Enumerate through all devices in Set.
 
	DeviceInfoData.cbSize = sizeof(SP_DEVINFO_DATA);
	for (i=0;SetupDiEnumDeviceInfo(hDevInfo,i, &DeviceInfoData);i++)
	{
		DWORD DataT;
		LPTSTR buffer = NULL;
		DWORD buffersize = 0;
 
		//
		// Call function with null to begin with,
		// then use the returned buffer size (doubled)
		// to Alloc the buffer. Keep calling until
		// success or an unknown failure.
		//
		//  Double the returned buffersize to correct
		//  for underlying legacy CM functions that
		//  return an incorrect buffersize value on
		//  DBCS/MBCS systems.
		//
		while (!SetupDiGetDeviceRegistryProperty(hDevInfo,
													&DeviceInfoData,
													SPDRP_HARDWAREID,
													&DataT,
													(PBYTE)buffer,
													buffersize,
													&buffersize))
		{
 
			if (GetLastError() == ERROR_INSUFFICIENT_BUFFER)
			{
				// Change the buffer size.
				if (buffer) LocalFree(buffer);
				// Double the size to avoid problems on
				// W2k MBCS systems per KB 888609.
				// soit
				// buffer = (char*)LocalAlloc(LPTR, buffersize * 2);
				// ou
				buffer = (PCHAR)LocalAlloc(LPTR, buffersize * 2);
			}
			else
			{
				// Insert error handling here.
				break;
			}
		}
 
        // On véréfie si c'est le bon hardware
		//if(strnicmp(buffer, "USB\\VID_0403&PID_6001", 21) == 0)
		if((stricmp(buffer, "FTDIBUS\\COMPORT&VID_0403&PID_6001")) == 0
					|| (stricmp(buffer, "USB\\VID_10C4&PID_EA60&REV_0100")) == 0)
		{
			HKEY hKey;
			char szPortName[256] = "";
			DWORD len = 256;
 
			hKey = SetupDiOpenDevRegKey(hDevInfo, &DeviceInfoData, DICS_FLAG_GLOBAL, 0, DIREG_DEV, KEY_READ);
			RegQueryValueEx(hKey, "PortName", NULL, NULL, szPortName, &len);
			RegCloseKey(hKey);
 
			COM = "\\\\.\\" + AnsiString(szPortName);
 
			//MemoPort->Lines->Add("Il faut me connecter à " + COM);
 
			/****************************************************
                        * Ici tu te connecte avec: CreateFile(COM.c_str(),GENERIC_READ|GENERIC_WRITE,0,NULL,OPEN_EXISTING,0,NULL);
                        *******************************************************/
 
            hdl = CreateFile(COM.c_str() ,GENERIC_READ | GENERIC_WRITE, 0, NULL, OPEN_EXISTING, 0, NULL);
 
			if (hdl == INVALID_HANDLE_VALUE)
			{
				//printf("erreur %d\n",GetLastError());
 
				//return (1);
				ShowMessage ("erreur Ouverture COM");
			}
			else
			{
 
				FormClient->Connexion1->Enabled = false;
				FormClient->Deconnexion1->Enabled = true;
 
				SetupComm(hdl,5000,5000);
				//printf ("Ouverture COM reussie !\n\n");
				//ShowMessage ("Ouverture COM réussie");
				etat=GetCommState(hdl, &dcb);
 
				if (etat==false)
				{
					//printf ("GetCommState erreur %d\n", GetLastError());
					//return (2);
					ShowMessage ("erreur GetCommState");
					Terminate();
				}
				else
				{
					//printf ("GetCommState reussie\n\n");
					//ShowMessage ("GetCommState réussie");
 
				}
 
 
 
				dcb.BaudRate = CBR_38400;
				dcb.ByteSize = 8;
				dcb.Parity = NOPARITY;
				dcb.StopBits = ONESTOPBIT;
 
 
				etat=SetCommState(hdl,&dcb);
 
				if (etat==false)
				{
					//printf ("SetCommState erreur %d\n", GetLastError());
					//Sleep (2000);
					//return (3);
					ShowMessage ("erreur SetCommState");
				}
				else
				{
					//printf ("Vitesse : %d baud\n", dcb.BaudRate);
					//printf ("Bits de donnees : %d bits\n", dcb.ByteSize);
					//printf ("Parite : %s\n", dcb.Parity);
					//printf ("Bits de stop : 1 bit\n\n");
 
					//printf ("Com serie configuree !\n\n");
					//Sleep (2000);
					//ShowMessage ("Com serie configuree !");
				}
 
				int TimeoutRead=500;
				timeouts.ReadIntervalTimeout=MAXWORD;
				timeouts.ReadTotalTimeoutMultiplier=0;
				timeouts.ReadTotalTimeoutConstant=TimeoutRead;
				timeouts.WriteTotalTimeoutMultiplier=0;
				timeouts.WriteTotalTimeoutConstant=0;
 
				etat=SetCommTimeouts(hdl,&timeouts);
 
				if (etat==false)
				{
					//printf ("TimeOuts erreur %d\n", GetLastError());
					//return (4);
					ShowMessage ("Erreur TimeOuts");
				}
				else
				{
					//printf ("TimeOuts initialises\n\n");
					//ShowMessage ("TimeOuts initialisés");
 
				}
 
 
				int i=1;
 
 
				while (1)
				{
 
					if (Suspended == true )
					{
 
						//Terminate();
						CloseHandle(hdl);
 
					}
					else
					{
 
 
					ReadFile(hdl,buf,sizeof (buf),&nblu,NULL);
					if (etat==-1)
					{
						//printf ("Erreur lecture port : erreur %d\n\n", GetLastError());
						ShowMessage ("Erreur lecture port");
					}
 
 
 
 
					if (nblu==18)
					{
 
						//for (buf [i]; i < 18; i++)
						//{
							//printf ("Octets lus %d: %X\n\n", i, buf[i]);
 
 
 
 
						//}
 
 
						TDateTime Date;
						Date = Now();
						ShortDateFormat = "dd.mm.yyyy";
						//LongTimeFormat = "hh'h'nn'm'";
						LongTimeFormat = "hhnn";
						AnsiString nom = "C:\\Users\\Olivier\\Desktop\\" + Date.DateString() + "-" + ((buf[4] << 16) + (buf[5] << 8) + buf[6]) + ".gm";
						AnsiString NumSerie = ((buf[4] << 16) + (buf[5] << 8) + buf[6]);
 
 
						fichier = fopen (nom.c_str() ,"a+");
						if (fichier==NULL)
						{
							//printf ("Erreur creation fichier : erreur %d\n\n", GetLastError());
							ShowMessage ("Erreur création fichier");
						}
						//else
						//{
							//printf ("Creation fichier reussie\n\n");
							//ShowMessage ("Création fichier réussie");
						//}
 
 
						int index = -1;
                        index = FormClient->JvgTabControlFlotteurs->Tabs->IndexOf(NumSerie);
 
						for (int n = 0; n <= FormClient->JvgTabControlFlotteurs->Tabs->Count ; n++)
						{
 
							AnsiString chaine = FormClient->JvgTabControlFlotteurs->Tabs->GetText();
 
							if ( chaine == NumSerie )
							{
                             	index = n;
								break;
							}
 
						}
 
						if(index == -1)
						{
							FormClient->JvgTabControlFlotteurs->Tabs->Add(NumSerie);
						}
						else
						{
							FormClient->JvgTabControlFlotteurs->TabIndex = index;
 
						}
 
 
 
 
 
 
 
 
 
						// Numéro de série
 
						int j=0;
						rewind(fichier);
 
						// Boucle de lecture des caractères un à un
						while (fgetc(fichier) != EOF)
						{
 
							j++;
						}
 
 
						if (j==0)
						{
							fprintf (fichier, "\n\n");
							fprintf (fichier, "%X",  buf[4]);
							fprintf (fichier, "%X",  buf[5]);
							fprintf (fichier, "%X",  buf[6]);
						}
 
 
 
 
 
						// Mesure du PH
 
						fprintf (fichier, "\n%.2f", (float)buf[9]/10.0);
						fprintf (fichier, " ");
						FormClient->FastLineSeriePH->AddXY( i, ((float) buf [9]/10.0), i, clBlue);
 
						/*if ((buf[9]/10.0) < 10.5)
						{
								//PlaySound ("Alerte.mp3");
								FormClient->MediaPlayerAlerte->Open();
								FormClient->MediaPlayerAlerte->Play();
						}*/
 
						// Mesure de la conductivité
 
						if ( buf[12] != 0)
						{
 
							short int conductivite = ( buf[12]*256 + buf [11]);
 
							fprintf (fichier, "%.2f", (float) conductivite/10.0);
 
 
							fprintf (fichier, " ");
							FormClient->FastLineSerieConductivite->AddXY( i, (float) (conductivite/10.00) , i, clGreen);
						}
						else
						{
							fprintf (fichier, "%.2f", (float)buf[11]/10.0);
							fprintf (fichier, " ");
							FormClient->FastLineSerieConductivite->AddXY( i, ((float) buf [11]/10.00), i, clGreen);
						}
 
						// Mesure de la température
 
						if ( buf[14] != 0)
						{
 
							short int temp = ( buf[14]*256 + buf [13]);
 
							fprintf (fichier, "%.1f", (float) (temp/10.0));
 
 
							fprintf (fichier, " ");
							FormClient->FastLineSerieTemperature->AddXY( i, (float) (temp/10.0) , i, clRed);
						}
						else
						{
							fprintf (fichier, "%.1f", (float)buf[13]/10.0);
							fprintf (fichier, " ");
							FormClient->FastLineSerieTemperature->AddXY( i, ((float) buf [13]/10.0), i, clRed);
						}
 
 
 
 
							fprintf (fichier, "%s" , Date.TimeString() );
 
 
 
							//printf ("Stockage \n\n");
							//ShowMessage ("Stockage ");
							//FormClient->FileListBoxFichiers->Update();
 
							fclose (fichier);
							i++;
 
 
 
							leFichier = new TStringList();
 
							// Chargement de la liste
							leFichier->LoadFromFile(nom.c_str());
 
							// Affichage du numéro de série
							FormClient->EditNumSerie->Text = leFichier->Strings[2];
 
							// Afficher dernière valeur du PH
							AnsiString DataPH = leFichier->Strings[leFichier->Count-1];
							int iPosPH = DataPH.AnsiPos(" ");
							AnsiString PH = DataPH.SubString(1,iPosPH);
							FormClient->EditPH->Text = PH;
 
							// Afficher dernière valeur de la conductivité
							AnsiString DataConductivite = leFichier->Strings[leFichier->Count-1];
							int iPosConductivite = DataConductivite.AnsiPos(" ");
							AnsiString Conductivite = DataPH.SubString(6,iPosConductivite);
							FormClient->EditConductivite->Text = Conductivite;
 
                            // Afficher dernière valeur de la température
							AnsiString DataTemperature = leFichier->Strings[leFichier->Count-1];
							int iPosTemperature = DataTemperature.AnsiPos(" ");
							AnsiString Temperature = DataTemperature.SubString(11,iPosTemperature);
							FormClient->EditTemperature->Text = Temperature;
 
                            // Afficher dernière prise de mesures
							AnsiString DataHeure = leFichier->Strings[leFichier->Count-1];
							int iPosHeure = DataHeure.AnsiPos(" ");
							AnsiString Heure = DataHeure.SubString(16,iPosHeure);
							AnsiString FormatHeure = Heure.Insert(" h ",3) + " min";
							FormClient->EditHeure->Text = FormatHeure;
 
							AnsiString Titre = ExtractFileName (nom);
							AnsiString laDate = Titre.Delete(11,20);
							FormClient->EditDate->Text = laDate;
 
							delete leFichier;
 
 
 
					}
 
				}
 
			}
 
 
 
 
 
 
 
	}
 
 
		}
 
 
		//MemoPort->Lines->Add(buffer);
		if (buffer) LocalFree(buffer);
 
	}
 
 
	if ( GetLastError()!=NO_ERROR && GetLastError()!=ERROR_NO_MORE_ITEMS )
	{
		// Insert error handling here.
		// return ;
	}
 
	//  Cleanup
	SetupDiDestroyDeviceInfoList(hDevInfo);
	//MemoPort->Lines->Add("Nb perifs " + AnsiString(i));
	// return ;

**pottiez** · 16/10/2008, 15h26

Bon, j'ai pas tout décrypté ton code, mais je vois en gros ce que tu veut faire, je vois en gros comment le faire, mais je vois pas (en gros

) comment te l'expliquer.

Ici tu lit un port (apparemment USB) et tu met tes valeurs directement dans un graphique via cette ligne de code notamment :

Code :

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

FormClient->FastLineSerieTemperature->AddXY( i, ((float) buf [13]/10.0), i, clRed);

Le truc c'est que c'est le même graphique pour tout tes numéros de séries alors que toi tu veut un graphique par numéros de série.
Il faut donc lorsque tu reçoit tes données, tu ne les ajoute pas dans ton graphique, tu les ajoute dans une variable ou tu va enregistrer toutes tes données, et pour les retrouver plus facilement, tu va les trier directement dans cette variable (par rapport au numéros de série).
Ensuite on fera l'affichage dans le graphique des valeurs en fonction des numéros de série.

As-tu déjà compris le principe, l'idée de départ ?

**petitclem** · 16/10/2008, 15h44

Le truc c'est que c'est le même graphique pour tout tes numéros de séries alors que toi tu veut un graphique par numéros de série.
Il faut donc lorsque tu reçoit tes données, tu ne les ajoute pas dans ton graphique, tu les ajoute dans une variable ou tu va enregistrer toutes tes données, et pour les retrouver plus facilement, tu va les trier directement dans cette variable (par rapport au numéros de série).
Ensuite on fera l'affichage dans le graphique des valeurs en fonction des numéros de série.

Alors non, j'ai trois graphiques par tabs (donc 3 graphes par numéro de série) et pas 1 graphes par numéro série (par tabs).

Et ce que j'ai compris de ton explication : c'est que les 3 données (des 3 graphes différents) je les stocke dans une variable (au lieu de les afficher directement), puis après ...

euh !

**pottiez** · 16/10/2008, 15h51

Le fait que ce soit 1 ou 3 graphs ne change rien sur le principe, si tu réussi à le faire pour 1, tu réussi pour les trois

Envoyé par petitclem

Et ce que j'ai compris de ton explication : c'est que les 3 données (des 3 graphes différents) je les stocke dans une variable (au lieu de les afficher directement), puis après ...

euh !

C'est tout a fait ca, après il faut gérer l'affichage des graphs.
Tu es d'accord avec moi que les graphs change lorsque tu change d'onglet ou lorsque de nouvelles données arrives

Tu va donc faire une fonction qui va prendre les données correspondant au numéro de série du tab dans les variables et les afficher dans le(s) graph(s).

Cette fonction tu va donc l'appeler a chaque fois que tu va changer de tab ou lorsque des données seront arrivé.

Tu me suis toujours ?

**henderson** · 16/10/2008, 15h51

Salut !

TStrings sait gérer deux listes en simultané : Items[] ou Strings[] (le caption des Tabs) et Objects[] (un objet associé à l'item) !
Donc : faire un tour dans l'aide : TStrings::Objects et TStrings::AddObject

Tu as une option possible en associant à chaque tab son propre conteneur de données qui doivent persister afin de les transmettre aux graphes pour qu'ils se redessinent.
Il ne pas oublier qu'ici, on peut développer des objets excessivement intelligents !

C'est le genre de truc qui devrait te faciliter la vie !

A plus !

**petitclem** · 16/10/2008, 16h54

Salut !

TStrings sait gérer deux listes en simultané : Items[] ou Strings[] (le caption des Tabs) et Objects[] (un objet associé à l'item) !
Donc : faire un tour dans l'aide : TStrings::Objects et TStrings::AddObject

Tu as une option possible en associant à chaque tab son propre conteneur de données qui doivent persister afin de les transmettre aux graphes pour qu'ils se redessinent.
Il ne pas oublier qu'ici, on peut développer des objets excessivement intelligents !

C'est le genre de truc qui devrait te faciliter la vie !

A plus !

Je pense que cette méthode doit mieux convenir mais je ne sais pas comment l'utiliser.
Je suis allé voir dans l'aide mais ce n'est pas bien expliqué, je travaille sous BC++ 2007 !!!

**petitclem** · 17/10/2008, 09h21

Peux tu me montrer un exemple d'application de TStrings::Objects et TStrings::AddObject henderson stp ?

Je ne sais vraiment pas comment utiliser ceci !

J'essaie de faire un truc du style :

Code :

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

1
2
 
FormClient->JvgTabControlFlotteurs->Tabs->AddObject(const AnsiString, Tobject *);

Mais est ce que c'est bien une des fonction à utiliser ?
Et je ne sais pas quels paramètres il faut rentrer dans les parenthèses !

**henderson** · 17/10/2008, 12h00

Salut !

Par exemple pour faire un PageControl à l'aide d'un TabControl.
Je me replace dans ton contexte (tout en restant dans le mien : TTabControl) et je ne fait ici qu'illustrer :

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
 
AnsiString Nom;
 
TPanel *Panel;
int n = TabControl->Tabs->IndexOf(Nom);
if(n < 0)
    {
    Panel = new TPanel(TabControl);
    Panel->Parent = TabControl;
    Panel->Align = alClient;
    TabControl->Tabs->AddObject( Nom, Panel );
    }
else
    {
    Panel = TabControl->Tabs->Objects[ n ];
    Panel->BringToFront();
    }

Dans la OnChange on fait :

Code :

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

1
2
3
4
5
6
7
8
 
TPanel *Panel;
int n = TabControl->TabIndex;
if(n >= 0)
    {
    Panel = TabControl->Tabs->Objects[ n ];
    Panel->BringToFront();
    }

Dans ton cas, on aurait intérêt à modéliser un objet en dérivant de TPanel sachant créer pour lui même les 3 graphes... !!!
La solution ne serait pas économique mais comme chaque graphe maintient ses propres données on n'aurait pas à s'en préoccuper !
A noter qu'il existe une deuxième façon de faire an jouant sur la visibilité des Panels.
Dans ce cas, on utilise conjointement OnChanging pour rendre invisible le panel avant le changement !

On peut utiliser la proriété Objects avec n'importe quel type de classe mais il vaut mieux employer des classes qui dérivent de TComponent (pour ne pas avoir à se préoccuper de leur destruction).
Donc si on fait fonctionner le TabControl avec un seul panel (lui-même) dans ce cas il faut bien stocker les infos quelque part pour rafraichir les 3 graphes qui sont utilisés par l'ensemble des tabs (chacun leur tour).
Comme je ne sais pas ce qu'il faut sauvegarder, voici le point de départ :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
class jData : public TComponent
{
public :
//Variables à préserver
//...
    __fastcall jData(TComponent *AOwner);
    __fastcall jData(TComponent *AOwner, Byte *Buffer);
    __fastcall ~jData();
//Méthodes pour actualiser ou pour faire écho dans les graphes
//...
};

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
 
__fastcall jData::jData(TComponent *AOwner)
    : TComponent(AOwner)
{
//Il peut créer des objets pour lui-même, 
//exemple on suppose en public int *D;
//donc : D = new int[...]; // ou malloc avec l'idée de realloc ?
//Mais à ce stade rien ne sera initialisé sauf sur un plan basique
}
 
__fastcall jData::jData(TComponent *AOwner, Byte *Buffer)
    : TComponent(AOwner)
{
//Mêmes remarque que pour le constructeur précédent sauf qu'ici on donne 
//à l'objet un moyen d'initialser ses variables avec le contenu du Buffer 
//passé en paramètre ... ... ...
}
 
__fastcall jData::~jData()
{
//Il devra détruire les objets qu'il a créé
//par exemple : delete [] D; // ou free(D) si malloc 
}

On devra donc créer un jData à chaque nouveau Tab et procéder comme pour le reste, mise à part le fait que jData n'est pas un objet visuel et qu'il ne doit servir qu'à initialiser les graphes.
Donc il faudra rajouter quelques méthodes à la classe jData !

A noter que le nom "jData" n'est qu'anecdotique ...j'aurais pu prendre "jFlotteur" !

J'espère ne pas avoir été trop long !

A plus !

**petitclem** · 17/10/2008, 12h46

merci henderson pour ton aide !

Alors j'ai essayer de faire à peu près la même chose pour mon application mais j'ai une erreur sur cette ligne :

Code :

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

1
2
 
(FormClient->ChartPH) = FormClient->JvgTabControlFlotteurs->Tabs->Objects [ index ];

L'erreur dit : [BCC32 Erreur] UClient.cpp(538): E2034 Impossible de convertir 'TObject *' en 'TChart *'

**henderson** · 17/10/2008, 13h08

Salut !

Parce que... TObject *Objects[] !!!

Il faut donc transtyper sur le type de destination :

Code :

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

1
2
 
.... = (TChart*)FormClient->JvgTabControlFlotteurs->Tabs->Objects [ index ];

On est donc bien d'accord qu'au préalable on aura fait :

Code :

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

1
2
 
FormClient->JvgTabControlFlotteurs->Tabs->AddObject(..., ...);

Sans quoi ...Objects[ index ] renverra NULL !!!

A plus !

**petitclem** · 17/10/2008, 15h53

Merci pour tes explications henderson !

Alors j'ai fait comme ceci :

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
 
if(index == -1)
{
 
 
FormClient->ChartPH->Parent = FormClient->JvgTabControlFlotteurs;
							FormClient->JvgTabControlFlotteurs->Tabs->AddObject( NumSerie, FormClient->ChartPH);
 
}
else
{
 
FormClient->ChartPH = (TChart *) FormClient->JvgTabControlFlotteurs->Tabs->Objects [ index ];
							FormClient->ChartPH->BringToFront();
 
}

et dans le OnChange :

Code :

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

1
2
3
4
5
6
7
 
int index = FormClient->JvgTabControlFlotteurs->TabIndex;
if(index >= 0)
{
FormClient->ChartPH = (TChart *) FormClient->JvgTabControlFlotteurs->Tabs->Objects [ index ];
FormClient->ChartPH->BringToFront();
}

Alors je sais pas si j'ai bien tout à fait compris ce que tu m'as expliqué !
Car pour mettre les infos dans mes graphes, comment puis je caler ceci par exemple :

Code :

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

1
2
 
FormClient->FastLineSeriePH->AddXY( i, ((float) buf [9]/10.0), i, clBlue);

**henderson** · 17/10/2008, 19h29

Salut !

Je ne pense pas que ce soit le bon truc !
L'idée est de créer pour chaque nouveau NumSerie son propre TChart !

Code :

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

1
2
3
4
5
6
7
8
9
10
 
if(index == -1)
{
//Nouvelle instance de TChart
TChart *Chart = new TChart(FormClient);
Chart->Parent = FormClient->JvgTabControlFlotteurs;
Chart->SetBounds(..., ..., ..., ...); // ou jouer avec Align 
//initialiser Chart... et pour finir
FormClient->JvgTabControlFlotteurs->Tabs->AddObject( NumSerie, Chart );
}

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
else
{					
TChart *Chart = (TChart *)FormClient->JvgTabControlFlotteurs->Tabs->Objects[ index ];
//Actualiser les données de Chart 
//puisque ça doit être le but (sauf si je me trompe)
//... donc c'est ici que l'on traite la série
//Si on doit faire écho de ce que l'on vient de recevoir immédiatement
FormClient->JvgTabControlFlotteurs->TabIndex = index;
// donc ça va solliciter OnChange et OnChanging 
}

Dans la OnChange :

Code :

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

1
2
3
4
5
 
int n = FormClient->JvgTabControlFlotteurs->TabIndex;
if(n == -1) return; // sécurité au cas où		
TChart *Chart = (TChart *)FormClient->JvgTabControlFlotteurs->Tabs->Objects[ n ];
Chart->BringToFront();

Si on joue avec la visiblité :

Dans la OnChange :

Code :

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

1
2
3
4
5
6
 
//nouveau TabIndex
int n = FormClient->JvgTabControlFlotteurs->TabIndex;
if(n == -1) return; // sécurité au cas où
TChart *Chart = (TChart *)FormClient->JvgTabControlFlotteurs->Tabs->Objects[ n ];
Chart->Visible = true;

Dans la OnChanging (qui est sollicitée avant OnChange):

Code :

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

1
2
3
4
5
6
 
//TabIndex avant le changement
int n = FormClient->JvgTabControlFlotteurs->TabIndex;
if(n == -1) return; // sécurité au cas où
TChart *Chart = (TChart *)FormClient->JvgTabControlFlotteurs->Tabs->Objects[ n ];
Chart->Visible = false;

A plus !

**petitclem** · 20/10/2008, 16h59

Bonjour,

alors j'ai bien essayé tes conseils henderson mais cela ne donne toujours rien ... enfin pas ce que je cherche à faire du moins : j'ai bien 2 tabs pour 2 numéro de série donc c'est bon, mais les données s'appliquant pour un graphe d'une tab (donc d'un numéro de série) s'affichent dans le graphe de la tab qui lui est propre et aussi dans le graphe de l'autre tab !!!!!

Après, je me suis dit : comme j'enregistre toutes ces données dans des fichiers (2 fichiers car 2 numéro de série ...) alors pourquoi pas ouvrir le fichier, prendre l'info qui intéresse et l'afficher dans le bon graphe de la bonne tab !!!

Et bien, j'ai l'impression que c'est le même problème

J'ai fait comme ceci :

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
 
leFichier = new TStringList();
 
// Chargement de la liste
leFichier->LoadFromFile(nom.c_str());
 
if(index == -1)
{
 
	TChart *Chart1 = new TChart(Form1);
	Form1->Chart1->Parent = Form1->JvgTabControl1;
 
 
	Form1->JvgTabControl1->Tabs->AddObject( NumSerie, Chart1);
 
}
else
{
 
        Form1->Chart1 = (TChart *) Form1->JvgTabControl1->Tabs->Objects [ index ];
 
 
        Form1->JvgTabControl1->TabIndex = index;
 
        Form1->Series1->RefreshSeries();
        for(int i=3; i< leFichier->Count; i++)
        {
 
 
	           Form1->Colonnes(leFichier->Strings[i]);
                  Form1->Series1->AddXY(i , Form1-> TabGraph[0], (i-2), clBlue);
 
 
 
         }
 
}
 
delete leFichier;

**petitclem** · 22/10/2008, 09h37

Bonjour,

hum, bon j'ai repris l'idée de départ et j'ai fait ceci :

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
 
if(index == -1)
{
	maChart = new TChart(Form1);
	Serie = new TFastLineSeries(Form1);
	maChart->Parent = Form1->JvgTabControl1;
	maChart->SetBounds(120,75,600,200);
	Serie->ParentChart = maChart;
 
	Form1->JvgTabControl1->Tabs->AddObject( NumSerie, maChart);
 
 
	Form1->Refresh();
 
}
else
{
	maChart = (TChart *) Form1->JvgTabControl1->Tabs->Objects [ index ];
 
	Serie->AddXY( 1, 50," ", clBlue);
	Form1->JvgTabControl1->TabIndex = index;
 
	//Form1->Series1->AddXY( i, ((float) buf [9]/10.0), i, clBlue);
 
 
 
}

Je ne sais pas trop quoi mettre dans le "else" ensuite !
De l'aide s'il vous plait !

**henderson** · 22/10/2008, 10h36

Salut !

Dans le if tu crées un Chart et lui associe une Série, ensuite le chart et associé au nouveau Tab.
Ensuite pour positonner le TabControl sur le dernier tab (pour faire écho de ce que l'on vient de faire):

Code :

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

1
2
3
 
TabControl->TabIndex = TabControl->Tabs->Count-1;
MaChart->BringToFront();

Dans le else, tu récupères le Chart associé à l'un des Tabs donc c'est à la série de ce chart là qu'il faut ajouter le point.
Pour faire écho de ce qui vient d'être actualisé :

Code :

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

1
2
3
 
TabControl->TabIndex = index; // index renvoyé par IndexOf(...)
MaChart->BringToFront();

Donc dans la OnChange du TabControl :

Code :

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

1
2
3
4
5
6
 
int n = TabControl->TabIndex:
if(n != -1)
    {
    ((TChart*)TabControl->Tabs->Objects[n])->BringToFront();
    }

A plus !

**petitclem** · 22/10/2008, 11h31

Encore merci henderson, mais ça ne marche toujours pas et je commence à me dire que je dois être vraiment mauvais !

J'ai fait comme ceci :

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
 
int index = Form1->JvgTabControl1->Tabs->IndexOf(NumSerie);
TFastLineSeries *Serie;
 
if(index == -1)
{
	TChart * maChart;
 
	maChart = new TChart(Form1->JvgTabControl1);
	Serie = new TFastLineSeries(maChart);
	maChart->SetBounds(120,75,600,200);
	Serie->ParentChart = maChart;
	maChart->Parent = Form1->JvgTabControl1;
 
	Form1->JvgTabControl1->TabIndex = Form1->JvgTabControl1->Tabs->Count-1;
        Form1->JvgTabControl1->Tabs->AddObject( NumSerie, maChart);
 
	maChart->BringToFront();
        Form1->Refresh();
 
}
else
{
	TChart *maChart = (TChart *) Form1->JvgTabControl1->Tabs->Objects [ index ];
 
        Serie->AddXY( 1, 50," ", clBlue);
	Form1->JvgTabControl1->TabIndex = index;
	maChart->BringToFront();
	Form1->Refresh();
	//Form1->Series1->AddXY( i, ((float) buf [9]/10.0), i, clBlue);
}

Et dans le onChange :

Code :

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

1
2
3
4
5
6
 
int n = Form1->JvgTabControl1->TabIndex == n;
if(n != -1)
{
    ((TChart*)Form1->JvgTabControl1->Tabs->Objects[n])->BringToFront();
}

**petitclem** · 22/10/2008, 17h01

Bon, et bien je commence à faire n'importe quoi !

Déjà, comment par exemple dire que un bouton est affecté (et s'affiche) dans une tab et pas une autre svp ?

**petitclem** · 23/10/2008, 09h57

Bonjour

,

alors j'ai essayé de créer un bouton affecté à la Tab d'index 0 (et uniquement à celle-ci), je l'ai fait à la création de la Form, ça donne cela :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
Form1->JvgTabControl1->Tabs->Add(ici);
Form1->JvgTabControl1->TabIndex = 0;
TButton * monBouton = new TButton ((void *)(Form1->JvgTabControl1->TabIndex == 0));
monBouton->Parent = Form1->JvgTabControl1;
monBouton->Caption = "appui";
monBouton->SetBounds(150,50,100,50);
 
Form1->JvgTabControl1->TabIndex = 1;
Form1->JvgTabControl1->Tabs->Add("test 2");