HILFE - Brauche dringend Hilfe

[ruskij]

Hallo, ich habe vor kurzem die schulle gewechselt und die machen hier delphi! hab ich keine ahnung von kann mir jemand diesen teil verständlich erläutern:

Es sind 2 Listen. Der Button1 ist zum Rückgängig machen und Button2 zum wiederherstellen!
Das was ich überhauptnicht raffe ist die sache mit den .items und .count und diese for schleifen!!!

procedure TForm1.Button1Click(Sender: TObject);
begin
Rliste.add(Liste.Items[Liste.count-1]);
TLinie(Liste.Items[Liste.count-1]).zeichne(pmnotxor);
Liste.Delete(Liste.Count-1);
for i:=0 to liste.count-1 do Tlinie(Liste.Items[i]).zeichne(pmcopy);
if Rliste.count>0 then Button2.Enabled:=true else Button2.Enabled:=false;
if liste.count>0 then Button1.Enabled:=true else Button1.Enabled:=false;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Liste.Add(Rliste.Items[RListe.count-1]);
RListe.Delete(RListe.Count-1);
for i:=0 to liste.count-1 do Tlinie(Liste.Items[i]).zeichne(pmcopy);
if Rliste.count>0 then Button2.Enabled:=true else Button2.Enabled:=false;
if liste.count>0 then Button1.Enabled:=true else Button1.Enabled:=false;
end;

Vielen dank!!