CaptureEXEDlg Example for Builder 3.0

This is also the example for the CaptureInfoResType, CaptureInfoResIndex, CaptureInfoResID, and CaptureInfoExeName properties.

void __fastcall TForm1::Button4Click(TObject *Sender)
{
   /*display CaptureExe Dialog*/
    LEADScr1->CaptureEXEDlg(this, "c:\\windows\\calc.exe", CAPTURE_ALL, CAPTURE_DLG_TREEVIEW, 0);

    /*copy the captured image to a Main Control*/
    LEAD1->Bitmap = LEADScr1->Bitmap;

    /*display results*/
    Edit1->Text = IntToStr(LEADScr1->CaptureInfoResType);
    Edit2->Text = IntToStr(LEADScr1->CaptureInfoResIndex);
    Edit3->Text = LEADScr1->CaptureInfoResourceID;
    Edit4->Text = LEADScr1->CaptureInfoExeName;
}