WriteString (section, 'Base64Text_Text', Base64Text.Text) ;
  WriteString (section, 'CodeTextLines_Lines', CodeTextLines.Lines.CommaText) ;
  if CompactXML.Checked then temp := 'True' else temp := 'False' ; WriteString (section, 'CompactXML_Checked', temp) ;
  WriteString (section, 'HexText_Text', HexText.Text) ;
  WriteString (section, 'JoseTextLines_Lines', JoseTextLines.Lines.CommaText) ;
  WriteString (section, 'JsonInput_Lines', JsonInput.Lines.CommaText) ;
  if JwkPrivate.Checked then temp := 'True' else temp := 'False' ; WriteString (section, 'JwkPrivate_Checked', temp) ;
  if LogJson.Checked then temp := 'True' else temp := 'False' ; WriteString (section, 'LogJson_Checked', temp) ;
  WriteInteger (section, 'NewPrivKey_ItemIndex', NewPrivKey.ItemIndex) ;
  WriteString (section, 'NewPrivKey_Text', NewPrivKey.Text) ;
  WriteString (section, 'RawJWK_Lines', RawJWK.Lines.CommaText) ;
  if ShowRawKey.Checked then temp := 'True' else temp := 'False' ; WriteString (section, 'ShowRawKey_Checked', temp) ;
  WriteString (section, 'TestHmacKey_Text', TestHmacKey.Text) ;
  WriteInteger (section, 'TestJWSAlg_ItemIndex', TestJWSAlg.ItemIndex) ;
  WriteString (section, 'TestPrivKeyFile_Text', TestPrivKeyFile.Text) ;
  WriteString (section, 'URLText_Text', URLText.Text) ;