ShowPunchDlg example for C++ Builder

void __fastcall TForm1::ShowPunchDlg1Click(TObject *Sender) 
{
   L_INT nRet; 
   LEADDlgImgEffect1->DlgFlags = DLG_PUNCH_SHOW_PREVIEW |
                                DLG_PUNCH_SHOW_TOOL_ZOOMLEVEL; 

   LEADDlgImgEffect1->LEADImage = LEADImage1; 

   nRet= LEADDlgImgEffect1->ShowPunchDlg ( this ); 
   if ( nRet == SUCCESS_DLG_OK ) 
   {
      LEADImage1->Punch ( LEADDlgImgEffect1->Value, 
                         LEADDlgImgEffect1->Stress, 
                         LEADDlgImgEffect1->CenterPoint, 
                         LEADDlgImgEffect1->FillColor, 
                         LEADDlgImgEffect1->PunchFlags ); 
   }
}