stringGrid et BDD

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

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??

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

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:

---

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;

---

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!

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:

---

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:

---

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...

Salut ! ;)

Avec l'évènement OnDrawCell du StringGrid, tu peux décider de ce que tu veux dessiner dans chaque cellule. Il faut d'abord mettre la propriété DefaulDrawing à False et double cliquer sur OnDrawCell pour créer automatiquement la procédure correspondante dans ton code. Dans cette procédure, tu affiches le texte de chaque cellule via le Canvas de la grille, excepté si le droit1 n'est pas actif. Cela pourrait donner un code ressemblant à ceci, en imaginant que le champs droit1 est la colonne n° 5, le champs droit2 la colonne n°6, etc... A noter que la 1ère colonne et la 1ère ligne de la StringGrid possèdent l'index 0 :

Code:

---

1 2 3 4 5 6 7

Procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState); Begin If (ACol <= 5) Or ((ACol > 5) And (StringGrid1.Cells[5, ARow] = 'Actif')) Then StringGrid1.Canvas.TextOut(Rect.Left, Rect.Top, StringGrid1.Cells[ACol, ARow]); End;

---

J'en profite pour faire ma pub : http://sub0.developpez.com/tutoriel/delphp/
à+