Bonjour à tous!
voici , j'ai un probleme avec mon composant PageControl.
Mon composant PageControl a trois feuilles (Tabsheet) et à côté de ce composant, j'ai trois composant TDBChart ; chaque TBDChart donne un graphique selon que l'onglet du PageControl change . J'ai supperposé les TDBChart les uns sur les autres.
- Dans le premier onglet , je calcule les recettes et j'affiche le graphique des recettes dans un TBDChart.
- Dans le second onglet , je calcule les entrees de caisse et j'affiche aussi le graphique correspondant
- dans les troisième onglet , je calcule les sorties et j'affiche le graphique .
ce qui dit , lorsque je passe d'un onglet à l'autre , je voudrais voir le graphique correspondant.
au prealable, j'ai mis dans l'evenement OnShow de la form TDBChart des recettes à visible = true et les autres à visible = false afin de voir lorsque la feuille s'ouvre les recettes et le graphique.
mais j'ai fait ceci ensuite:
lorsque j'execute ce code, lorsque je passe d'un onglet à l'autre, ça marche; mais lorsque je reviens sur un onglet que j'ai deja vu et que je voudrais de nouveau voir , le TDBChart ne change pas, il reste sur le dernier TDBChart vu.
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 procedure TStatistiqueForm.PageControl1Change(Sender: TObject); begin if Pagecontrol1.ActivePage = Tabsheet1 then begin ChartRecette.Visible:=True; end; if Pagecontrol1.ActivePage = Tabsheet2 then begin ChartEntree.Visible:=True; end; if Pagecontrol1.ActivePage = Tabsheet3 then begin ChartSortie.Visible:=True; end; end;
je ne sais comment pallier à cela.
Merci de votre aide.
Partager