// Add a text annotation to the page
ImageEnView1.PdfViewer.Annotations.NewLinkAnnotation( R, 'ImageEn Rules!' );
// Output all annotations on the page
for i := 0 to ImageEnView1.PdfViewer.Annotations.Count -1 do
begin
ann := ImageEnView1.PdfViewer.Annotations[i];
lbxAnnotations.Items.Add( Format( 'Annot %d: (%s) at (%d,%d,%d,%d)',
[ i+1, PdfAnnotTypeToStr( ann.AnnotType ),
Round(ann.Bounds.Left), Round(ann.Bounds.Top), Round(ann.Bounds.Right), Round(ann.Bounds.Bottom) ]));
end;
// Delete the first annotation from the page
ImageEnView1.PdfViewer.Annotations.Remove( 0 );
ImageEnView1.PdfViewer.ReloadPage();
// Remove the highlighted object from the PDF page
ImageEnView1.PdfViewer.Annotations.Remove( ImageEnView1.PdfViewer.Annotations.HighlightedIndex );
ImageEnView1.PdfViewer.ReloadPage();