[DCC Fehler] Zu viele lokale Konstanten. Verwenden Sie kürzere Prozeduren.

[XPLOSIV]

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.