Write(Message: String; eventType: SysEventType);
Write(Message: String; eventType: Prognoz.Platform.Interop.ForeSystem.SysEventType);
Message. Текст события;
eventType. Категория события.
Метод Write создает запись в журнале событий Windows.
Параметр eventType не может принимать значение Null.
Для примера на Fore.NET добавьте ссылки на системные сборки: ForeSystem, WinForms.Utils.
Sub UserProc;
Var
WinLog: ISysEventLog;
Begin
WinLog := New SysEventLog.Create;
WinLog.Write("Предупреждение!", SysEventType.Warning);
End Sub UserProc;
Imports Prognoz.Platform.Interop.ForeSystem;
Imports Prognoz.Platform.PiLibNet.Utils;
Public Sub UserProc();
Var
WinLog: SysEventLog = ComCreator.Instance.CoCreate<SysEventLogClass>();
Begin
WinLog.Write("Предупреждение!", SysEventType.setWarning);
End Sub;
После выполнения примера в журнале событий Windows будет сделана запись.
См. также: