Base64Text_Text := ReadString (section, 'Base64Text_Text', '') ; CodeTextLines_Lines.CommaText := ReadString (section, 'CodeTextLines_Lines', '') ; if ReadString (section, 'CompactXML_Checked', 'False') = 'True' then CompactXML_Checked := true else CompactXML_Checked := false ; HexText_Text := ReadString (section, 'HexText_Text', '') ; JoseTextLines_Lines.CommaText := ReadString (section, 'JoseTextLines_Lines', '') ; JsonInput_Lines.CommaText := ReadString (section, 'JsonInput_Lines', '') ; if ReadString (section, 'JwkPrivate_Checked', 'False') = 'True' then JwkPrivate_Checked := true else JwkPrivate_Checked := false ; if ReadString (section, 'LogJson_Checked', 'False') = 'True' then LogJson_Checked := true else LogJson_Checked := false ; NewPrivKey_ItemIndex := ReadInteger (section, 'NewPrivKey_ItemIndex', 0) ; NewPrivKey_Text := ReadString (section, 'NewPrivKey_Text', '') ; RawJWK_Lines.CommaText := ReadString (section, 'RawJWK_Lines', '') ; if ReadString (section, 'ShowRawKey_Checked', 'False') = 'True' then ShowRawKey_Checked := true else ShowRawKey_Checked := false ; TestHmacKey_Text := ReadString (section, 'TestHmacKey_Text', '') ; TestJWSAlg_ItemIndex := ReadInteger (section, 'TestJWSAlg_ItemIndex', 0) ; TestPrivKeyFile_Text := ReadString (section, 'TestPrivKeyFile_Text', '') ; URLText_Text := ReadString (section, 'URLText_Text', '') ;