[Lazarus] TImage Canvas not growing with Image? GTK2

[theo]

Hello

Is it correct, that the paintable area of an Image.Canvas is not growing 
with the Image?

Example:
Put a TImage on an empty Form. Set Align to alClient.

Then put for ex. this code in Form.OnChangeBounds

procedure TForm1.FormChangeBounds(Sender:TObject);
begin
 With Image1 do
 begin
 Canvas.Brush.Color:=clWhite;
 Canvas.FillRect(0,0,Width,Height);
 Canvas.MoveTo(0,0);
 Canvas.LineTo(Width,Height);
 Canvas.MoveTo(Width,0);
 Canvas.LineTo(0,Height);
 end;
end;

Now resize the form with the Mouse.
For me, the image resizes correctly but the visible area keeps the 
designtime size.
See: http://www.theo.ch/lazarus/lazimgresize.png
Is it a bug, or is it "by design"?

Lazarus 0.9.29 r25504M FPC 2.4.0 i386-linux-gtk 2 (beta)

Thank you


--
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus