vor

Auswahlstrukturen
CASE OF

weiter

Verkehrsampel

Die Funktion einer Verkehrsampel soll in 16 Zeitscheiben mit Hilfe der Auswahlstruktur CASE..OF gesteuert werden.

7 Zeiteinheiten lang soll nur die rote Lampe leuchten.

In der 8. Zeitscheibe soll die gelbe Lampe hinzugeschaltet sein.

Von der 9. bis zur 14. Zeitscheibe soll nur die grüne Lampe leuchten.

Zwei Zeiteinheiten lang soll dann nur die gelbe Lampe eingeschaltet sein, bevor dann der Zyklus von vorn beginnt.

Passend dazu soll eine Ampel für die Querstraße gezeigt werden, die natürlich immer rot zeigen muss, wenn die erste Ampel grün hat und umgekehrt.

Verkehrsampel
Komponente Eigenschaft Wert Bemerkungen
Form1 Caption ‘Verkehrsampel’ Überschrift in der Kopfleiste des Programmfensters
Panel1     Unterlage für die drei Lampen
Shape1 Brush.Color clRed rotes Ampellicht
Shape2 Brush.Color clBlack ausgeschaltetes Ampellicht
Shape3 Brush.Color clBlack ausgeschaltetes Ampellicht
Panel2     Unterlage für die anderen drei Lampen
Shape4 Brush.Color clBlack ausgeschaltetes Ampellicht
Shape5 Brush.Color clBlack ausgeschaltetes Ampellicht
Shape6 Brush.Color clLime grünes Ampellicht
Timer1 Interval 1000 gibt jede Sekunde ein Ereignis
Lösung
vor

Inhaltsverzeichnis

weiter