Thema: Delphi Listbox Zahlen erhöhen

Einzelnen Beitrag anzeigen

Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.685 Beiträge
 
Delphi 11 Alexandria
 
#14

AW: Listbox Zahlen erhöhen

  Alt 12. Mär 2018, 21:11
Dann darf in der ButtonClick das Array natürlich nicht auf 0 zurückgesetzt werden.
Genau deshalb hab ich es anfangs nicht verstanden und mehr und mehr nachgefragt

PS: Vieleicht wäre es einfacher 2 Reihen á 10 Labels fest zu platzieren?
Linke Labels bekommen Beschriftung wie "Würfelsumme 11", daneben ein Label mit einer Summe ala IntToStr(das Würfel-Array mit der 11)
ODER (auf's Array verzichten und so hier)
den Werte-Labels passende Namen geben, w11 zum Beispiel als Name für Würfelsumme 11,
beim Programm-Start den Werte-Labeln alle eine "0" geben,
und wenn nun ein Ergebniss 11 kommt, nurnoch w11.Caption := IntToStr(StrToInt(w11.Caption)+1);
Das für jede Würfelkombination sollte auch passend sein.
Gruß vom KodeZwerg

Geändert von KodeZwerg (12. Mär 2018 um 21:23 Uhr)
  Mit Zitat antworten Zitat