anchor.diff:       //   Nouzzove jsou uvolnena takove HV, ktera jsou pri BeforeClose jeste prevzata.
        procedure NouzReleaseCallbackErr(Sender:TObject; Data:Pointer);
   
  -     // callback pri zjistovani verze centraly
  -     procedure GotCSVersionOK(Sender:TObject; Data:Pointer);
  -     procedure GotCSVersionErr(Sender:TObject; Data:Pointer);
  -
  -     // callback pri zjistovani verze LI
  -     procedure GotLIVersionOK(Sender:TObject; Data:Pointer);
  -     procedure GotLIVersionErr(Sender:TObject; Data:Pointer);
  -
  -     // callback pri zjistovani adresy LI
  -     procedure GotLIAddrErr(Sender:TObject; Data:Pointer);
  -
        procedure LoksSetFuncOK(Sender:TObject; Data:Pointer);
        procedure LoksSetFuncErr(Sender:TObject; Data:Pointer);
   
  
positive.code:  F_Main.LogStatus('Centrála: komunikuje');
  
   F_Main.LogStatus('Zjišťuji verzi FW v centrále...');
   Self.callback_ok  := TTrakce.GenerateCallback(Self.GotCSVersionOK);
   Self.callback_err := TTrakce.GenerateCallback(Self.GotCSVersionErr);
   Self.GetCSVersion();
  end;
  
  procedure TTrkGUI.InitStopErr(Sender:TObject; Data:Pointer);
  
negative.code: end;
  
  ////////////////////////////////////////////////////////////////////////////////
  // callbacky pri nastavovani funkci hnacicho vozidel (F0-Fn)
  // data jsou TFuncCallback
  
  