Thema: Delphi Listbox Zahlen erhöhen

Einzelnen Beitrag anzeigen

Delphi.Narium

Registriert seit: 27. Nov 2017
2.400 Beiträge
 
Delphi 7 Professional
 
#16

AW: Listbox Zahlen erhöhen

  Alt 12. Mär 2018, 23:15
Naja, die Idee mit dem Array ist ja nicht verkehrt. Die Items einer Listbox sind ja eigentlich auch eins.

Wenn man nun ein Array für die Berechnung hat und das auch alles funktioniert, dann braucht man nur noch eine Routine, die den Arrayeintrag an die entsprechende Position der Listbox schreibt.

Das Array geht von 2 bis 12. Die Listboxitems beginnen jedoch bei 0.

Wenn man den richtigen Eintrag in der Listbox haben will, muss man nur die Position aus dem Array nehmen und dann 2 abziehen.

Der Eintrag in der Listbox könnte dann ungefähr so aktuallisiert werden:
Delphi-Quellcode:
// x ist die gewürfelte Zahl.
Array[x] := Array[x] + 1;
Listbox.Items[x - 2] := Format('%d: %d',[x,Array[x]]);
  Mit Zitat antworten Zitat