anchor.diff:    Panel_Single := TKMPanel.Create(aParent, 0, 0, aParent.Width, aParent.Height);
     Panel_Single.AnchorsStretch;
   
  -    Half := (aParent.Width - PAD_SIDE) div 2 - PAD_SIDE;
  +    Half := GetPanelHalf;
   
       TKMBevel.Create(Panel_Single, (aParent.Width + PAD_SIDE) div 2, PAD_VERT + 20, Half, 70);
   
  
positive.code:                         Inc(K);
                        end;
            end;
          end;
        finally
          fMaps.Unlock;
  
negative.code: end;
  
  
  function TKMMenuSingleMap.GetPanelHalf: Integer;
  begin
    Result := (Panel_Single.Width - PAD_SIDE) div 2 - PAD_SIDE;
  end;
  
  
  
  procedure TKMMenuSingleMap.Create_SingleMap(aParent: TKMPanel);
  var
    I, Left: Integer;
    Half, ButtonW: Word; //Half width for panes
    L: TKMLabel;
    B: TKMBevel;
  