Hm deine Frage ist für mich nicht eindeutig. Soll das Fenster beim Klicken die Farbe wechseln (z.B. grau-> blau blau-> grau)? Oder soll dem Fenster eine zufällige Farbe zugewiesen werden?
Für den erste Fall schreibst du in die Procedure des Buttons:
Delphi-Quellcode:
if form1.color = clbtnface then
form1.color := clblue
else form1.color := clbtnface;
Für den 2. hab ich derzeit keine Lösung im Kopf
