if BounceBoxCli.Checked then temp := 'True' else temp := 'False' ; WriteString (SectionData, 'BounceBoxCli_Checked', temp) ; if CMBoxCli.Checked then temp := 'True' else temp := 'False' ; WriteString (SectionData, 'CMBoxCli_Checked', temp) ; if CMBoxSrvr.Checked then temp := 'True' else temp := 'False' ; WriteString (SectionData, 'CMBoxSrvr_Checked', temp) ; WriteString (SectionData, 'CMsgId_Text', CMsgId.Text) ; WriteString (SectionData, 'CPortTxt_Text', CPortTxt.Text) ; if CertAutoOrder.Checked then temp := 'True' else temp := 'False' ; WriteString (SectionData, 'CertAutoOrder_Checked', temp) ; WriteString (SectionData, 'CertBundleFile_Text', CertBundleFile.Text) ; WriteString (SectionData, 'CertHostName_Text', CertHostName.Text) ; if CleanBox2.Checked then temp := 'True' else temp := 'False' ; WriteString (SectionData, 'CleanBox2_Checked', temp) ; WriteString (SectionData, 'CliJTxt_Text', CliJTxt.Text) ; WriteString (SectionData, 'ClientHost_Text', ClientHost.Text) ; WriteInteger (SectionData, 'ClientQOS_ItemIndex', ClientQOS.ItemIndex) ; WriteString (SectionData, 'MsgBox_Lines', MsgBox.Lines.CommaText) ; if RetainBox.Checked then temp := 'True' else temp := 'False' ; WriteString (SectionData, 'RetainBox_Checked', temp) ; WriteString (SectionData, 'RootCAFile_Text', RootCAFile.Text) ; WriteString (SectionData, 'ServerIpAddr_Text', ServerIpAddr.Text) ; WriteString (SectionData, 'ServerNonPort_Text', ServerNonPort.Text) ; WriteString (SectionData, 'ServerSSLPort_Text', ServerSSLPort.Text) ; WriteString (SectionData, 'TopicTxt_Text', TopicTxt.Text) ; WriteString (SectionData, 'TopicsTxt_Lines', TopicsTxt.Lines.CommaText) ; if VerifyCertChain.Checked then temp := 'True' else temp := 'False' ; WriteString (SectionData, 'VerifyCertChain_Checked', temp) ;