anchor.diff:      turnoff_callback: TNotifyEvent;
   
       eOnReady: TReadyEvent;
  -    eOnOpenError: TErrorEvent;
   
       mLogLevelFile: TTrkLogLevel;
       mLogLevelTable: TTrkLogLevel;
  
positive.code: 
    TTrakceIFace(Self).LoadLib(filename, Self.configDir + '\' + ChangeFileExt(libName, '.ini'));
  
    Log(llInfo, 'Načtena knihovna ' + libName);
  
    if (Self.unbound.Count = 0) then
    begin
  
negative.code: procedure TTrakce.TrkLog(Sender: TObject; lvl: TTrkLogLevel; msg: string);
  begin
    Self.Log(lvl, msg);
    if ((Self.opening) and (lvl = llErrors) and (Assigned(Self.OnOpenError)) and (Self.apiVersion < $0101)) then
    begin
      Self.opening := false;
      Self.OnOpenError(Self, msg);
  