Einzelnen Beitrag anzeigen

Benutzerbild von sx2008
sx2008

Registriert seit: 16. Feb 2008
Ort: Baden-Württemberg
2.332 Beiträge
 
Delphi 2007 Professional
 
#5

AW: DrawCell mit Button

  Alt 1. Mai 2012, 23:22
Bei Minesweeper gibt es doch 11 Feldtypen:
* unbekannt (blauer Block)
* verdeckte Bombe (sieht genau gleich aus wie unbekannt)
* Leer
* Fahne
* Bombe (*)
* Bombe mit Fahne (*)
* explodierte Bombe (*)
* "1"
* "2"
* "3"
* "4"
Also brauchst du 11 Bildchen oder Icons.
Die Bildchen haben alle die gleiche Grösse und passen gut in eine TImageList.

Dein Spielfeld hat 9*9 Felder (später vielleicht mehr) und jedes Spielfeld kann einen von 11 verschiedenen Werten haben.
Die mit (*) markierten Zustände sieht man nur wenn das Spiel zuende ist.
Delphi-Quellcode:
var
  minesweeperfeld : array[1..9, 1..9] of Integer;
Das Grundprinzip ist nun, dass du bei einem Mausklick das minesweeperfeld[] veränderst und vom Drawgrid neu zeichnen lässt.

Geändert von sx2008 ( 1. Mai 2012 um 23:26 Uhr)
  Mit Zitat antworten Zitat