meinst du so??:
Delphi-Quellcode:
j:=i;
i:=h;
h:=g;
g:=f;
f:=e;
e:=d;
d:=c;
c:=b;
b:=a;
a:=; //neuer wert für den aktuellen tag!!
in dem fall solltest du die var. aber nicht in der procedure:
procedure TForm1.Button1Click(Sender: TObject);
sondern direkt im hauptquellcode, zb unter der uses clausel deklarieren...
damit erreichst du, das du von verschieden proceduren darauf zurückgreifen kannst..