Write(Message: String; eventType: SysEventType);
Message. Текст события.
eventType. Категория события.
Метод Write создает запись в журнале событий Windows.
Параметр eventType не может принимать значение Null.
Для выполнения примера добавьте ссылку на сборку «Fore».
Sub UserProc;
Var
WinLog: ISysEventLog;
Begin
WinLog := New SysEventLog.Create;
WinLog.Write("Предупреждение!", SysEventType.Warning);
End Sub UserProc;
После выполнения примера в журнале событий Windows будет сделана запись.
См. также: