FilterIpAddr_ItemIndex := ReadInteger (section, 'FilterIpAddr_ItemIndex', 0) ; FilterProtocol_ItemIndex := ReadInteger (section, 'FilterProtocol_ItemIndex', 0) ; IpAddrList_Lines.CommaText := ReadString (section, 'IpAddrList_Lines', '') ; if ReadString (section, 'IpAddrLocal_Checked', 'False') = 'True' then IpAddrLocal_Checked := true else IpAddrLocal_Checked := false ; MonAdptList_ItemIndex := ReadInteger (section, 'MonAdptList_ItemIndex', 0) ; MonIpList_ItemIndex := ReadInteger (section, 'MonIpList_ItemIndex', 0) ; if ReadString (section, 'MonPromiscuous_Checked', 'False') = 'True' then MonPromiscuous_Checked := true else MonPromiscuous_Checked := false ; if ReadString (section, 'ProtocolIRC_Checked', 'False') = 'True' then ProtocolIRC_Checked := true else ProtocolIRC_Checked := false ; PortsList_Lines.CommaText := ReadString (section, 'PortsList_Lines', '') ; if ReadString (section, 'ProtocolARP_Checked', 'False') = 'True' then ProtocolARP_Checked := true else ProtocolARP_Checked := false ; if ReadString (section, 'ProtocolBroadcast_Checked', 'False') = 'True' then ProtocolBroadcast_Checked := true else ProtocolBroadcast_Checked := false ; if ReadString (section, 'ProtocolDns_Checked', 'False') = 'True' then ProtocolDns_Checked := true else ProtocolDns_Checked := false ; if ReadString (section, 'ProtocolHttp_Checked', 'False') = 'True' then ProtocolHttp_Checked := true else ProtocolHttp_Checked := false ; if ReadString (section, 'ProtocolICMP_Checked', 'False') = 'True' then ProtocolICMP_Checked := true else ProtocolICMP_Checked := false ; if ReadString (section, 'ProtocolIPv4_Checked', 'False') = 'True' then ProtocolIPv4_Checked := true else ProtocolIPv4_Checked := false ; if ReadString (section, 'ProtocolIPv6_Checked', 'False') = 'True' then ProtocolIPv6_Checked := true else ProtocolIPv6_Checked := false ; if ReadString (section, 'ProtocolNonIp_Checked', 'False') = 'True' then ProtocolNonIp_Checked := true else ProtocolNonIp_Checked := false ; if ReadString (section, 'ProtocolSNMP_Checked', 'False') = 'True' then ProtocolSNMP_Checked := true else ProtocolSNMP_Checked := false ; if ReadString (section, 'ProtocolSyslog_Checked', 'False') = 'True' then ProtocolSyslog_Checked := true else ProtocolSyslog_Checked := false ; if ReadString (section, 'ProtocolTCP_Checked', 'False') = 'True' then ProtocolTCP_Checked := true else ProtocolTCP_Checked := false ; if ReadString (section, 'ProtocolUPnP_Checked', 'False') = 'True' then ProtocolUPnP_Checked := true else ProtocolUPnP_Checked := false ; if ReadString (section, 'ProtocolUdp_Checked', 'False') = 'True' then ProtocolUdp_Checked := true else ProtocolUdp_Checked := false ; if ReadString (section, 'ShowFullData_Checked', 'False') = 'True' then ShowFullData_Checked := true else ShowFullData_Checked := false ; if ReadString (section, 'ShowIgnoreData_Checked', 'False') = 'True' then ShowIgnoreData_Checked := true else ShowIgnoreData_Checked := false ; if ReadString (section, 'UseWinNCap_Checked', 'False') = 'True' then UseWinNCap_Checked := true else UseWinNCap_Checked := false ;