Einfache Ampelsimulation funktioniert nicht...

[deepdragon]

Zitat von Gremlin:

Hallo deepdragon,

Shapes (von der Klasse TShape) sind einfache geometrische Figuren. Du musst dann keine Bilder mehr laden und kannst stattdessen die Ampel selbst darstellen (jeweils ein Shape für rot, gelb und grün). Um die Farbe zu setzen, kannst du die Property Brush.Color verwenden. Die Figur kann über Shape=stCircle gesetzt werden. Sollte nur als einfache Anregung gedacht sein.

Viel Erfolg.

Vielen Dank

Ich hab das jetzt mit Shapes gemacht... Und es klappt ganz gut^^ Ich habe wieder einmal einen Fehler drin gehabt über den ich ne halbe Stunde gebrütet habe^^ Dann hab ich ihn aber gefunden und es hat alles funktioniert

Ihr könnt euch das fertige Shape Projekt noch mal angucken... Nur damit ich weiß, dass ich das mit den Shapes auch richtig verstanden habe und ich es auch so gemacht habe, wie ihr es gemeint habt...


Aber noch ne Frage... Ich will ja jetzt ein neues Formular einbinden... Das ist ja ganz einfach mit 'Form2.show' ... Aber die Frage ist jetzt, ob ich die Ampel wieder neu machen muss oder ich auf das erste Formular zurückgreifen kann? Also die Frage ist etwas kompliziert und wenn ihr sie nicht verstanden habt, macht das nichts^^ Aber ich will jetzt im zweiten Formular eine Ampel mit einer Fußgängerampel koppeln... Und auf der Fußgängerampel ist dann ein Button und wenn man den drückt, geht logischerweise die "Auto"-Ampel auf rot und dann die Fußgängerampel auf grün.. ...
Und muss ich da jetzt wieder den ganzen Quellcode aufschreiben?? Weil wenn ich daran denke, wenn ich erstmal die Kreuzung mache (obwohl ihr euch die net so spektakulär vorstellen müsst... ich werde nur eine einfache machen, auf der es keine Abbiegerspuren gibt... ), wird das ja noch komplizierter wenn ich dann so einen ellenlangen Quelltext hab^^

Naja aber danke schon mal bis hierher
Deepdragon