Zitat von
greenstreet:
Sorry ich weiß nicht genau was du meinst. Könntest du mir das etwas genauer erläutern?
Ich vermute, dir geht es nicht um einen Button, sondern darum, die 3 Ampellichter darzustellen. TShape müsste in Delphi 7 vorhanden sein. Im Anhang ein Screenshot von TurboDelphi (dort ist TShape im Reiter "Zusätzlich").
Im Objektinspektor kannst du der Eigenschaft "Shape" den Wert "stCircle" zuweisen, um ein rundes TShape zu erhalten. Die Farbe lässt sich mit "Brush.Color" setzen.