CaptureHotKey Example for Delphi 4.0

This is also the example for the CaptureHotKeyModifiers property.

    LEADScr1.CaptureCount := 1;
    {set hotkey to  + F12}
    LEADScr1.CaptureHotKey := VK_F12; {F12}
    LEADScr1.CaptureHotKeyModifiers := CAPTURE_MOD_CONTROL;
    LEADScr1.CaptureArea(CAPTURE_AREA_RECT);
    {copy the captured image to a Main Control}

    LEAD1.Bitmap := LEADScr1.Bitmap;