property Bitmap:TBitmap


Description:


 Set the  bitmap for TMyImage shape, for clear it , Btimap:=nil;



Example:


The example show assign a bitmap that you load to TMyImage.

var

  mybitmap:TBitmap;

begin

  if OpenPictureDialog1.Execute then

begin

       myBitmap:=TBitmap.Create;

       mybitmap.LoadFromFile(OpenPictureDialog1.FileName);

       (AShape as TMyImage).Bitmap:=mybitmap;

       MyBitmap.Free;

end;

end;