Listbox.selected Problem

[iron]

Hallo und Guten Morgen an alle DP´s,

ich mach z.Zt einen mp3 PLayer und soweit schon gut vorrangekommen, nur macht mir im Moment die Selected meiner Listbox Probleme.

Ich will beim vorspringen zum nächsten Titel das die Zeile in der Listbox des Titels markiert wird, schön und gut das geht, nur beim weiterspringen wird dann der nächste Titel auch markiert.

Delphi-Quellcode:

if Playlist.ItemIndex = (Playlist.Count - 1) then
    Playlist.ItemIndex := 0
  else
    Playlist.ItemIndex := Playlist.ItemIndex + 1;

    Playlist.Selected[Playlist.ItemIndex] := True;

      BASS_Stop;
      BASS_Free;
      BASS_Init(-1, 44100, 0, Application.Handle, nil);
      Channel := BASS_StreamCreateFile(FALSE, PChar(OpenDialog1.FileName), 0, 0, 0);

      if Open(Playlist.Items[Playlist.ItemIndex]) then
      Play;

Ich hab das schon mit MultiSelect Probiert, bei True hat es den genannten effekt und bei False den gewünschten. Aber ich hätte gern das MultiSelect.

Also wie kann ich das hinbegommen bei MultiSelect das beim vorspringen des Titels die nächte Zeile markiert und die vorherige die markierung aufgehoben wird. So das immer nur die gerade abgespielte Zeile markiert ist.


Danke schonmal

[jmd anders]

was spricht dagegen das von "hand" zu machen also die einfach die letzte zeile wieder auf selected:=false zu setzen?

[iron]

Ach ja habs hinbekommen, die antwort war so nah und doch so fern, vielleicht sollte ich nun mal endlich pennen gehn, nach meiner Nachtschicht bei Delphi.

hab als letzte Zeile einfach

Delphi-Quellcode:

Playlist.Selected[Playlist.ItemIndex-1] := False;

gemacht und nun gehts.

Besten Dank