anchor.diff:      Reg.WriteInteger('PortNumber', seRDPPort.Value);
     except
   
  +  end;
  +  if OldPort <> seRDPPort.Value then
  +  begin
  +    OldPort := seRDPPort.Value;
  +    ExecWait('netsh advfirewall firewall set rule name="Remote Desktop" new localport=' + IntToStr(OldPort));
     end;
     case rgNLA.ItemIndex of
       0: begin
  
positive.code:   except
  
    end;
    SecurityLayer := 0;
    UserAuthentication := 0;
    try
  
negative.code: {
    Copyright 2016 Stas'M Corp.
  
    Licensed under the Apache License, Version 2.0 (the "License");
    you may not use this file except in compliance with the License.
  