Zmiana rozmiaru Canvas w TImage

Witam

Mam Image na formie, a na nim poprzez Canvas rysuję sobie.

Chcę jednak, żeby przy zmianie rozmiaru formularza, obrazek zajmował cały formularz - dałem nawet do onResize formularza

Image1.Width:=ClientWidth
Image1.Height:=ClientHeight

Usiłuję wówczas również wypełnić Canvas jakimś kolorem tak:

  
Image1.Canvas.Brush.Color:=clRed;
Image1.Canvas.Rectangle(0,0,Image1.Width,Image1.Height);

ale zostaje zamalowany obszar wielkości początkowego rozmiaru obrazka, a pozostała część jest jaka była.

Nie wiem niestety jak to ominąć :(

Pozdrawiam i czekam na Waszą pomoc

Po powiekszeniu Image'a dodaj jeszcze

Image1.Picture.Bitmap.Width:=Image1.Width;
Image1.Picture.Bitmap.Height:=Image1.Height;

Wielkie dzięki za pomoc. To działa [soczek]

Inne rozwiazanie w/w problemu:
Onresize formy i zwiekszenie wymiarow image1