Детектор Экрана

[Biohazard]

перерыл( на русских сайтах вообще не нашёл( на иностранных всё что есть, нужно кучу доп компонентов скачивать, и запутанно, они ещё и не устанавливаются, что же всё таки сверхневозможного, в том, чтобы получить скриншот как он есть!

[GunSmoker]

Потому что скриншот в финальном виде существует только в самом конце цепочки. На мониторе, да в видеопамяти. Откуда читать... не самая тривиальная операция.

Иногда это и вовсе невозможно (что, кстати, эксплуатируется некоторыми схемами защиты содержимого).

[Biohazard]

function getport(p:word):byte; stdcall;
begin
  asm
    push edx
    push eax
    mov  dx,p
    in   al,dx
    mov  @result,al
    pop  eax
    pop  edx
  end;
end;

var
  a : array of word;
  i : integer;
begin
  SetLength(a, 16); // Формируем массив из 16 значений по 16 бит
  for i:=0 to 15 do 
    a[i] := getport($A000+i*2)*$100 + getport($A000+i*2+1); // забираем 16битный цвет из памяти видеокарты
...

по идее это должно работать, но вот на этой {   in   al,dx} строке выдаёт "Privileged instruction" кто знает, как это можно обойти и исправить?)

[GunSmoker]

Никак. Это неприменимо в Windows.

[Biohazard]

ладно, всё у вас невозможно, но как тогда фрапс с этим справляется?

[Пепел Феникса]

ладно, всё у вас невозможно, но как тогда фрапс с этим справляется?

перечитываем пост BOBAH13, до понимания.

вам же сказали куда копать, чтож вы лезете сами непонимаете во что?

// забираем 16битный цвет из памяти видеокарты

это вы сам придумали?
и давно цвета хранятся в портах ввода вывода...

[Biohazard]

ясно, спасибо, нужно в нете искать directdraw, всё перерыл, честно, ну до конца доведите ответ, облегчу тогда задачу, как взять скриншот из окна в котором видео играет, тоесть с помошью directx как это сделать по хэндлу?) плиз рабочий пример, сам его проанализирую, но найти не смог( очень важно!)

[GunSmoker]

Написание кода за вас - 200 рублей в час.

[Biohazard]

за час)) так вы на 10 лет растяните а потом счёт предьявите с 6 нулями) просто получается, что чем хуже вы в этом разбираетесь, чем дольше будите делать, тем больше мне придётся вам заплатить?)