Posted by DelphiLand Team
In Reply to: Drawing on Delphi TImage Stanley
: procedure TForm1.Button1Click(Sender: TObject);
: begin
: with Image1.Canvas do begin
: Brush.Style := bsSolid;
: Brush.Color := clBlue;
: Rectangle(0, 0, Image1.Width, Image1.Height);
: end;
: end;
: This does not work if there is a JPG picture in Image1. Is it a bug in Delphi?
----------------------
It's not a bug. Canvas is only available if the Picture property of the TImage represents a TBitmap.
When Picture represents another type of graphic image, this gives an error.
|