[Страдалецъ]

А можно просто воспользоваться компонентом ScrollBox. Накидать на него нужные вам контролы и на пару кнопок (Назад, Вперед) повесить примерно такое событие:

Код:

procedure TForm4.Button1Click(Sender: TObject);
Var i, dx: Integer;
begin
 if Sender = Button1 then dx := -1;
 if Sender = Button2 then dx := 1; 
 for i := 0 to 200
 do begin
    ScrollBox1.ScrollBy(dx, 0);
    Application.ProcessMessages;
    end;
end;

и будет вам туда/сюда листаться.