AnnPredifinedBitmap example for Delphi

//This example does the following:
//1. Gets the current point bitmap
//2. Inverts it
//3. Sets the inverted bitmap as the default point bitmap
Procedure TForm1.ExampleAnnPredefinedBitmap ( hObject: HANNOBJECT );
begin
   LEADAnn2.Bitmap:= LEADAnn1.AnnPredefinedBitmap[ANNBITMAP_POINT];
   LEADAnn2.Invert ( );
   LEADAnn1.AnnPredefinedBitmap[ANNBITMAP_POINT]:= LEADAnn1.Bitmap;
end;