Ich habe das jetzt ausprobiert:
Delphi-Quellcode:
var
el: TEventLog;
begin
el := TEventLog.Create(nil);
try
el.Open('Application');
el.Report(EVENTLOG_INFORMATION_TYPE, 'test');
el.Close;
finally
FreeAndNil(el);
end;
Aber da erscheint auch kein Einztag im EventLog.