n-Dame: Ergebnisse in Listbox ausgeben

[alzaimar]

Ich glaub, er will die Lösung als Liste von Positionen anzeigen. Da jeweils nur eine Dame pro Spalte vorkommen darf, sollte eine Ausgabe wie z.B.
1,4,6,8,2,5,3,7 ausreichen.

Bastel Dir die Lösung zuerst in einen String und den fügst Du dann an die ListBox.Items an:

Delphi-Quellcode:

Function ArrayToStr (anArray : Array Of Integer) : String;
Var
  i : Integer;

Begin
  Result := '';
  For i:=Low(anArray) To High (anArray) do 
    Result := Result + IntToStr (anArray[i])+',';
  If Length (Result)>0 Then // Letztes ',' wieder wegschnippeln
    SetLength (Result, Length (Result) - 1);
End;


Procedure TForm1.AddSolution (aSolution : Array Of Integer);
Begin
  ListBox1.Add (ArrayToStr (aSolution))
End;