Verkürzung des Codes

[Flo.Hoe]

Ich habe vor einem knappen halben Jahr in der
Schule mit dem Informatikunterricht begonnen
und mich endlich mal an einem eigenen Proramm
versucht.
Da wir im Unterricht keine zeit haben uns
wirklich innig mit Delphi zu beschäftigen, ist es
mir schwer gefallen meine Ideen zu verwirklichen.

Ich bin mir sicher, dass mein Quellcode noch stark
komprimiert werden kann.

Aber Wie?

Komme ich wirklich nicht drumm herrum bereits
geschribenen text zu wiederholen ?

(Projektdateien und exe im Anhang)

Kann mir jemand helfen, Strucktur in mein Projekt

zu bringen?




Anletung zum Programm:


Es liegen neun farbige Felder vor,
die in einem Quadrat angeordnet sind.
Bei einem Klick auf ein Feld, ändert sich
die Farbe des jeweiligen Feldes und die
der Nachbarfelder.
Dabei ist die Reihenfolge: schwrz , rot , grün ,

gelb. Danach wiederholt sich die Reihe.

Ziel ist es , das alle Felder die selbe Farbe

haben (sehr schwer).