anchor.diff:    PL: TPlaylist;
     i: integer;
   begin
  -  sgPlaylist.RowCount := 1;
  -
     if Assigned(FClient) and (FClient.State >= hsConnected) then
     begin
       FClient.GetPlaylist(PL);
  
positive.code:       lblNoAlbumArt.Visible := False;
        imVoteOff.Visible := False;
      end;
    end;
  end;
  
  procedure TfrmMain.ShowStatus(Msg: string; Error: boolean);
  
negative.code:       btnSkip.Enabled := FClient.State >= hsAuthenticated;
        btnPause.Enabled := FClient.State >= hsAuthenticated;
        btnCrapSong.Enabled := FClient.State >= hsAuthenticated;
  
        sgPlaylist.RowCount := 1;
  
        for i := 0 to Length(PL) - 1 do
        begin
  