1
0
mirror of synced 2024-11-23 22:13:49 +00:00

Fixed: Attributes are optional by default

This commit is contained in:
Mark van Renswoude 2010-07-15 13:53:52 +00:00
parent 595ae4ea7d
commit bb5bf6aabf

View File

@ -361,7 +361,7 @@ uses
const const
MaxOccursUnbounded = 'unbounded'; MaxOccursUnbounded = 'unbounded';
UseOptional = 'optional'; UseRequired = 'required';
CollectionPostfix = 'List'; CollectionPostfix = 'List';
AttributeNillable = 'nillable'; AttributeNillable = 'nillable';
@ -1026,7 +1026,7 @@ begin
AAttribute.Name, AAttribute.Name,
AAttribute.DataType); AAttribute.DataType);
propertyItem.IsOptional := (AAttribute.Use = UseOptional); propertyItem.IsOptional := (AAttribute.Use <> UseRequired);
propertyItem.IsAttribute := True; propertyItem.IsAttribute := True;
AInterface.AddProperty(propertyItem); AInterface.AddProperty(propertyItem);