anchor.diff:        begin
          Self.ClientAuthorise(Sender, true, user);
         end else begin
  -       Self.ClientAuthorise(Sender, false, nil, 'Špatné heslo');
  +       Self.ClientAuthorise(Sender, false, user, 'Špatné heslo');
         end;
      except
       // error pri parsovani -> oznamime chybu
  
positive.code: 
  implementation
  
  uses UserDb, User, TCPServerOR,  Trakce, THVDatabase, SprDb, TCPORsRef,
       fRegulator, fMain, TOblRizeni, TOblsRizeni, TechnologieTrakce, ownConvert;
  
  
  
negative.code: var addr:Integer;
  begin
   for addr := 0 to _MAX_ADDR-1 do
    begin
     if ((HVDb[addr] <> nil) and (HVDb[addr].Stav.regulators.Count > 0)) then
      begin
       authLog('reg', 'loco-release', '', 'Release loco '+IntToStr(HVDb[addr].adresa));
       HVDb[addr].RemoveRegulator(reg);
      end;
    end;
  
   if (not contextDestroyed) then
    begin
     authLog('reg', 'logout', TTCPORsRef(reg.Data).regulator_user.username, 'Logout from regulator');
     TTCPORsRef(reg.Data).regulator := false;
     TTCPORsRef(reg.Data).regulator_user := nil;
     TTCPORsRef(reg.Data).regulator_loks.Clear();
  