PascalABC.NET
October 23

Логирование в PascalABC.NET

✦ Устанавливаем пакет NLog командой nuget install NLog.
✦ Копируем dll в папку проекта
✦ Создаем конфигурационный файл nlog.config:

<nlog xmlns="http://www.nlog-project.org/schemas/NLog.xsd"
      xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
  <targets>
    <target xsi:type="File" name="logfile" fileName="log.txt" />
  </targets>
  <rules>
    <logger name="*" minlevel="Info" writeTo="logfile" />
  </rules>
</nlog>

✦ Пишем программу для логирования:

{$reference 'NLog.dll'}
uses NLog;
begin
  // Инициализация логгера
  LogManager.LoadConfiguration('nlog.config');
  var log := LogManager.GetCurrentClassLogger;
  
  // Запись логов
  log.Info('Программа запущена');
  
  try
    var a := 10;
    var b := 0;
    var c := a div b; // Это вызовет исключение
  except
    on e: Exception do
      log.Error('Ошибка: ' + e.Message);
  end;
  
  log.Info('Программа завершена');
end.

Готово!