Discussion :

[freestyler]

j'ai une stringGrid qui affiche les différents enregistrements d'une vue BDD!
il s'agit d'une vue des différents droits pour un utilisateur donné.

chaque droit est à 2 états : Actif ou Inactif

je voudrais dériver d'un droit donné (DROIT1) mis à Actif deux autres droits.. càd que si DROIT1 est Actif, ma StringGrid se rallonge ou bien montre deux lignes supplémentaires (ou cachées) pour paramétrer ces 2 droits..

je ne sais pas comment faire car la stringGrid fait intervenir toutes les lignes de la vue, du coup où faire le traitement de la condition if Actif.. et ça devrait avoir quelle tete??

merci

[PadawanDuDelphi]

Bonjour,

Je suis pas sur d'avoir tout compris...Ce que tu veux c'est afficher un nombre de ligne différent de ton StringGrid en fonction d'une variable??

[freestyler]

non..
j'ai deux enregistrements de ma vue que je veux afficher sauf si DROIT1 est actif.

plus en détails, ma vue a cette tete la :

Droit Statut
***************
Droit1 Actif
Droit2 Actif
Droit3 Inactif
Droit4 Inactif
Droit5 Actif

ma stringGrid afficherait en principe les 5 enregistrements..
sauf que je ne veux (par ex) qu'afficher les droits 1, 2, et 5 (si DROIT1 Inactif).. Si Droit1 est Actif, j'afficherai alors les 5 enregistrements..

d'une autre manière, l'utilisateur ne peut modifier les droits 3 et 4 que si droit 1 est actif

[PadawanDuDelphi]

Ce que j'arrive pas à comprendre, c'est que contrairement à un DBGrid, c'est toi qui choisis ce que tu veux afficher dans un StringGrid...

Donc il te suffit de récupérer le statut de ton droit1, et ensuite dans ta fonction d'affichage du stringGrid, tu affiche ce que tu veux...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
procedure TForm2.Afficherstringgrid(str : tstringgrid, statut:boolean);
str.FixedCols:=1; //nombre de colonne fixe (gris)
str.ColCount:=2;
 if statue = true then
str.RowCount:=6;
 ... Affichage de tout des droits...
 end else
begin
  str.RowCount:=4;;
 ...Affichage des droits que tu souhaite...
end;

[freestyler]

c des lignes spécifiques que je veux cacher ou afficher au besoin!

le problème c'est qu'il n'ya pas une property hide ou enabled pour un Row de stringGrid!

[PadawanDuDelphi]

Ok,
je maîtrise pas a fond le stringGrid....
Mais tu peux les créer toi même ces fonctions.

Exemple:
Tu peux créer une class héritée de ton stringgrid dans laquelle du défini un tableau de boolean, et dans ta fonction affichage tu n'affiche que des indices de ton tableau qui sont a true.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
procedure afficher
.......
begin
  for i:=0 to length(TaTableBoolean) do
 begin
    if TaTableBoolean[i]=true then
      begin
          str.RowCount:=str.RowCount+1;
          Str[0,i] := droit;
          Str[1,i] := statut;
      end;
 end;
end;

Et tu crée des fonctions qui agissent sur ton tableau de boolean, du genre:

Code :

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

1
2
3
4
procedure setTableau(indice:integer;valeur:boolen);
begin
TaTableBoolean[indice] := valeur;
end;

Mais après c'est toi qui code ça comme tu veux...