if ReadString (section, 'DataClient_Checked', 'False') = 'True' then DataClient_Checked := true else DataClient_Checked := false ;
  DataGap_Text := ReadString (section, 'DataGap_Text', '') ;
  if ReadString (section, 'DataServer_Checked', 'False') = 'True' then DataServer_Checked := true else DataServer_Checked := false ;
  DataServer_State := TCheckBoxState (ReadInteger (section, 'DataServer_State', Ord (cbUnchecked))) ;
  if ReadString (section, 'HeavyTraffic_Checked', 'False') = 'True' then HeavyTraffic_Checked := true else HeavyTraffic_Checked := false ;
  HeavyTraffic_State := TCheckBoxState (ReadInteger (section, 'HeavyTraffic_State', Ord (cbUnchecked))) ;
  LocalAddr_Text := ReadString (section, 'LocalAddr_Text', '') ;
  LocalPort_Text := ReadString (section, 'LocalPort_Text', '') ;
  if ReadString (section, 'LogErrors_Checked', 'False') = 'True' then LogErrors_Checked := true else LogErrors_Checked := false ;
  LogErrors_State := TCheckBoxState (ReadInteger (section, 'LogErrors_State', Ord (cbUnchecked))) ;
  if ReadString (section, 'LogInfo_Checked', 'False') = 'True' then LogInfo_Checked := true else LogInfo_Checked := false ;
  LogInfo_State := TCheckBoxState (ReadInteger (section, 'LogInfo_State', Ord (cbUnchecked))) ;
  MaxSockets_Text := ReadString (section, 'MaxSockets_Text', '') ;
  if ReadString (section, 'PingRemote_Checked', 'False') = 'True' then PingRemote_Checked := true else PingRemote_Checked := false ;
  Protocol_ItemIndex := ReadInteger (section, 'Protocol_ItemIndex', 0) ;
  ProxyURL_Text := ReadString (section, 'ProxyURL_Text', '') ;
  if ReadString (section, 'RawData_Checked', 'False') = 'True' then RawData_Checked := true else RawData_Checked := false ;
  RemoteHosts_Lines.CommaText := ReadString (section, 'RemoteHosts_Lines', '') ;
  RemotePort_Text := ReadString (section, 'RemotePort_Text', '') ;
  if ReadString (section, 'ReportChain_Checked', 'False') = 'True' then ReportChain_Checked := true else ReportChain_Checked := false ;
  if ReadString (section, 'RevokeCheck_Checked', 'False') = 'True' then RevokeCheck_Checked := true else RevokeCheck_Checked := false ;
  SendFileName_Text := ReadString (section, 'SendFileName_Text', '') ;
  ServerPort_Text := ReadString (section, 'ServerPort_Text', '') ;
  SocketFamily_ItemIndex := ReadInteger (section, 'SocketFamily_ItemIndex', 0) ;
  SrvTimeout_Text := ReadString (section, 'SrvTimeout_Text', '') ;
  SslCACerts_Text := ReadString (section, 'SslCACerts_Text', '') ;
  SslCertAuth_Text := ReadString (section, 'SslCertAuth_Text', '') ;
  SslCertKey_Text := ReadString (section, 'SslCertKey_Text', '') ;
  SslCliSec_ItemIndex := ReadInteger (section, 'SslCliSec_ItemIndex', 0) ;
  SslDomainName_Text := ReadString (section, 'SslDomainName_Text', '') ;
  SslCertPassword_Text := ReadString (section, 'SslCertPassword_Text', '') ;
  SslServCert_Text := ReadString (section, 'SslServCert_Text', '') ;
  SslSrvSec_ItemIndex := ReadInteger (section, 'SslSrvSec_ItemIndex', 0) ;
  if ReadString (section, 'UseSSL_Checked', 'False') = 'True' then UseSSL_Checked := true else UseSSL_Checked := false ;
  VerifyCertMode_ItemIndex := ReadInteger (section, 'VerifyCertMode_ItemIndex', 0) ;
  if ReadString (section, 'SslCertAutoOrder_Checked', 'False') = 'True' then SslCertAutoOrder_Checked := true else SslCertAutoOrder_Checked := false ;
  SslCertExpireDays_Text := ReadString (section, 'SslCertExpireDays_Text', '') ;
  SslCertSupplierProto_ItemIndex := ReadInteger (section, 'SslCertSupplierProto_ItemIndex', 0) ;
  SslCertChallenge_ItemIndex := ReadInteger (section, 'SslCertChallenge_ItemIndex', 0) ;
  SslCertPKeyType_ItemIndex := ReadInteger (section, 'SslCertPKeyType_ItemIndex', 0) ;
  SslCertSignDigest_ItemIndex := ReadInteger (section, 'SslCertSignDigest_ItemIndex', 0) ;
  SslCertDirWork_Text := ReadString (section, 'SslCertDirWork_Text', '') ;
  SslCertProduct_Text := ReadString (section, 'SslCertProduct_Text', '') ;
  DirLogs_Text := ReadString (section, 'DirLogs_Text', '') ;
  DnsChlgType_ItemIndex := ReadInteger (section, 'DnsChlgType_ItemIndex', 0) ;
  if ReadString (section, 'DataUnicode_Checked', 'False') = 'True' then DataUnicode_Checked := true else DataUnicode_Checked := false ;
  if ReadString (section, 'UseUtf8_Checked', 'False') = 'True' then UseUtf8_Checked := true else UseUtf8_Checked := false ;