Und um es noch komplizierter zu machen, da sich hier in diesem Thread sonst wohl nichts mehr tut:
Delphi-Quellcode:
Schlecht.Visible := (n = 0) or (n = 1) or (n = 2) or (n = 3);
Ok.Visible := (n = 4) or (n = 5) or (n = 6);
Gut.Visible := (n = 7) or (n = 8) or (n = 9);
Perfekt.visible := n = 10;