Einzelnen Beitrag anzeigen

Benutzerbild von sx2008
sx2008

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

AW: Sudoku Generator (Anfänge)

  Alt 26. Jan 2013, 23:25
Mittlerweile hab ich den Generator schon wieder etwas mehr verbessert(durchschnittlich ~5 Sekunden für ein Sudoku)
Wenn du ein 9 * 9 Array verwenden würdest, wäre der Code bestimmt 10 Mal schneller als wenn du immer auf dem StringGrid rumreitest.
Erst wenn das Sudoku erzeugt ist, wird es auf das StringGrid kopiert.

Delphi-Quellcode:
type
  // 0 bedeutet Feld ist leer; 1 - 9 entsprechen den Ziffern
  TSudokuZiffer = 0..9;

  // 81 Felder
  TSudokuField = array[1..9, 1..9] of TSudokuZiffer;
var
  sfeld : TSudokuField;

procedure CopyToStringgrid(grid:TStrinGrid);
begin
  // kopiere den Inhalt von array "sfeld" in das Stringrid
  // das lässt sich mit zwei geschachtelten For-Schleifen erledigen
end;

Geändert von sx2008 (26. Jan 2013 um 23:29 Uhr)
  Mit Zitat antworten Zitat