Thema: Memory Spiel

Einzelnen Beitrag anzeigen

Benutzerbild von toms
toms
(CodeLib-Manager)

Registriert seit: 10. Jun 2002
4.648 Beiträge
 
Delphi XE Professional
 
#5

Re: Memory Spiel

  Alt 18. Mai 2006, 06:48
Hallo

Ich würde keine TImageList verwenden sondern die Bilder direkt aus einzelnen Bild Dateien laden.
Dann kann jeder noch eigene Bilder hinzufügen und z.B neue Sets erstellen.

Ihr könntet so vorgehen:
1. Die Pfade zu den Bilden zuerst in eine TStringList laden (jeweils 2 Mal den gleichen Pfad da Paare)
2. Dann TStringList mischeln.

Delphi-Quellcode:
procedure ShuffleList(L: TStrings);
var
  i, j: integer;
begin
  Randomize;
  for i := 0 to L.Count - 1 do
  begin
    j := Random(L.Count);
    if i <> j then
      L.Exchange(i, j);
  end;
end;
3. Dynamisch die TImages erstellen. (Je nach Grösse)
Dem Hint könntet Ihr den Pfad zuweisen. Dann kann man einfach überprüfen, ob 2 Bilder gleich sind.
Thomas
  Mit Zitat antworten Zitat