AnnInsert example for Delphi

var
  hEllipseObject: L_HANDLE; 
.
.
.
hEllipseObject:= LEADAnn1.AnnCreate (ANNOBJECT_ELLIPSE, False, True);
LEADAnn1.AnnInsert (LEADAnn1.AnnContainer, hEllipseObject, False);