anchor.diff:      procedure DeleteClick(Sender: TObject);
       procedure DeleteConfirm(aVisible: Boolean);
       procedure RenameClick(Sender: TObject);
  +    procedure Edit_Rename_Change(Sender: TObject);
       procedure RenameConfirm(aVisible: Boolean);
   
     protected
  
positive.code:   if aVisible then
    begin
      Edit_Rename.Text := fSaves[ColumnBox_Replays.ItemIndex].FileName;
      PopUp_Rename.Show;
    end else
      PopUp_Rename.Hide;
  end;
  
  procedure TKMMenuReplays.RenameClick(Sender: TObject);
  
negative.code:   Edit_Rename := TKMEdit.Create(PopUp_Rename, 105, 97, 275, 20, fnt_Metal);
    Edit_Rename.Anchors := [anLeft,anBottom];
    Edit_Rename.AllowedChars := acFileName;
    Edit_Rename.OnChange := Edit_Rename_Change;
  
    Button_RenameConfirm := TKMButton.Create(PopUp_Rename, 20, 155, 170, 30, gResTexts[TX_MENU_REPLAY_RENAME_CONFIRM], bsMenu);
    Button_RenameConfirm.Anchors := [anLeft,anBottom];
  