anchor.diff:  begin
     fMaps.UpdateState;
     fMapsMP.UpdateState;
  +  fMapsDL.UpdateState;
   end;
   
   
  
positive.code: 
    fMaps := TKMapsCollection.Create(mfSP);
    fMapsMP := TKMapsCollection.Create(mfMP);
    fMinimap := TKMMinimap.Create(True, True);
  
    Panel_MapEd:=TKMPanel.Create(aParent, 0, 0, aParent.Width, aParent.Height);
    Panel_MapEd.AnchorsStretch;
      Panel_MapEdSizeXY := TKMPanel.Create(Panel_MapEd, 80, 125, 200, 500);
      Panel_MapEdSizeXY.Anchors := [anLeft];
        TKMLabel.Create(Panel_MapEdSizeXY, 6, 0, 188, 20, gResTexts[TX_MENU_NEW_MAP_SIZE], fnt_Outline, taLeft);
        TKMBevel.Create(Panel_MapEdSizeXY, 0, 20, 200, 404);
        TKMLabel.Create(Panel_MapEdSizeXY, 8, 27, 88, 20, gResTexts[TX_MENU_MAP_WIDTH], fnt_Outline, taLeft);
        TKMLabel.Create(Panel_MapEdSizeXY, 108, 27, 88, 20, gResTexts[TX_MENU_MAP_HEIGHT], fnt_Outline, taLeft);
  
        Radio_MapEdSizeX := TKMRadioGroup.Create(Panel_MapEdSizeXY, 10, 52, 88, 332, fnt_Metal);
        Radio_MapEdSizeY := TKMRadioGroup.Create(Panel_MapEdSizeXY, 110, 52, 88, 332, fnt_Metal);
        for I := 1 to MAPSIZES_COUNT do
        begin
          Radio_MapEdSizeX.Add(IntToStr(MapSize[I]));
  
negative.code: end;
  
  
  procedure TKMMenuMapEditor.MoveClick(Sender: TObject);
  var
    OldSelection, NewSelection: Integer;
  begin
    Assert(Radio_MapEd_MapType.ItemIndex = 2);
  
    if ColumnBox_MapEd.ItemIndex = -1 then Exit;
  
    //Delete selected map
    if Sender = Button_MapDeleteConfirm then
    begin
      OldSelection := ColumnBox_MapEd.ItemIndex;
      //todo: Move it
      //fMapsDL.MoveMap(ColumnBox_MapEd.ItemIndex);
      RefreshList(False);
      if ColumnBox_MapEd.RowCount > 0 then
        ColumnBox_MapEd.ItemIndex := EnsureRange(OldSelection, 0, ColumnBox_MapEd.RowCount - 1)
      else
        ColumnBox_MapEd.ItemIndex := -1;
      NewSelection := ColumnBox_MapEd.ItemIndex;
      if NewSelection >= 0 then begin
        fMinimap.LoadFromMission(fMapsDL[NewSelection].FullPath('.dat'), []);
        fMinimap.Update(True);
        MinimapView_MapEd.SetMinimap(fMinimap);
        MinimapView_MapEd.Show;
      end
      else
        MinimapView_MapEd.Hide;
    end;
  end;
  
  
  procedure TKMMenuMapEditor.Show;
  begin
    ListUpdate;
  