ImageEn, unit iemview

TImageEnMView.AnnotationsVisible

TImageEnMView.AnnotationsVisible


Declaration

property AnnotationsVisible: Boolean;


Description

When enabled, Wang annotations and ImageEn annotations of the image are shown on the thumbnail.

Default: False

Note:
 This property has no effect if StoreType is ietThumb. It is only supported by ietNormal and ietFastThumb.
 This will slow performance so is only recommended for annotation-specific applications.


Example

// Test application with a TImageEnMView that loads and saves a multiple page TIFF file, and TImageEnView that allows annotation editing

// Show annotations of selected frame
procedure TForm1.ImageEnMView1ImageSelect(Sender: TObject; idx: Integer);
begin
  // Clear TImageEnView
  ImageEnView1.LayersClear( True );

  // Get selected image
  ImageEnMView1.CopyToIEBitmap( idx, ImageEnView1.IEBitmap );

  // Get ImageEn annotations
  if ImageEnMView1.MIO.Params[ idx ].ImageEnAnnot.IsEmpty = False then
    ImageEnMView1.MIO.Params[ idx ].ImageEnAnnot.CopyToTImageEnView( ImageEnView1 );

  // Refresh the TImageEnView
  ImageEnView1.Update();
end;

// Save the annotations
procedure TForm1.btnSaveAnnotClick(Sender: TObject);
begin
  if ImageEnMView1.SelectedImage > -1 then
  begin
    ImageEnMView1.MIO.Params[ ImageEnMView1.SelectedImage ].ImageEnAnnot.CopyFromTImageEnView( ImageEnView1 );
    ImageEnMView1.UpdateImage( ImageEnMView1.SelectedImage );
  end;
end;