Nach bestimmer Variable bestimme Aktion ausführen

[Klaus01]

.. wie schaut es mit case aus?

Delphi-Quellcode:

case n of
  0..3 : Schlecht.Visible := True;
  4..6 : Ok.Visible := True;
  7..9 : Gut.Visible := True;
    10 : Perfekt.visible := True;
end;

Grüße
Klaus