dOPC Client Toolkit Help file
Example
procedure TForm1.dOPCEventServer1Event(Sender: TObject; Event: TdOPCEvent);
begin
  Memo1.Lines.Insert(0,(format('%s %s (%s)',
    [DateTimetoStr(Event.Time),Event.Msg,Event.Source])));
end;
Copyright © 2001-2014 Kassl GmbH (http://www.kassl.de). All rights reserved.