Hallo, habe heut mein D7 Projekt in XE2 geöffnet und habe beim unveränderten Quellcode beim Kompilieren folgenden Fehler bekommen:
[DCC Fehler] Zu viele lokale Konstanten. Verwenden Sie kürzere Prozeduren.
Der Code der den fehler verursacht lautet
Delphi-Quellcode:
if (Form14.ComboBox1.Text = 'Amulette') and (TrackBar1.Position= 0 ) then Image1.Picture.LoadFromFile(ExtractFilePath(ParamStr(0))+'Items/Amulette/0.jpg');
if (Form14.ComboBox1.Text = 'Amulette') and (TrackBar1.Position= 1 ) then Image1.Picture.LoadFromFile(ExtractFilePath(ParamStr(0))+'Items/Amulette/1.jpg');
if (Form14.ComboBox1.Text = 'Amulette') and (TrackBar1.Position= 2 ) then Image1.Picture.LoadFromFile(ExtractFilePath(ParamStr(0))+'Items/Amulette/2.jpg');
-das geht 5000 Zeilen so weiter-
Nun ist die Frage wie ich den Code kleiner kriege oder anders den Fehler umgehe?
Bin für jede Hilfe dankbar.