WriteComment example for C++ Builder

   LEADRasterIO* pRasterIO= NULL;
   ILEADRasterVariant* pRasterVarStr= NULL;

   CoCreateInstance(CLSID_LEADRasterIO, NULL, CLSCTX_ALL, IID_ILEADRasterIO, (void**)&pRasterIO);
   CoCreateInstance( CLSID_LEADRasterVariant,
                     NULL,
                     CLSCTX_ALL,
                     IID_ILEADRasterVariant,
                     (void**)&pRasterVarStr);

   pRasterVarStr->set_Type( VALUE_STRING );
   pRasterVarStr->StringValue= AnsiToOLESTR("Me");

   //set the comment
   pRasterIO->set_Comment(CMNT_SZARTIST, pRasterVarStr);
   //write the comment into page 1 of TEST->TIF
   pRasterIO->WriteComment( AnsiToOLESTR("c:\\TEST.TIF"), 1 ) ;
   //read the comment and display it
   pRasterVarStr= pRasterIO->ReadComment(LEADRasterView1->Raster,
                               AnsiToOLESTR("c:\\TEST.TIF"), 1, CMNT_SZARTIST);
   ShowMessage ( pRasterVarStr->StringValue) ;
   if ( pRasterIO )
      pRasterIO->Release( );

   if ( pRasterVarStr )
      pRasterVarStr->Release();