Farbwechsel mit Syntax If

[the_killers]

Hey,

ich muss einen Farbwechsel machen, d.h. wenn ich einmal auf das Formular klicke, soll es rot werden, dann soll es Gelb werden, wenn ich nochmal drauf klicke und dann beim 3. mal drauf klicken wieder grün!!

Okay, alles nicht so unbedingt schwer, aber was muss ich als Bedingung zwischen If und then jeweils eingeben??? :S Bitte helft mich!! Ich brauch dringends Hilfe

Lg.

Und schonmal Danke im vorraus!!!

[Neutral General]

Hi,

Du kannst bei jedem Klick Form1.Tag um eins erhöhen und dann mit case abfragen welchen Wert Tag grad hat und dementspechend die Farbe ändern. Wenn du die Zahlen 1 bis 3 nimmst darfst du nur nicht vergessen nach 3 wieder auf 1 zu stellen.

Gruß
Neutral General

[the_killers]

Ich bin dir wirklich sehr dankbar für deine Antwort, aber ich hab erst seit paar Wochen Delphi und bin zwar relativ gut, aber etwas mit Tag und case hab ich noch nie gehört... es ist einfach auf dem einfachsten Niveau mit if <Bedingung> then <Anweisung> else if <Bedingung> then <Anweisung> else usw...

[inherited]

WO ist dann das Problem?
if color=clGreen then color:=clYellow
else if color=...
Den Rest darfst du machen, wir sind schließlich nicht deine Hausaufgabenmacher

(Sauberer wäre das mit case, aber da offensichtlich nach if verlangt wird...)

[the_killers]

okay, vielen vielen Dank!!

naja, wie du ja lesen konntest in dem 1. Eintrag, brauchte ich auch nur das, was in die Bedingung, also nach if hineinkommt. Das andre wusste ich ja alles... Also nein, ich wollte nicht, dass mir jemand hier die Hausaufgaben macht.

Also vielen Dank euch beiden!!!

[fLaSh11]

oha, offensichtlich hat dich noch niemand in der DP begrüßt

Willkommen in der DP!

[the_killers]

Dankeschön fLaSh11 Das ist lieb von dir.