anchor.diff:      procedure BackClick(Sender: TObject);
       procedure DeleteClick(Sender: TObject);
       procedure DeleteConfirm(aVisible: Boolean);
  +    procedure RenameClick(Sender: TObject);
  +    procedure RenameConfirm(aVisible: Boolean);
   
     protected
       Panel_Replays:TKMPanel;
  
positive.code:   Panel_Replays := TKMPanel.Create(aParent, 0, 0, aParent.Width, aParent.Height);
    Panel_Replays.AnchorsStretch;
  
      TKMLabel.Create(Panel_Replays, aParent.Width div 2, 50, gResTexts[TX_MENU_LOAD_LIST], fnt_Outline, taCenter);
  
      TKMBevel.Create(Panel_Replays, 22, 86, 770, 50);
      Radio_Replays_Type := TKMRadioGroup.Create(Panel_Replays,30,94,300,40,fnt_Grey);
      Radio_Replays_Type.ItemIndex := 0;
      Radio_Replays_Type.Add(gResTexts[TX_MENU_MAPED_SPMAPS]);
      Radio_Replays_Type.Add(gResTexts[TX_MENU_MAPED_MPMAPS]);
      Radio_Replays_Type.OnChange := Replay_TypeChange;
  
      ColumnBox_Replays := TKMColumnBox.Create(Panel_Replays, 22, 150, 770, 425, fnt_Metal, bsMenu);
      ColumnBox_Replays.SetColumns(fnt_Outline, [gResTexts[TX_MENU_LOAD_FILE], gResTexts[TX_MENU_LOAD_DATE], gResTexts[TX_MENU_LOAD_DESCRIPTION]], [0, 250, 430]);
      ColumnBox_Replays.Anchors := [anLeft,anTop,anBottom];
      ColumnBox_Replays.SearchColumn := 0;
      ColumnBox_Replays.OnChange := Replays_ListClick;
      ColumnBox_Replays.OnColumnClick := Replays_Sort;
      ColumnBox_Replays.OnDoubleClick := Replays_Play;
  
      with TKMBevel.Create(Panel_Replays, 805, 290, 199, 199) do Anchors := [anLeft];
      MinimapView_Replay := TKMMinimapView.Create(Panel_Replays,809,294,191,191);
      MinimapView_Replay.Anchors := [anLeft];
  
      Button_ReplaysBack := TKMButton.Create(Panel_Replays, 337, 700, 350, 30, gResTexts[TX_MENU_BACK], bsMenu);
      Button_ReplaysBack.Anchors := [anLeft,anBottom];
      Button_ReplaysBack.OnClick := BackClick;
  
      Button_ReplaysPlay := TKMButton.Create(Panel_Replays, 337, 590, 350, 30, gResTexts[TX_MENU_VIEW_REPLAY], bsMenu);
      Button_ReplaysPlay.Anchors := [anLeft,anBottom];
      Button_ReplaysPlay.OnClick := Replays_Play;
  
      Button_Delete := TKMButton.Create(Panel_Replays, 337, 624, 350, 30, gResTexts[TX_MENU_REPLAY_DELETE], bsMenu);
      Button_Delete.Anchors := [anLeft,anBottom];
      Button_Delete.OnClick := DeleteClick;
  
      Label_DeleteConfirm := TKMLabel.Create(Panel_Replays, aParent.Width div 2, 634, gResTexts[TX_MENU_REPLAY_DELETE_CONFIRM], fnt_Outline, taCenter);
      Label_DeleteConfirm.Anchors := [anLeft,anBottom];
      Label_DeleteConfirm.Hide;
  
      Button_DeleteConfirm := TKMButton.Create(Panel_Replays, 337, 660, 170, 30, gResTexts[TX_MENU_LOAD_DELETE_DELETE], bsMenu);
      Button_DeleteConfirm.Anchors := [anLeft,anBottom];
      Button_DeleteConfirm.OnClick := DeleteClick;
      Button_DeleteConfirm.Hide;
  
      Button_DeleteCancel  := TKMButton.Create(Panel_Replays, 517, 660, 170, 30, gResTexts[TX_MENU_LOAD_DELETE_CANCEL], bsMenu);
      Button_DeleteCancel.Anchors := [anLeft,anBottom];
      Button_DeleteCancel.OnClick := DeleteClick;
      Button_DeleteCancel.Hide;
  end;
  
  
  
negative.code:   end;
  end;
  
  procedure TKMMenuReplays.RenameConfirm(aVisible: Boolean);
  begin
    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);
  var
    OldSelection: Integer;
  begin
    if ColumnBox_Replays.ItemIndex = -1 then Exit;
  
    if Sender = Button_Rename then
      RenameConfirm(True);
  
    if (Sender = Button_RenameConfirm) or (Sender = Button_RenameCancel) then
      RenameConfirm(False);
  
    // Change name of the save
    if Sender = Button_RenameConfirm then
    begin
      // fSaves.RenameSave(ColumnBox_Replays.ItemIndex); <-- Have to create this function still, will go in fSaves to comply to curent format of code.
      Replays_RefreshList(False);
      ColumnBox_Replays.ItemIndex := -1;
      Replays_ListClick(ColumnBox_Replays);
    end;
  end;
  
  procedure TKMMenuReplays.Show;
  begin
    //Copy/Pasted from SwitchPage for now (needed that for ResultsMP BackClick)
  