anchor.diff:  begin
     FClient := THGDClient.Create(edtHost.Text, edtPort.Text, edtUser.Text,
       edtPwd.Text, chkSSL.Checked, frmDebug.Memo1);
  -
  -  FCurrentlyDisplayedArtwork := '';
  -  FVotedOffId := -1;
   
     FLastFM := TLastFM.Create(frmSettings.edtLastFMUser.Text);
     tmrPlaylistTimer(Self);
  
positive.code: 
  procedure TfrmMain.FormCreate(Sender: TObject);
  begin
  
  end;
  
  procedure TfrmMain.FormDestroy(Sender: TObject);
  
negative.code:     FLastFM: TLastFM;
      FCurrentlyDisplayedArtwork: string;
      FVotedOffId: integer;
      FArtworkAttempts: integer;
      procedure Log(Message: string);
      procedure ShowNowPlaying(b: boolean);
      procedure ShowStatus(Msg: string; Error: boolean);
  