FilterIpAddr.ItemIndex := ReadInteger (section, 'FilterIpAddr_ItemIndex', FilterIpAddr.ItemIndex) ; FilterProtocol.ItemIndex := ReadInteger (section, 'FilterProtocol_ItemIndex', FilterProtocol.ItemIndex) ; IpAddrList.Lines.CommaText := ReadString (section, 'IpAddrList_Lines', IpAddrList.Lines.CommaText) ; if ReadString (section, 'IpAddrLocal_Checked', 'False') = 'True' then IpAddrLocal.Checked := true else IpAddrLocal.Checked := false ; MonAdptList.ItemIndex := ReadInteger (section, 'MonAdptList_ItemIndex', MonAdptList.ItemIndex) ; MonIpList.ItemIndex := ReadInteger (section, 'MonIpList_ItemIndex', MonIpList.ItemIndex) ; 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', PortsList.Lines.CommaText) ; 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 ;