Markierung in Listbox aufheben?

[Andreas Käding]

Hallo!
Warum bekomme ich bei folgendem Code eine Indexverletzung?
Und warum liefert die If - Bedingung beim ersten Durchlauf True, obwohl z.B. der dritte Eintrag markiert ist?
for i:=0 to (lbPeriode.Items.Count -1) do
if lbPeriode.Selected[i] then
lbPeriode.Selected[i]:= False;

m.f.G. Andreas Käding

[Uli Becker]

Hallo,

der Code ist korrekt (wobei du die 2. If-Schleife auch weglassen kannst).

In welchem Zusammenhang wird der Code denn aufgerufen?

Gruß Ul

[Bernhard Geyer]

Bei mir funktionierts.

Lösch mal alle schon kompilierten Dateien deines Projekts (alle *.dcu-Dateien). Vielleicht sind hier noch irgenwelche überbleibsel von älteren Compilierungen die er hier noch verwendet

[Andreas Käding]

Ich rufe den Code im Change - Ereignis eines Edits auf.
In dem Edit zeige ich den markierten Eintrag der Listbox an, um ihn zu bearbeiten.
Ich mache einen impliziten Wechsel vom Ändern in den Neumodus, wenn der Inhalt des Edits gelöscht wird

[Uli Becker]

Hallo,

das OnChange-Event wird ja bereits ausgelöst, wenn du den markierten Eintrag der Listbox zuweist. Das kann Probleme geben.

Nimm doch mal den Code aus dem OnChange raus und führe in z.B. in einem Button aus.

Gruß Ul