Sauvegarde du contenu d'une paintbox sous delphi 5

Merci de me dépanner :
je ne trouve de propriete type saveToFile ...
comment faire car message d'erreur avec methode Assign.
auriez vous un exemple à me suggerer ?

merci bcp

eric

Voici un bout de code pour enregistrer un bitmap à partir d'un paintbox :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

var lImage : TBitmap; cadre : TRect; begin lImage := TBitmap.Create; lImage.Width := PaintBox1.Width; lImage.Height := PaintBox1.Height; cadre := Rect(0,0,PaintBox1.Width,PaintBox1.Height); lImage.Canvas.CopyRect(cadre,PaintBox1.Canvas,cadre); lImage.SaveToFile('c:\toto.bmp'); lImage.Free; end;

---