Forum: Object-Pascal / Delphi-Language
Delphi
by TarantelFaser47,
14. Mär 2018
So sollte es in etwa sein.
Rechts daneben soll später noch ein Diagramm hin, welches die Würfe grafisch Anzeigt (in PaintBox bzw. Bitmap).
Forum: Object-Pascal / Delphi-Language
Delphi
by TarantelFaser47,
13. Mär 2018
Ich weis ehrlichgesagt nicht was ich damit anfangen soll .. :(
Forum: Object-Pascal / Delphi-Language
Delphi
by TarantelFaser47,
13. Mär 2018
Sorry das ich mich nur so schlecht ausdrücken könnte.
Heute min Informatik-Unterricht wurde uns die Lösung gezeigt:
For i := 1 to k do
begin
w1 := Random(6)+1;
w2 := Random(6)+1;
inc(summe);
Forum: Object-Pascal / Delphi-Language
Delphi
by TarantelFaser47,
12. Mär 2018
Also die Augenzahlen (6 und 5) sollen addiert werden, naja und dann soll in der Listbox bei: "Anzahl der 11: 1"
stehen (vorher stand da: "Anzahl der 11: 0")
und wenn nochmal ne 11 gewürfelt wird dann "Anzahl der 11: 2"
und wenn eine 7 gewürfelt wird dann "Anzahl der 7: 1"
und so weiter und so fort...
Forum: Object-Pascal / Delphi-Language
Delphi
by TarantelFaser47,
12. Mär 2018
Ja, also da soll die Anzahl der Zweien, Dreien, ..., Zwölfen angezeigt werden (später noch grafisch dargestellt)
aber wie schaffe ich es dass sich die Zahlen in der Listbox (wie in meinem letzten Beitrag beschrieben) erhöhen.
Also in der Listbox: wenn eine 7 gewürfelt wurde: Anzahl: 0 --> 1 --> 2 ---> 3 (so soll es dargestellt werden, damit man sehen kann wie die Anzahl steigt.
Forum: Object-Pascal / Delphi-Language
Delphi
by TarantelFaser47,
12. Mär 2018
Ok, danke für den Tipp.
Normalerweise steht in der Listbox ja nichts, und auf einmal, wenn k-mal gewürfelt wurde, werden alle Zahlen hineingeschrieben.
aber ich möchte es so machen dass wenn z.B. eine 2 gewürfelt wurde, die Anzahl der Zweien um 1 steigt und das auch so in der Listbox angezeigt wird.
Ich hoffe ich kann es irgendwie verständlich machen.
Forum: Object-Pascal / Delphi-Language
Delphi
by TarantelFaser47,
12. Mär 2018
Sorry, hatte gerade keine Zeit gehabt...
Die Sache ist die...
Ich hab ein Programm in dem 2 "Würfel" gewürfelt werden und die Augenzahlen dann addiert werden (also nur Zahlen von 2 bis 12).
Jetzt möchte ich die Zahlen of Integer;] in eine Listbox schreiben. Das ist auch kein Problem.
Bei meinem Info-Lehrer habe ich gesehen dass die Zahlen (in der Listbox) nicht aus dem nichts auftauchen,...
Forum: Object-Pascal / Delphi-Language
Delphi
by TarantelFaser47,
12. Mär 2018
Hi ich möchte ne Listbox in der Zahlen stehen, die sich erhöhen also 1 --> 2 ---> 3 (von Würfelsimulation (Zahlen von 2-12))
Danke für Hilfe!