Bestimmte Zeile aus Listbox entfernen

$ebbi · Beiträge: 35

Hey,

ich würde gerne alle Einträge aus der Listbox entfernen, die auf den Buchstaben 'p' enden.

Delphi-Quelltext

1:
2:
3:
4:
5:

for x := 0 to Listbox1.items.Count - 1 do
  begin
    string:=listbox1.Items.Strings[x];
    if string[length(string)] = 'p' then listbox1.Items.Delete[x];
  end;

dummerweise bekomme ich hier die Felehrmeldung "Nicht genügend wirkliche Parameter". Woran liegt das? es scheint alles zu klappen wenn ich mir x anzeigen lasse erkennt er alles wunderbar. Ich denk die antwort ist bestimmt total einfach aber ich seh den Fehler einfach nicht

mfg Sebbi

Edit: Ich idiot hab das x in [] gesetzt () habs aber einfach nicht gesehen. Sry für den thread :(

Moderiert von Narses: Topic aus Sonstiges (Delphi) verschoben am Fr 18.05.2012 um 22:15

Narses · Verfasst: Fr 18.05.12 22:17

Moin!

$ebbi hat folgendes geschrieben :

markieren

Delphi-Quelltext

1:
2:
3:

for x := 0 to Listbox1.items.Count - 1 do
  begin
    string:=listbox1.Items.Strings[x];

Ich hoffe, du hast die Variable nicht wirklich "string" genannt, oder? Das ist keine gute Idee, da String ein reserviertes Wort und auch ein Funktionsname ist, also sehr viel Raum für Seiteneffekte lässt.

Nenn die Variable doch z.B. "tmpString" oder so. :idea:

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.

Delphi-Laie · Verfasst: Fr 18.05.12 22:40

Narses hat folgendes geschrieben :

Ich hoffe, du hast die Variable nicht wirklich "string" genannt, oder? Das ist keine gute Idee, da String ein reserviertes Wort und auch ein Funktionsname ist, also sehr viel Raum für Seiteneffekte lässt.

Diese Seiteneffekte sind ausgeschlossen. Ein reserviertes Wort kann man nicht als Variable deklarieren. Der Compiler verweigert die Übersetzung.

Mathematiker · Verfasst: Sa 19.05.12 08:26

Hallo $ebbi,
außer dem schon Genannten (Variable darf nicht string heißen), funktioniert auch die Zählschleife nicht, da zu Beginn der Schleife der Endwert ermittelt wird. Löschst Du einen Eintrag, so ändert sich die Zahl der Einträge, jedoch nicht der Endwert der Schleife. Besser ist eine endprüfende Schleife, z.B.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

  x := 0;
  repeat
    k:=listbox1.Items.Strings[x];
    if k[length(k)] = 'p' then listbox1.Items.Delete(x)
                          else inc(x);
  until x>Listbox1.items.Count - 1;

x wird nur dann erhöht, wenn der String nicht gelöscht wurde. Andernfalls überspringst Du Einträge.
Beste Grüße
Mathematiker

$ebbi · Beiträge: 35

Narses hat folgendes geschrieben :

Moin!

$ebbi hat folgendes geschrieben :

markieren

Delphi-Quelltext

1:
2:
3:

for x := 0 to Listbox1.items.Count - 1 do
  begin
    string:=listbox1.Items.Strings[x];

Ich hoffe, du hast die Variable nicht wirklich "string" genannt, oder? Das ist keine gute Idee, da String ein reserviertes Wort und auch ein Funktionsname ist, also sehr viel Raum für Seiteneffekte lässt.

Nenn die Variable doch z.B. "tmpString" oder so. :idea:

cu
Narses

keine angst

wollte nur zeigen dass es sich hier halt um eine string variable handelt war im nachhinein wohl nicht gut durchdacht

Mathematiker hat folgendes geschrieben :

Hallo $ebbi,
außer dem schon Genannten (Variable darf nicht string heißen), funktioniert auch die Zählschleife nicht, da zu Beginn der Schleife der Endwert ermittelt wird. Löschst Du einen Eintrag, so ändert sich die Zahl der Einträge, jedoch nicht der Endwert der Schleife. Besser ist eine endprüfende Schleife, z.B.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

  x := 0;
  repeat
    k:=listbox1.Items.Strings[x];
    if k[length(k)] = 'p' then listbox1.Items.Delete(x)
                          else inc(x);
  until x>Listbox1.items.Count - 1;

x wird nur dann erhöht, wenn der String nicht gelöscht wurde. Andernfalls überspringst Du Einträge.
Beste Grüße
Mathematiker

jop ist mir beim testen dann auch aufgefallen

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme