Frame3D sur stringgrid

Bonjour,

Je recherche une aide sur Frame3D, impossible à trouver sur le net.

Si j'ai bien compris sur les sites anglais, ca donne un effet "enfoncé".

Donc j'essaie de l'appliquer sur une cellule de mon stringgrid.

Code:

---

Frame3D(Canvas,Rect,clGray,clWhite,2);

---

ou

Code:

---

StringGrid1.Canvas.Frame3D(Canvas,Rect,clGray,clWhite,2);

---

ou

Code:

---

StringGrid1.Canvas.Frame3D(StringGrid1.Canvas,Rect,clGray,clWhite,2);

---

Evidemment, ce n'est pas ca. Merci de votre aide.

PS : à quoi correspond 2 ?

Salut :)

Citation:

---

Envoyé par yannba

Evidemment, ce n'est pas ca. Merci de votre aide.

---

C'est à dire? Ca ne marche pas? Ca n'affiche pas les bonnes couleurs?

Citation:

---

Envoyé par yannba

PS : à quoi correspond 2 ?

---

C'est l'épaisseur du trait de la Frame. Si tu veux faire un effet "à la Windows" l'épaisseur sera toujours égale à 1 ;)
Par exemple, pour afficher une Frame3D comme un TSpeedButton (bords fins):

Code:

---

1 2 3

aRect := Rect(aLeft, aTop, aLeft + aWidth, aTop + aHeight); Frame3d(Canvas, aRect, clBtnHighlight, clBtnShadow, 1);

---

aRect étant de type TRect.
Si toutefois, tu veux faire un effet façon TButton (bords plus épais), il faut faire 2 Frame3D de couleur différente:

Code:

---

1 2 3 4 5

aRect := Rect(aLeft, aTop, aLeft + aWidth, aTop + aHeight); Frame3D(Canvas, aRect, clBtnFace, cl3DDkShadow, 1); InflateRect(aRect); Frame3d(Canvas, aRect, clBtnHighlight, clBtnShadow, 1);

---

Evidemment, lorsque le bouton est cliqué, il faut tout inverser ;)
Voila :)

Merci de ton aide, mais :

Code:

---

1 2 3 4 5

procedure TFrmMain.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;Rect: TRect; State: TGridDrawState); var aRect: Trect; begin aRect := Rect(aLeft, aTop, aLeft + aWidth, aTop + aHeight);

---

[Erreur] Main.pas(80): E2066 Opérateur ou point-virgule manquant
[Erreur] Main.pas(80): E2003 Identificateur non déclaré : aWidth
[Erreur] Main.pas(80): E2003 Identificateur non déclaré : 'aHeight'

Code:

---

1 2	Frame3d(Canvas, aRect, clBtnHighlight, clBtnShadow, 1);

---

[Erreur] Main.pas(81): E2003 Identificateur non déclaré : 'Frame3d'

end;

Forcément faut adpater le code que je t'ai mis :roll:

Code:

---

1 2 3 4 5

procedure TFrmMain.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;Rect: TRect; State: TGridDrawState); begin Frame3d(Canvas, Rect, clBtnHighlight, clBtnShadow, 1); end;

---

Citation:

---

Envoyé par yannba

[Erreur] Main.pas(81): E2003 Identificateur non déclaré : 'Frame3d'

---

Une simple recherche dans l'aide t'aurait permis d'ajouter l'unité ExtCtrls dans les uses...

Merci,

Mais pour l'aide, j'ai un souci, quand je fais F1, elle me met un message d'erreur "indisponible". J'ai regardé dans la FAQ, et je n'ai pas trouvé pourquoi ...

Mais sinon, ca marche merci !!!