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