if ReadString (section, 'CopyEmptyDirs_Checked', 'False') = 'True' then CopyEmptyDirs_Checked := true else CopyEmptyDirs_Checked := false ; CopyFileRepl_ItemIndex := ReadInteger (section, 'CopyFileRepl_ItemIndex', 0) ; CopyIgnorePath_Text := ReadString (section, 'CopyIgnorePath_Text', '') ; CopySrcDir_Text := ReadString (section, 'CopySrcDir_Text', '') ; CopySrcFile_Text := ReadString (section, 'CopySrcFile_Text', '') ; if ReadString (section, 'CopySubdirs_Checked', 'False') = 'True' then CopySubdirs_Checked := true else CopySubdirs_Checked := false ; CopyTarDir_Text := ReadString (section, 'CopyTarDir_Text', '') ; if ReadString (section, 'CopyWow64Disable_Checked', 'False') = 'True' then CopyWow64Disable_Checked := true else CopyWow64Disable_Checked := false ; DirLogs_Text := ReadString (section, 'DirLogs_Text', '') ; Ftp1LocDir_Text := ReadString (section, 'Ftp1LocDir_Text', '') ; Ftp1Path_Text := ReadString (section, 'Ftp1Path_Text', '') ; Ftp1SrcName_Text := ReadString (section, 'Ftp1SrcName_Text', '') ; Ftp1UpFile_Text := ReadString (section, 'Ftp1UpFile_Text', '') ; FtpBandWidth_Text := ReadString (section, 'FtpBandWidth_Text', '') ; if ReadString (section, 'FtpCopyAllDir_Checked', 'False') = 'True' then FtpCopyAllDir_Checked := true else FtpCopyAllDir_Checked := false ; if ReadString (section, 'FtpDelDone_Checked', 'False') = 'True' then FtpDelDone_Checked := true else FtpDelDone_Checked := false ; if ReadString (section, 'FtpDelOldTar_Checked', 'False') = 'True' then FtpDelOldTar_Checked := true else FtpDelOldTar_Checked := false ; if ReadString (section, 'FtpEmptyDirs_Checked', 'False') = 'True' then FtpEmptyDirs_Checked := true else FtpEmptyDirs_Checked := false ; FtpHost_Text := ReadString (section, 'FtpHost_Text', '') ; FtpIgnorePath_Text := ReadString (section, 'FtpIgnorePath_Text', '') ; if ReadString (section, 'FtpIgnoreUtf8_Checked', 'False') = 'True' then FtpIgnoreUtf8_Checked := true else FtpIgnoreUtf8_Checked := false ; FtpKeepAlive_Text := ReadString (section, 'FtpKeepAlive_Text', '') ; FtpLocDir_Text := ReadString (section, 'FtpLocDir_Text', '') ; FtpMultiFileRepl_ItemIndex := ReadInteger (section, 'FtpMultiFileRepl_ItemIndex', 0) ; if ReadString (section, 'FtpNoCrc_Checked', 'False') = 'True' then FtpNoCrc_Checked := true else FtpNoCrc_Checked := false ; if ReadString (section, 'FtpNoFeatCmd_Checked', 'False') = 'True' then FtpNoFeatCmd_Checked := true else FtpNoFeatCmd_Checked := false ; if ReadString (section, 'FtpNoHost_Checked', 'False') = 'True' then FtpNoHost_Checked := true else FtpNoHost_Checked := false ; if ReadString (section, 'FtpNoMd5_Checked', 'False') = 'True' then FtpNoMd5_Checked := true else FtpNoMd5_Checked := false ; if ReadString (section, 'FtpNoTmpFile_Checked', 'False') = 'True' then FtpNoTmpFile_Checked := true else FtpNoTmpFile_Checked := false ; if ReadString (section, 'FtpNoUtf8_Checked', 'False') = 'True' then FtpNoUtf8_Checked := true else FtpNoUtf8_Checked := false ; if ReadString (section, 'FtpNoZlib_Checked', 'False') = 'True' then FtpNoZlib_Checked := true else FtpNoZlib_Checked := false ; if ReadString (section, 'Ftp1DelDone_Checked', 'False') = 'True' then Ftp1DelDone_Checked := true else Ftp1DelDone_Checked := false ; Ftp1FileRepl_ItemIndex := ReadInteger (section, 'Ftp1FileRepl_ItemIndex', 0) ; if ReadString (section, 'FtpPassive_Checked', 'False') = 'True' then FtpPassive_Checked := true else FtpPassive_Checked := false ; FtpPassword_Text := ReadString (section, 'FtpPassword_Text', '') ; FtpPath_Text := ReadString (section, 'FtpPath_Text', '') ; FtpPort_Text := ReadString (section, 'FtpPort_Text', '') ; FtpPortSsl_Text := ReadString (section, 'FtpPortSsl_Text', '') ; FtpServerType_ItemIndex := ReadInteger (section, 'FtpServerType_ItemIndex', 0) ; FtpSrcFile_Text := ReadString (section, 'FtpSrcFile_Text', '') ; if ReadString (section, 'FtpSubdirs_Checked', 'False') = 'True' then FtpSubdirs_Checked := true else FtpSubdirs_Checked := false ; FtpUsername_Text := ReadString (section, 'FtpUsername_Text', '') ; HttpBandWidth_Text := ReadString (section, 'HttpBandWidth_Text', '') ; HttpFileRepl_ItemIndex := ReadInteger (section, 'HttpFileRepl_ItemIndex', 0) ; HttpSrcDir_Lines.CommaText := ReadString (section, 'HttpSrcDir_Lines', '') ; HttpSrcFile_Text := ReadString (section, 'HttpSrcFile_Text', '') ; HttpTarDir_Text := ReadString (section, 'HttpTarDir_Text', '') ; NetLogon_Text := ReadString (section, 'NetLogon_Text', '') ; NetPassword_Text := ReadString (section, 'NetPassword_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 ; if ReadString (section, 'ShowDiagsHigh_Checked', 'False') = 'True' then ShowDiagsHigh_Checked := true else ShowDiagsHigh_Checked := false ; if ReadString (section, 'ShowDiagsLow_Checked', 'False') = 'True' then ShowDiagsLow_Checked := true else ShowDiagsLow_Checked := false ; if ReadString (section, 'ShowDiagsSSL_Checked', 'False') = 'True' then ShowDiagsSSL_Checked := true else ShowDiagsSSL_Checked := false ; if ReadString (section, 'ShowDiagsUtf8_Checked', 'False') = 'True' then ShowDiagsUtf8_Checked := true else ShowDiagsUtf8_Checked := false ; if ReadString (section, 'ShowXProgesss_Checked', 'False') = 'True' then ShowXProgesss_Checked := true else ShowXProgesss_Checked := false ; SslSecurity_ItemIndex := ReadInteger (section, 'SslSecurity_ItemIndex', 0) ; VerifyCertMode_ItemIndex := ReadInteger (section, 'VerifyCertMode_ItemIndex', 0) ; XferSockFamily_ItemIndex := ReadInteger (section, 'XferSockFamily_ItemIndex', 0) ; if ReadString (section, 'FtpFixPassiveLanIP_Checked', 'False') = 'True' then FtpFixPassiveLanIP_Checked := true else FtpFixPassiveLanIP_Checked := false ; FtpHost_Items.CommaText := ReadString (section, 'FtpHost_Items', '') ; if ReadString (section, 'HttpParsePage_Checked', 'False') = 'True' then HttpParsePage_Checked := true else HttpParsePage_Checked := false ; HttpParseLevels_Text := ReadString (section, 'HttpParseLevels_Text', '') ; CleanupDays_Text := ReadString (section, 'CleanupDays_Text', '') ; CleanupDateFrom_Date := ReadFloat (section, 'CleanupDateFrom_Date', 0) ; CleanupDateTo_Date := ReadFloat (section, 'CleanupDateTo_Date', 0) ; CleanupFileMask_Text := ReadString (section, 'CleanupFileMask_Text', '') ; if ReadString (section, 'CleanupSubDirs_Checked', 'False') = 'True' then CleanupSubDirs_Checked := true else CleanupSubDirs_Checked := false ; CleanupPath_Text := ReadString (section, 'CleanupPath_Text', '') ; Copy1FileTar_Text := ReadString (section, 'Copy1FileTar_Text', '') ; Copy1Replc_ItemIndex := ReadInteger (section, 'Copy1Replc_ItemIndex', 0) ; Copy1FileSrc_Text := ReadString (section, 'Copy1FileSrc_Text', '') ; if ReadString (section, 'CopyUnzip_Checked', 'False') = 'True' then CopyUnzip_Checked := true else CopyUnzip_Checked := false ; if ReadString (section, 'CopyZip_Checked', 'False') = 'True' then CopyZip_Checked := true else CopyZip_Checked := false ; if ReadString (section, 'Ftp1Unzip_Checked', 'False') = 'True' then Ftp1Unzip_Checked := true else Ftp1Unzip_Checked := false ; if ReadString (section, 'Ftp1Zip_Checked', 'False') = 'True' then Ftp1Zip_Checked := true else Ftp1Zip_Checked := false ; if ReadString (section, 'FtpMultiUnzip_Checked', 'False') = 'True' then FtpMultiUnzip_Checked := true else FtpMultiUnzip_Checked := false ; if ReadString (section, 'FtpMultiZip_Checked', 'False') = 'True' then FtpMultiZip_Checked := true else FtpMultiZip_Checked := false ; if ReadString (section, 'HttpUnzip_Checked', 'False') = 'True' then HttpUnzip_Checked := true else HttpUnzip_Checked := false ; UnzipDir_Text := ReadString (section, 'UnzipDir_Text', '') ; if ReadString (section, 'UnzipDownDel_Checked', 'False') = 'True' then UnzipDownDel_Checked := true else UnzipDownDel_Checked := false ; UnzipZipPath_ItemIndex := ReadInteger (section, 'UnzipZipPath_ItemIndex', 0) ; ZippingExtFmt_ItemIndex := ReadInteger (section, 'ZippingExtFmt_ItemIndex', 0) ; ZippingType_ItemIndex := ReadInteger (section, 'ZippingType_ItemIndex', 0) ; if ReadString (section, 'NoSSL_Checked', 'False') = 'True' then NoSSL_Checked := true else NoSSL_Checked := false ;