Comment créer une image de mon TStringGrid ?

Bonjour à tous,

je voudrais savoir si quelqu'un sait comment je peux faire pour créer une image de mon StringGrid ?

J'aimerais bien une function du style :

Code:

---

sgTest.SaveToBmp('toto.bmp');

---

Là cela serait le top !

Merci à tous.
Bruno

Regarde du côté des économiseurs d'ecran écrits en Delphi. Il y a le code pour récupérer les points écrits à l'écran.

Bonjour Alweber,

je vais jeter un coup d'oeil à ce principe.

Merci pour l'info
Bruno

Ci-joint un petit exemple

Bonjour à tous,

voici une solution proposée par FAUST, trouvée sur une NewsGroup.
Et qui marche trés bien !!

Merci FAUST.

Citation:

---

une solution générique applicable à tous les descendants de TWinControl
est de passer par PaintWindows:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

type TCrackWinControl = class(TWinControl);   procedure Compo2Bitmap(Ctrl: TWinControl; const FileName: string); var Bmp: TBitmap; begin Bmp := TBitmap.Create; try Bmp.Width := Ctrl.Width; Bmp.Height := Ctrl.Height; TCrackWinControl(Ctrl).PaintWindow(Bmp.Canvas.Handle); Bmp.SaveToFile(FileName); finally Bmp.Free; end; end;

---

(le passage par TCrackWinControl est imposé par le fait que PaintWindow
est en protected et qu'il n'est donc accessible que dans les classes
descendant de TWinControl)

---

:king: meriterait d'aller dans la FAQ

Juste une petite question. Cette fonction retourne le composant dans son dessin original. Par exemple un listBox sans son texte. Est-ce que le résultat est le même chez-toi ?

Chez moi, j'ai exactement une image du composant StringGrid avec le texte et les couleurs.

Tu as raison sur le stringGrid. Je vais approfondir.

Citation:

---

Envoyé par ALWEBER

Tu as raison sur le stringGrid. Je vais approfondir.

---

Si tu as une solution, nous sommes preneurs pour la FAQ :ccool: