AnnGetHyperlinkString example for C++ Builder

//Global declarations
LEADRasterAnnotation * pRasterAnn= NULL;
LEADRasterAnnToolBar* pRasterAnnToolbar= NULL;

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   CoCreateInstance(CLSID_LEADRasterAnnotation, NULL, CLSCTX_ALL, IID_ILEADRasterAnnotation, (void**)&pRasterAnn);
   CoCreateInstance(CLSID_LEADRasterAnnToolBar, NULL, CLSCTX_ALL, IID_ILEADRasterAnnToolBar, (void**)&pRasterAnnToolbar);
   pRasterAnn->AnnParentRasterView = LEADRasterView1->Raster;
   LEADEventSink1->Connect (pRasterAnn, DIID__LEADRasterAnnotationEvents);
   pRasterAnn->AnnUserMode = ANN_USERMODE_DESIGN   ;
}
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
   if (pRasterAnn)
      pRasterAnn->Release ();
   if (pRasterAnnToolbar)
      pRasterAnnToolbar-> Release();
}

//This examples assumes that hGlobalAnn is a handle to a button annotation.
//A hyperlink string is set and retrieved
void __fastcall TForm2::Button2Click(TObject *Sender)
{
   BSTR bstrHyperlink;
   AnsiString szString;
   pRasterAnn->AnnSetHyperlinkString (hGlobalAnn, ANN_LINK_WEBPAGE, AnsiToOLESTR("http://www.leadtools.com"));
   pRasterAnn->AnnGetHyperlinkString (hGlobalAnn);
   bstrHyperlink= pRasterAnn->AnnHyperlinkString;
   szString= bstrHyperlink;
   ::SysFreeString(bstrHyperlink);
   ShowMessage (szString);
}