Winamp Control Library - Die ultimative *DLL für Winamp :)

[mimi]

ich habe das bei mir so gelöst:

Delphi-Quellcode:

  if Pos('F7 07 F8',str) > 0  then begin // Weiter
    if winamp.PlaylistPos+1 > winamp.GetPlaylistCount-1 then
      winamp.PlaylistPos:=0
    else
      winamp.PlaylistPos:=winamp.PlaylistPos+1;
    winamp.StartPlayback;
  end;

  if Pos('F7 01 FE',str) > 0 then begin // Zurück
    if winamp.PlaylistPos-1 >= 0 then
      winamp.PlaylistPos:=winamp.PlaylistPos-1
    else
      winamp.PlaylistPos:=winamp.GetPlaylistCount-1;

    winamp.StartPlayback;
  end;

und so funktioniert es sogar recht gut... nicht wundern wegen den pos es ist halt für meine vernbedingung und das ist der code für weiter *G*