Wenn die Verzeichnisse immer genauso heißen wie der Text in der Combobox, geht es noch einfacher für alle:
Delphi-Quellcode:
Image1.Picture.LoadFromFile(Format('%sItems\%s\%d.jpg',
[ExtractFilePath(ParamStr(0)), Form14.ComboBox1.Text, TrackBar1.Position]);
Sprich immer das Hauptverzeichnis der Exe, das Unterverzeichnis aus der Combobox und den Dateinamen aus der Trackbar, dazu noch .jpg als Dateierweiterung.