anchor.diff:    private
       procedure SwitchMenuPage(Sender: TObject);
       procedure SingleMap_RefreshList();
  +    procedure SingleMap_SelectMap(Sender: TObject);
  +    procedure SingleMap_SelectDiff(Sender: TObject);
       procedure SingleMap_Start(Sender: TObject);
       procedure MainMenu_PlayTutorial(Sender: TObject);
     public
  
positive.code: procedure TKMMainMenuInterface.Create_Single_Page;
  var i:integer;
  begin
    KMPanel_Single:=MyControls.AddPanel(KMPanel_Main1,0,0,ScreenX,ScreenY);
  
      KMImage_SingleBG:=MyControls.AddImage(KMPanel_Single,0,0,ScreenX,ScreenY,2,5);
  
negative.code: 
  destructor TKMMainMenuInterface.Destroy;
  begin
    FreeAndNil(SingleMapsInfo);
    FreeAndNil(MyControls);
    inherited;
  end;
  