anchor.diff:  
   constructor TvtxHTTPServer.Create(CreateSuspended: boolean);
   begin
  -	fProgress := '';
  -	FreeOnTerminate := True;
  -	inherited Create(CreateSuspended);
  +  fProgress := '';
  +  FreeOnTerminate := True;
  +  inherited Create(CreateSuspended);
   end;
   
   destructor TvtxHTTPServer.Destroy;
  
positive.code: 
  procedure TvtxApp.HTTPTerminate(Sender : TObject); register;
  begin
  	WriteCon('HTTP Terminated.');
  end;
  
  procedure TvtxApp.BridgeTerminate(Sender: TObject);
  begin
    WriteCon('Bridge Terminated.');
  end;
  
  procedure TvtxApp.NannyTerminate(Sender: TObject);
  begin
  	WriteCon('Process Terminated.');
  end;
  
  procedure TvtxApp.WSBeforeAddConnection(
    		Server : 			TCustomServer;
        aConnection :	TCustomConnection;
    var CanAdd : 			boolean); register;
  begin
  	WriteCon('Before Add WS Connection.');
  end;
  
  procedure TvtxApp.WSAfterAddConnection(
  
negative.code:   sect = 'Config';
  
  begin
    iin := TIniFile.Create('vtxserv.ini');
    SystemInfo.SystemName :=  iin.ReadString(sect, 'SystmeName',  'A VTX Board');
    SystemInfo.SystemIP :=    iin.ReadString(sect, 'SystemIP',    'localhost');
    SystemInfo.InternetIP :=  iin.ReadString(sect, 'InternetIP',  '142.105.247.156');
    SystemInfo.HTTPPort :=    iin.ReadString(sect, 'HTTPPort',    '7001');
    SystemInfo.WSPort :=      iin.ReadString(sect, 'WSPort',      '7003');
    SystemInfo.ExtProcess :=  iin.ReadString(sect, 'ExtProcess',  'cscript.exe //Nologo //I test.js @UserIP@');
    SystemInfo.MaxConnections := iin.ReadInteger(sect, 'MaxConnections',  32);
    iin.Free;
  end;
  
  