This topic covers the implementation details of TSizes.
Scope: cpSize.pas; class derived from TSL_Property. Prepared from the curated implementation supplied for this review on 2 October 2026.
IntValue is a raw internal dimension; DisplayValue is presentation only and is not imported. DefUnits comes from the constructor caller. The source contains fixed-point dimension evidence (6×72×65536 for six inches), but the named conversion constants and all dimension consumers are outside the supplied files.
Notation and shared helper rules: Reading this reference.
No literal rec_type value is emitted directly by the selected routines. A property envelope, an inherited writer or a delegated record can supply its identifying attributes.
Inherited implementation: TSL_Property. Follow it when the ordered behavior invokes inherited methods; inherited fields are not repeated as locally owned fields.
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.
IntValue
XML representation: The text of the IntValue element.
Reading: Converts the stored text to a number and assigns it to aPropValue.IntValue when the record node exists.
Writing: Stores the text representation of DataValue.IntValue whenever the writer reaches this field.
DisplayValue
XML representation: The text of the DisplayValue element.
Writing: Stores DisplayValue whenever the writer reaches this field.
Import: This routine does not read this field. See the inherited or enclosing implementation where applicable.
Initialization and reset values
TSizes.CreateInit
Setting or temporary variable |
Initial value |
When it is assigned |
PropValue.PropertyType |
ptInteger |
Always |
PropValue.IntValue |
0 |
Always |
DataValue |
PropValue |
Always |
Units |
DefUnits |
Always |
This routine also calls inherited Create. See Implementation for their order and any conditional calls.
Value namespaces used by this implementation
These are declared Pascal ordinal values. Use the ordinal only where the field serializer actually writes ord(...), an integer cast or an equivalent value. Set-marker strings and local option lists have their own representation; sentinel members in an enum are not automatically legal XML choices.
TQppSizeUnits
Ordinal |
Declared member |
0 |
qsuMetric |
1 |
qsuInches |
2 |
qsuPoints |
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.
The Implementation toggle contains only TSizes methods. Initializers and helpers belonging to other types are identified separately below. Shared XML-helper limitations are explained in Reading this reference.
