anchor.diff:    _LOG_PATH = 'log\trakce';
   
   type
  +  TReadyEvent = procedure (Sender:TObject; ready:boolean) of object;
     TLogEvent = procedure(Sender:TObject; lvl:TTrkLogLevel; msg:string; var handled:boolean) of object;
     TGetSpInfoEvent = procedure(Sender: TObject; Slot:TTrkLocoInfo; var handled:boolean) of object;
     TGetFInfoEvent = procedure(Sender: TObject; Addr:Integer; func:TFunkce; var handled:boolean) of object;
  
positive.code:    raise Exception.Create('Library file not found, not loading');
  
   if (Self.ready) then
     Self.aReady := false;
  
   TTrakceIFace(Self).LoadLib(filename);
  
  
negative.code:      function NearestLowerSpeed(speed:Cardinal):Cardinal;
  
       property OnLog: TLogEvent read FOnLog write FOnLog;
       property OnReady:TReadyEvent read fOnReady write fOnReady;
  
       property logLevelFile: TTrkLogLevel read mLogLevelFile write SetLoglevelFile;
       property logLevelTable: TTrkLogLevel read mLogLevelTable write SetLoglevelTable;
  
  