This topic covers the implementation details of TPlanetsOptionsRec.
Scope: TypeDefinitions.pas; record. Prepared from the curated implementation supplied for this review on 2 October 2026.
Planetary display options include enabling, planet/event symbol/name tables and font options. Indexed values are controlled by the source loops, not by XML order. The routine’s implementation is compiled outside STAND_ALONE builds.
The constructor in TMoonOptions supplies defaults for this record. Symbol/name dictionaries and event enumeration should be kept with the literal fields listed below.
Notation and shared helper rules: Reading this reference.
Literal rec_type values emitted within these routines: TPlanetsOptionsRec. Nested values may belong to child wrappers rather than this owner itself; the attribute entries below give their exact locations.
Exact XML fields and attributes
The paths below start at this record or property node. A slash identifies a child element; @ identifies an attribute. Curly braces mark a variable index or expression, not literal XML text. Initial values describe initialization; they do not establish what an omitted individual element does. The Implementation toggle below contains the supplied routines for exact branch order and conversions.
Enabled
XML representation: The text of the Enabled element.
Reading: Reads the element into Enabled when the record node exists.
Writing: Stores true or false according to Enabled whenever the writer reaches this field.
FontOptions.Name
XML representation: The text of the FontOptions.Name element.
Reading: Reads the element into FontOptions.Name when the record node exists; Enabled is true.
Writing: Stores FontOptions.Name when Enabled is true.
FontOptions.ChangeSize
XML representation: The text of the FontOptions.ChangeSize element.
Reading: Reads the element into FontOptions.ChangeSize when the record node exists; Enabled is true.
Writing: Stores true or false according to FontOptions.ChangeSize when Enabled is true.
FontOptions.Size
XML representation: The text of the FontOptions.Size element.
Reading: Reads the stored number, divides it by 1000.0, and assigns the result to FontOptions.Size when the record node exists; Enabled is true. The temporary numeric value starts at Round (FontOptions.Size * 1000.0) before reading.
Writing: Stores FontOptions.Size multiplied by 1000.0, then rounded to an integer when Enabled is true.
Planets.Name[@id={IntToStr (i)}]
XML representation: The text of the Planets.Name[@id={IntToStr (i)}] element.
Reading: Reads the element into Planets.Name[i] when the record node exists; Enabled is true; for each i from SE_SUN through (SE_PLUTO + 1).
Writing: Stores Planets.Name[i] when Enabled is true; for each i from SE_SUN through (SE_PLUTO + 1).
Planets.Symbol[@id={IntToStr (i)}]
XML representation: The text of the Planets.Symbol[@id={IntToStr (i)}] element.
Reading: Reads the element into Planets.Symbol[i] when the record node exists; Enabled is true; for each i from SE_SUN through (SE_PLUTO + 1).
Writing: Stores Planets.Symbol[i] when Enabled is true; for each i from SE_SUN through (SE_PLUTO + 1).
Planets.SymbolAbove[@id={IntToStr (i)}]
XML representation: The text of the Planets.SymbolAbove[@id={IntToStr (i)}] element.
Reading: Reads the element into Planets.SymbolAbove[i] when the record node exists; Enabled is true; for each i from SE_SUN through (SE_PLUTO + 1).
Writing: Stores Planets.SymbolAbove[i] when Enabled is true; for each i from SE_SUN through (SE_PLUTO + 1).
Planets.SymbolBelow[@id={IntToStr (i)}]
XML representation: The text of the Planets.SymbolBelow[@id={IntToStr (i)}] element.
Reading: Reads the element into Planets.SymbolBelow[i] when the record node exists; Enabled is true; for each i from SE_SUN through (SE_PLUTO + 1).
Writing: Stores Planets.SymbolBelow[i] when Enabled is true; for each i from SE_SUN through (SE_PLUTO + 1).
Events.Name[@id={IntToStr (i)}]
XML representation: The text of the Events.Name[@id={IntToStr (i)}] element.
Reading: Reads the element into Events.Name[i] when the record node exists; Enabled is true; for each i from low (EventNames) through high (EventNames).
Writing: Stores Events.Name[i] when Enabled is true; for each i from low (EventNames) through high (EventNames).
Events.Symbol[@id={IntToStr (i)}]
XML representation: The text of the Events.Symbol[@id={IntToStr (i)}] element.
Reading: Reads the element into Events.Symbol[i] when the record node exists; Enabled is true; for each i from low (EventNames) through high (EventNames).
Writing: Stores Events.Symbol[i] when Enabled is true; for each i from low (EventNames) through high (EventNames).
@rec_type
XML representation: The rec_type attribute.
Writing: Stores the literal text “TPlanetsOptionsRec” whenever the writer reaches this field.
Initialization and reset values
This type has no separate initializer in the supplied code. Its starting values come from its enclosing object, inherited initialization, or existing state. Relevant enclosing initializers are identified below.
Enclosing initialization contexts
The following enclosing routines establish or override this record’s starting values. Follow the owner link for the complete initializer. Different enclosing objects can supply different defaults.
TMoonOptions.Create is documented in TMoonOptions.
Storage declarations relevant to interpretation
These are in-memory member and property types, not a list of mandatory XML children. They retain array bounds, fixed buffers and selector types. The field reference above defines what is actually serialized.
Name |
Declared type / bounds |
Kind |
Enabled |
Boolean |
member |
FontOptions |
TPlanetsSymbolsFontRec |
member |
Planets |
TPlanetNamesAndSymbolsRec |
member |
Events |
TPlanetsEventsSymbolsRec |
member |
The Implementation toggle contains only TPlanetsOptionsRec methods. Initializers and helpers belonging to other types are identified separately below. Shared XML-helper limitations are explained in Reading this reference.
Declaration reproduces this record’s complete declaration from the supplied source, including its fields, properties and method signatures.