Ampel mit visible=true/false

[gfjs]

@ Jackel89

Ich bin selber noch Anfänger und habe hier im Büro auch kein Delphi installiert, um auszuprobieren, ob meine Lösung funktioniert. Aber vielleicht ist das eine Überlegung wert:

Button1.Tag := 1; gruen.visible := true; Und in die onClick-Prozedur:

Delphi-Quellcode:

Case Button1.Tag of
  1: begin
       gruen.visible := false;
       gelb.visible := true;
       Button1.Tag := 2;
     end;
  2: begin
      gelb.visible := false;
      rot.visible := true;
      Button1.Tag := 3;
    end;
  3: begin
       gelb.visible := true;
       Butto1.Tag := 4;
     end;
  4: begin
       rot.visible := false;
       gelb.visible := false;
       gruen.visible := true;
       Button1.Tag := 1;
{  5: begin ;-)
      Ampel.kaputt := true;
      SignalbauHuberAnrufen := true;
    end; ;-) }
end;

Probier's einfach mal aus.

mfg gfjs