CaptureSelectedObject Example for Builder 3.0

This is also the example for the CaptureObjectSelectCursorIndex, CaptureObjectInvert, CaptureObjectEnableKeyboard, CaptureObjectBorderWidth properties.

    /*set cursor*/
    LEADScr1->CaptureObjectSelectCursor = crArrow;

    /*disable invert colors*/
    LEADScr1->CaptureObjectInvert = false;

    /*disable keyboard*/
    LEADScr1->CaptureObjectEnableKeyboard = false;

    /*set object border width*/
    LEADScr1->CaptureObjectBorderWidth = 3;

    /*  the capture*/
    LEADScr1->CaptureSelectedObject();

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

    /*reset options*/
    LEADScr1->ResetObjectOptions();