MouseWheel

Emulates a mouse wheel scrolling.

procedure MouseWheel(aDeltaX: integer; aDeltaY: integer);

• aDeltaX
  • type: integer
  • functions: number of pixels to scroll horizontally
• aDeltaY
  • type: integer
  • functions: number of pixels to scroll vertically

1. LoadURI('habrahabr.ru');
   for var i:=0 to 9 do
      begin
         MouseWheel(0,-100);
         Wait(200);
      end;