Bestimmt ist das nicht die ideale Lösung, aber mir würde spontan das einfallen:
Delphi-Quellcode:
var i: Integer;
//Weiter-Button:
procedure TForm1.ButtonWeiterClick(Sender: TObject);
begin
if i=1 then {...}
if i=2 then {...}
if i=3 then {...}
i:=i +1;
end;
//Zurück-Button:
procedure TForm1.ButtonZurueckClick(Sender: TObject);
begin
if i=1 then {...}
if i=2 then {...}
if i=3 then {...}
i:=i -1;
end;