Цифровая капча

[igor2086]

Помогите со скриптом для антикапчи
если не можете то оповещение капчи

 

[savant]

http://rawr.su/topic/34-uvedomlenie-pri-poyavlenii-kapchi/
Только в скрипте слово "снятия" заменяешь на "капчу".
Есть скрипт на распознавание графической капчи, но я жадный просто так такое в инет выкладывать

 

[igor2086]

var Captcha:string;
begin
while (true) do
begin
Captcha := Engine.DlgText;
if (Pos('капчу', Captcha) <> 0) then
PlaySound('Sounds/hp.wav',false);
Delay(1800);
end;
end.



не работает
звук по кд

 

[savant]

@igor2086, если есть звук - значит последним диалоговым окном было окно с капчей. И на него скрипт реагирует, потому что не понимает, что окно уже возможно было закрыто.