Hallo Matze,
ich würde neben jeden Würfel eine CHECKBOX platzieren mit der ich festlege ob der Würfel so liegen bleiben soll oder ob mit Ihm neu gewürfelt wird. Wenn man dann noch ein StrinGrid mit den möglichen Punkten 1er 2er …Full House .. kl.Strasse etc anlegt kann man durch auswahl der Cell gleich die Werte eintragen lassen
Eine andere Möglichkeit: das ganze in eine Stringlist einzutragen. Diese führt dann mit der Methode sort eine Sortierung durch
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
MyList: Tstrings; //!!!!
begin
MyList := TStringList.Create;
try
MyList.Add(inttostr(w[1])); // Würfel 1
MyList.Add(inttostr(w[2])); // Würfel 2
MyList.Add(inttostr(w[3])); // Würfel 3
MyList.Add(inttostr(w[4])); // Würfel 4
MyList.Add(inttostr(w[5])); // Würfel 5
MyList.Sort; werte werden sortieert
finally
MyList.Free;
end;
end;