Bildschups Puzzle wie die Bilder mischen?

[Korg PA 2x Pro]

Hallo Leute,

ich habe folgendes Problem: Ich soll ein Schiebepuzzle programmieren, z.B.(http://www.zimberfamily.de/thomas/puzzle_03.html) was auch soweit schon funktioniert bis auf das Mischen der Bilder.

Ich lese die Bilder in ein Image mit dem Befehl Image1.picture.loadfromfile() ein diese sind mit einem zweidimensionalen Array verknüpft.

Habt ihr eine Idee, wie ich den Code schreiben soll, der mir das mischen der Bilder per klick auf einen Button ermöglicht.

Vielen Dank im vorruas!

MFG Korg PA 2x Pro

[Blup]

Stichwort: Zufallszahlen, Lottozahlen

Hier auch was von mir zu dem Thema:
http://www.delphipraxis.net/internal...t.php?t=151677

Delphi-Quellcode:

var
  Zufallsreihenfolge: TIntegerDynArray;
  i: integer;
  img: TImage;
begin
  Zufallsreihenfolge := Lottozahlen(1, x, x);

  for i := 1 to x do
  begin
    img := FindComponent(Form1, 'Image' + IntToStr(i));
    if Assigned(img) then
    begin
      img.Picture.LoadFromFile('Bild' + IntToStr(Zufallsreihenfolge[i - 1]));
      img.Tag := i;
    end;
  end;
end;

[Korg PA 2x Pro]

Vielen Dank, für Deine Hilfe!
Leider kam ich mit dem Code nicht wirklich weiter!

Hat jemand noch eine andere Idee?

Gruß Korg Pa 2x Pro