anchor.diff:  
   USES
           Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, Menus,
  -        modWinSize;
  +				StdCtrls, modWinSize;
   
   TYPE
   
   		{ TwinMain }
   
           TwinMain = CLASS(TForm)
  +							btnExit: TButton;
   							mnuWireExit: TMenuItem;
   							mnuWireSep1: TMenuItem;
   				mnuSorted3faze: TMenuItem;
  
positive.code: 				mnuWireSquare: TMenuItem;
  				mnuSorted1faze: TMenuItem;
  				mnuMain: TMainMenu;
  				PROCEDURE mnuWireExitClick(Sender: TObject);
      PROCEDURE mnuWireSquareClick(Sender: TObject);
          PRIVATE
                  { private declarations }
  
negative.code:       Application.Terminate;
  end;
  
  PROCEDURE TwinMain.btnExitClick(Sender: TObject);
  BEGIN
        Application.Terminate;
  end;
  
  END.
  
  