how can I writing windows log event with event source

Question

I'm trying to write an windows log event.

I read this answer, and tried to use it but had the same problem reported here "The description for Event ID 1 from source PLCHIDSrv cannot be found..."

I'm trying this solution but do not know how to implement this code in Delphi

var data = new EventSourceCreationData("yourApp", "Application");
data.MessageResourceFile = pathToYourMessageFile;
EventLog.CreateEventSource(data);

Answer 1

You are receiving that error because you are not adding the event source to the Windows Registry.

Check the MSDN Documentation :

You can use the default Application log without adding an event source to the registry. However, Event Viewer will not be able to map your event identifier codes to message strings unless you register your event source and provide a message file.

The same link contains a sample with a C++ Code , which can be easily translated to Delphi.

UPDATE

I just found this article Writing an event logger with Delphi 2010 which shows how add an event source to the registry and write to the event log.