Тесты работы Кибора на 4к мониторе.

#define SRCCOPY 13369376
external(INT, "GetDC", "GetDC", "User32.dll");
external(INT, "StretchBlt", "StretchBlt", "Gdi32.dll");

win w=window ("Program Manager", "Progman", -1);
if(w)
{
int hdc=GetDC(0);
int DC=GetDC(formatwi(w));
loop()
{
StretchBlt(hdc, 0, 0, 960, 540, DC, 0, 0, 3840, 2160, SRCCOPY);
sleep(10);
}
}
else messagebox("Окно не найдено");