Nach bestimmer Variable bestimme Aktion ausführen

[CocoPops]

Zitat:

... gemacht und es kommt folgender Fehler.. :

Deswegen sollte man nicht Copy & Pasten. Vorher muss man versuchen den Code zu verstehen.

Ich kenne die Fehlermeldungen von Lazurus (weg damit ...) nicht, aber du hast sicherlich vergessen GANZ OBEN IN DER UNIT IM PRIVATE-ABSCHNITT procedure PresentRatePictures; zu deklarieren.

Zitat:

Ja bin jetzt nur noch bei einem Label.

Wenn du doch nur noch ein Label hast, wieso benutzt du dann noch

Delphi-Quellcode:

Schlecht.Visible := n < 4; // 0, 1, 2, 3
   Ok.Visible := (n > 3) and (n < 7); // 4, 5, 6
   Gut.Visible := (n > 6) and (n < 10); // 7, 8, 9
   Perfekt.visible := n = 10; // 10

?