mirror of
https://github.com/abap2xlsx/abap2xlsx.git
synced 2025-05-05 06:16:14 +08:00
f37e6e1b88
In the reader I've added loading of theme1.xml file. Color scheme and fonts are loaded to proper structure and can be updated, fmtscheme is at the moment copied from oryginal file as well as object defaults, extra colors and extension list. In case of new file default office theme is used. Changes can be tested with DEMO37 just create simple excel with theme settings and use program to rewrite file.
39 lines
3.0 KiB
XML
39 lines
3.0 KiB
XML
<?xml version="1.0" encoding="utf-8"?>
|
|
<CLAS CLSNAME="ZCL_EXCEL_THEME_OBJECTDEFAULTS" VERSION="1" LANGU="E" DESCRIPT="Theme Object Defaults" CATEGORY="00" EXPOSURE="2" STATE="1" RELEASE="0" CLSFINAL="X" CLSCCINCL="X" FIXPT="X" UNICODE="X" CLSBCCAT="00" WITH_UNIT_TESTS="X" DURATION_TYPE="0 " RISK_LEVEL="0 ">
|
|
<localImplementation>*"* use this source file for the definition and implementation of
|
|
*"* local helper classes, interface definitions and type
|
|
*"* declarations</localImplementation>
|
|
<localTypes>*"* use this source file for any type of declarations (class
|
|
*"* definitions, interfaces or type declarations) you need for
|
|
*"* components in the private section</localTypes>
|
|
<localMacros>*"* use this source file for any macro definitions you need
|
|
*"* in the implementation part of the class</localMacros>
|
|
<localTestClasses>*"* use this source file for your ABAP unit test classes</localTestClasses>
|
|
<attribute CLSNAME="ZCL_EXCEL_THEME_OBJECTDEFAULTS" CMPNAME="OBJECTDEFAULTS" VERSION="1" LANGU="E" EXPOSURE="0" STATE="1" EDITORDER="1 " ATTDECLTYP="0" ATTEXPVIRT="0" TYPTYPE="3" TYPE="IF_IXML_ELEMENT" SRCROW1="0 " SRCCOLUMN1="0 " SRCROW2="0 " SRCCOLUMN2="0 " TYPESRC_LENG="0 "/>
|
|
<method CLSNAME="ZCL_EXCEL_THEME_OBJECTDEFAULTS" CMPNAME="BUILD_XML" VERSION="1" LANGU="E" EXPOSURE="2" STATE="1" EDITORDER="2 " DISPID="0 " MTDTYPE="0" MTDDECLTYP="0" BCMTDCAT="00" BCMTDSYN="0">
|
|
<parameter CLSNAME="ZCL_EXCEL_THEME_OBJECTDEFAULTS" CMPNAME="BUILD_XML" SCONAME="IO_DOCUMENT" VERSION="1" LANGU="E" CMPTYPE="1" MTDTYPE="0" EDITORDER="1 " DISPID="0 " PARDECLTYP="0" PARPASSTYP="1" TYPTYPE="3" TYPE="IF_IXML_DOCUMENT"/>
|
|
<source>method build_xml.
|
|
data: lo_theme_element type ref to if_ixml_element.
|
|
data: lo_theme type ref to if_ixml_element.
|
|
data: lo_theme_objdef type ref to if_ixml_element.
|
|
check io_document is bound.
|
|
lo_theme ?= io_document->get_root_element( ).
|
|
check lo_theme is bound.
|
|
if objectdefaults is initial.
|
|
lo_theme_objdef ?= io_document->create_simple_element_ns( prefix = zcl_excel_theme=>c_theme_prefix
|
|
name = zcl_excel_theme=>c_theme_object_def
|
|
parent = lo_theme ).
|
|
else.
|
|
lo_theme->append_child( new_child = objectdefaults ).
|
|
endif.
|
|
endmethod. "build_xml</source>
|
|
</method>
|
|
<method CLSNAME="ZCL_EXCEL_THEME_OBJECTDEFAULTS" CMPNAME="LOAD" VERSION="1" LANGU="E" EXPOSURE="2" STATE="1" EDITORDER="1 " DISPID="0 " MTDTYPE="0" MTDDECLTYP="0" BCMTDCAT="00" BCMTDSYN="0">
|
|
<parameter CLSNAME="ZCL_EXCEL_THEME_OBJECTDEFAULTS" CMPNAME="LOAD" SCONAME="IO_OBJECT_DEF" VERSION="1" LANGU="E" CMPTYPE="1" MTDTYPE="0" EDITORDER="1 " DISPID="0 " PARDECLTYP="0" PARPASSTYP="1" TYPTYPE="3" TYPE="IF_IXML_ELEMENT"/>
|
|
<source>method load.
|
|
"! so far copy only existing values
|
|
objectdefaults ?= io_object_def.
|
|
endmethod. "load</source>
|
|
</method>
|
|
</CLAS>
|