dOPC Client Toolkit
Close
dOPCAE.TdOPCEventServer.Events

Events contains the TdOPCEvents that occurred on the server.

property Events: TdOPCEvents;
__property TdOPCEvents Events;
procedure TForm1.dOPCEventServer1EndUpdate(Sender: TObject); var Event: TdOPCEvent; i : integer; begin Memo1.Clear; for i := 0 to dOPCEventServer1.Events.Count-1 do begin Event := dOPCEventServer1.Events[i]; Memo1.Lines.Add(format('%s %s (%s)', [DateTimetoStr(Event.Time),Event.Msg,Event.Source])); end; end;
Kassl GmbH Copyright © 2019. All rights reserved.