anchor.diff:    tmrState.Enabled := False;
   
     ShowStatus('Applying...', False);
  -  XMLPropStorage1.Save;
  +  XMLPropStorage1.Save();
   
     FClient.HostAddress := edtHost.Text;
     FClient.HostPort := edtPort.Text;
  
positive.code:       btnSkip.Enabled := FClient.State >= hsAuthenticated;
        btnPause.Enabled := FClient.State >= hsAuthenticated;
        btnCrapSong.Enabled := FClient.State >= hsAuthenticated;
  
        for i := 0 to Length(PL) - 1 do
        begin
  
negative.code:   PL: TPlaylist;
    i: integer;
  begin
    if Assigned(FClient) and (FClient.State >= hsConnected) then
    begin
      FClient.GetPlaylist(PL);
  