Блог о программировании, электронике и рыбалке

Программа для автопрокрутки сайта thedeepestsite.com

Главная » Delphi » Программа для автопрокрутки сайта thedeepestsite.com

скроллинг прокрутка мыши thedeepestsite.com Delphi  delphi  Многие из вас, наверное, уже знакомы с самым глубоким в мире сайтом Borjomi thedeepestsite.com. Мне он тоже понравился. Идей гениальная.

Я 15 минут крутил колесико мышки, в надежде увидеть самую нижнюю его часть и написать там заветное "Здесь был source!".

Сразу скажу, что терпения у меня не хватило, поэтому результата я пока не достиг. Плюнул на это дело и решил автоматизировать процесс прокрутки.

Сделать это оказалось очень просто. Достаточно в Delphi кинуть на форму таймер, установить интервал в 100 миллисекунд и прописать в процедуре одну строчку:

Mouse_Event(MOUSEEVENTF_WHEEL, 0, 0, DWORD(-120), 0);

Если вам когда-нибудь понадобится прокрутка вверх, то строка будет выглядеть так:

Mouse_Event(MOUSEEVENTF_WHEEL, 0, 0,120, 0);

Получилась такая вот софтинка:

скроллинг прокрутка мыши thedeepestsite.com Delphi  delphi

скроллинг прокрутка мыши thedeepestsite.com Delphi  delphi    Borjomi.exe (493,0 KiB, 553 hits)

скроллинг прокрутка мыши thedeepestsite.com Delphi  delphi

скроллинг прокрутка мыши thedeepestsite.com Delphi  delphi

logo
Просмотров: 1 717
1 Star2 Stars3 Stars4 Stars5 Stars (2 votes, average: 5,00 out of 5)
Загрузка...

4
  • BusteR:

    http://thedeepestsite.com/#gogogo

  • Дам еще небольшой совет - выключайте показ картинок в браузере - меньше будет тормозить.

  • Игорян:

    хохохо

  • Михаил:

    Хорошая программа. Рекламирую algorithmlife.ru и в социалках.
    Полный код очень бы пригодился. Регулировку скорости прокрутки надо доделать.

Добавить комментарий

Яндекс.Метрика