var Filter : tdOPCEventFilter; begin Filter := dOPCEventServer1.Filter[0]; //get first filter Filter.Areas.Clear Filter.Areas.Add('Area 1') Filter.Areas.Add('Area 2') Filter.Refresh; end;