AnnSetFillPattern example for C++ Builder

void TForm1::TestAnnFillPattern ( HANNOBJECT hAnnObject )
{
   L_UINT uFillPattern; /* Object fill pattern */

   /* Set the fill pattern to solid, unless it already is */
   LEADAnn1->AnnGetFillPattern ( hAnnObject, uFillPattern );
   if ( uFillPattern == ANNFILLPATTERN_SOLID )
       ShowMessage ( "Already solid" );
   else
      LEADAnn1->AnnSetFillPattern ( hAnnObject, ANNFILLPATTERN_SOLID, false );