procedure TMainForm.AcknowledgeAll1Click(Sender: TObject); begin if dOPCEventServer1.Active then dOPCEventServer1.AcknowledgeNotActiveEvents('ALL','Acknowledge all not active'); end;