Выполняет одну функцию: сделать снимок экрана и положить в файл с заданной компрессией.
Возвращает =1 - успешно, =0 - не успешно. Пример использования:
ИмяФайла="С:\1.jpg"; Компрессия=85; ЗагрузитьВнешнююКомпоненту("AddIn_V7MyScreenShot.dll"); ВК = СоздатьОбъект("AddIn.AddIn_V7MyScreenShot"); ВК.СнимокЭкранаВJPGФайл(СокрЛП(ИмяФайла), Число(Компрессия));
AddIn_V7MyScreenShot.zip - dll'ка и обработка для иллюстрации работы
Pas_V7MyScreenShot.zip - исходники (Delphi-5)