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