brauche ne kleine Hilfe zu Kniffel :)

[SubData]

Delphi-Quellcode:

const
  Wuerfel : Array[0..6] of String = ('', '1.jpg', '2.jpg', '3.jpg', '4.jpg', '5.jpg', '6.jpg');
begin
  Image = Wuerfel[wurfel1];
end;