Liste bei jedem klick auf Button nächsten Index anzeigen

[Schnittcher]

Hallo,

ich habe ein kleines Problem ich will bei jedem Klick auf einen Button den nächsten Index der Liste anzeigen.
Ich habe es so versucht:

Delphi-Quellcode:

procedure TForm1.cmdNextClick(Sender: TObject);
var
  x: integer;
  pAuto: IAuto;
begin
  x:= x+1;
    pAuto := AutoList.Items[x];
    edBesitzer.Text := pAuto.ErgebnisName;
    edKW.Text := FloatToStr(pAuto.ErgebnisKW);
    edPS.Text := FloatToStr(pAuto.ErgebnisPS);
end;

Kann mir jemand meinen Fehler sagen?

In x wird immer ein sehr hoher Wert gespeichert. Wieso?

Gruß,
Schnittcher