aktionen nacheinander ausführen

[xeLa-]

naja ist eine raltiv dumme frage aber ich bin halt anfänger

wie kann ich dinge nacheinander ausführen lassen?
ich wollt z.b. mal 4 fun 4-gewinnt als delphi programm schreiben. einfach die reihen als edit felder (eigentlich egal was für felder) und unter jede reihe ein button. wenn man nun auf den button klickt soll das nächst mögliche feld in der jeweiligen reihe eingefärbt werden.
ich wollte das eigentlich mit einfachen if/then schleifen machen, bis dann eingefallen ist, dass das so nur bis zum 2. feld funktioniert.
mal so als beispiel

Delphi-Quellcode:

//procedure button1 click usw blabla
if edit1.color := clwhite then
begin
edit1.color := clgreen
end
else
edit2.color := clgreen
end;

//so und wenn ich die schleife jetzt weitermache mit

if edit2.color := clgreen then
begin edit3.color := clgreen

gehts logischerweise nicht

gibt unter garantie noch viel bessere/schönere wege aber für mich als newbie. will nicht nur stur irgendwo den code abschreiben sondern auch verstehen WAS ich geschrieben habe.
(ja ich weiß das ich die ";" vergessen habe ^_^)