OnProgressStatus Example for C++Builder

void __fastcall TForm1::LEADDicom1OnProgressStatus(TObject *Sender, int iPercent)
{
   Form1->Caption = "Loading..." + IntToStr(iPercent) + "%";
   Application->ProcessMessages();
}

/* Click on the LEAD Main control to enable/disable generating progress events */
/* This works even during getting | setting the DICOM bitmap */
void __fastcall TForm1::LEADImage1Click(TObject *Sender)
{
   LEADDicom1->EnableProgressEvent = ! LEADDicom1->EnableProgressEvent;
}