Yo cambiaría los paneles por un PageControl, así podría añadir cuantos TabSheet necesite para las preguntas.
Luego en los botones Anterior y Siguiente solo tendría que usar esto:
Código Delphi
[-]procedure TForm1.botonanteriorClick(Sender: TObject);
begin
PageControl1.Pages[PageControl1.TabIndex - 1].Show;
end;
procedure TForm1.botonsiguienteClick(Sender: TObject);
begin
PageControl1.Pages[PageControl1.TabIndex + 1].Show;
end;
Saludos!