delphi - 在 Windows 事件日志（在 Delphi 中）的应用程序节点上创建自定义事件日志

Question

除了在 Windows 事件日志中的“应用程序”节点上之外，如何创建（在 Delphi 中）自定义事件日志？

//The code below write on the Application node only

with TEventLogger.Create('JarvisAgent') do
begin
  try
    try
      LogMessage(Msg, EVENTLOG_INFORMATION_TYPE, 0, 2);
    finally
      Free;
    end;
  except
  end;
end;

Answer 1

TEventLogger使用旧ReportEvent()API 记录消息。对于该 API，您必须在注册表中注册自定义日志文件及其支持的事件源名称、事件类型等。然后您可以TEventLogger使用您注册的事件源名称创建，消息将转到您注册的日志文件。

这都记录在 MSDN 上。

关于事件记录

事件记录元素

另见：

在 Windows-Eventlog 中写入 Delphi Event-ID 未找到

我对未安装 WinAPI ReportEvent 组件的回答。