wenn ich felder zu double mach, dann gibts ärger mit dem da
Delphi-Quellcode:
case Felder of
2: Feld2.Color := clGreen;
3: Feld3.Color := clGreen;
4: Feld4.Color := clGreen;
5: Feld5.Color := clGreen;
6: Feld6.Color := clGreen;
7: Feld7.Color := clGreen;
8: Feld8.Color := clGreen;
9: Feld9.Color := clGreen;
10: Feld10.Color := clGreen;
11: Feld11.Color := clGreen;
12: Feld12.Color := clGreen;
13: Feld13.Color := clGreen;
14: Feld14.Color := clGreen;
15: Feld15.Color := clGreen;
16: Feld16.Color := clGreen;
17: Feld17.Color := clGreen;
18: Feld18.Color := clGreen;
19: Feld19.Color := clGreen;
20: Feld20.Color := clGreen;
21: Feld21.Color := clGreen;
22: Feld22.Color := clGreen;
23: Feld23.Color := clGreen;
24: Feld24.Color := clGreen;
25: Feld25.Color := clGreen;
26: Feld26.Color := clGreen;
27: Feld27.Color := clGreen;
28: Feld28.Color := clGreen;
29: Feld29.Color := clGreen;
30: Feld30.Color := clGreen;
end;