listbox einträge löschen

A_Checker · Hält's aus hier Beiträge: 14

Hey, ich hab ein kleines Problem. ich hab ein Würfelprogramm programiert das würfelt bis die zahl 1 erscheint. Jetzt will ich aber das wenn man ein zweites mal auf den würfelbutton klickt, die vorherigen ergebnisse aus der listbox gelöscht sind und man braktisch wieder von vorne anfängt.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:

var anz, x, ergebnis, i:integer;

begin
randomize;
repeat
 begin;
  i:=random(6)+1;
  listbox1.items.add(inttostr(i));

 end;

until i=1;
for x := 0 to ListBox1.Items.Count-1 do
   ergebnis := ergebnis + StrToInt(ListBox1.Items[x]);

label2.caption:= inttostr(ergebnis);
anz := ListBox1.Items.count;
label3.Caption:= 'Würfe: ' + inttostr(anz);

end;

Moderiert von Narses: Delphi-Tags hinzugefügt

trm · Beiträge: 491 Erhaltene Danke: 19 Windows 7x64 Delphi 7

Braktisch gübbet nit.
Aber praktisch gesehen solltest Du vor Deinem randomize; einfach folgendes einfügen:

markieren

Delphi-Quelltext

1:	listbox1.items.clear;

Das löscht alle Einträge in der Listbox

Noch etwas:

Zähl mal Deine Einträge in der Listbox und vergleiche die mit der Anzahl, die Du Dir anzeigen lässt:

markieren

Delphi-Quelltext

1:	anz := ListBox1.Items.count;

Oftmals ist es so, dass Count immer um eins höher ist, als es tatsächlich der Fall ist.

Gruß
~Mathias

Moderiert von Narses: Delphi-Tags hinzugefügt

Ehemaliges Mitglied Erhaltene Danke: 1

trm hat folgendes geschrieben :

Oftmals ist es so, dass Count immer um eins höher ist, als es tatsächlich der Fall ist.

Was ist das für eine blödsinnige Aussage? Count gibt immer die Anzahl vorhandener Einträge wieder. Wäre ja auch schlimm, wenn das nicht so wäre. Nur wenn der Listenindex mit null beginnt, hat der letzte Eintrag natürlich den Index Count - 1.

trm · Beiträge: 491 Erhaltene Danke: 19 Windows 7x64 Delphi 7

Luckie, ich hoffe, Du kannst meinen Beitrag entschuldigen, weil ich mich nicht so gewählt ausgedrückt habe wie Du.
Ich wollte einfach nur helfen.
Außerdem hatte meine Aussage ja auch einen konkreten Hintergrund und stimmt.
Somit weiss ich nicht, warum das "eine blödsinnige Aussage" sein soll.

Ich habe Dich anders in Erinnerung

Gruß
~M.

Ehemaliges Mitglied Erhaltene Danke: 1

Tut mir leid, die Aussage war nicht ungenau, sondern schlicht weg falsch, so wie sie da steht. Das klingt so als wenn Count mal eins mehr oder eins weniger ausgibt, je nach belieben.

Manchmal muss man eben schon genau sein, sonst kommt es zu genau solchen Missverständnissen.

A_Checker · Hält's aus hier Beiträge: 14

super tausend Dank! Hat mir echt geholfen

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme