2

使用 Delphi 2007 我正在尝试导入 wsdl 以供客户端使用。

我已经在 处导入了 WSDL https://services.rdc.nl/voertuigscan/2.0/wsdl，它导入了一个 xsd 来定义它的类型。在导入的xsd中，还有几个额外的导入和包含的xsd，其中定义了如下类型：

<xs:complexType name="BedragExtended">
  <xs:simpleContent>
    <xs:extension base="ct:Bedrag">
      <xs:attribute name="Bron" type="Bron"/>
    </xs:extension>
  </xs:simpleContent>
</xs:complexType>

类型 ct:Bedrag 在包含的 XSD 中定义为：

<xs:simpleType name="Bedrag">
  <xs:restriction base="xs:decimal">
    <xs:totalDigits value="9"/>
    <xs:fractionDigits value="2"/>
  </xs:restriction>
</xs:simpleType>

但是，BedragExtended 类型导入为：

// ************************************************************************ //
// XML       : BedragExtended, global, <complexType>
// Namespace : http://nsp.rdc.nl/RDC/voertuigscan
// ************************************************************************ //
BedragExtended = class(TRemotable)
private
  FBron: Bron;
  FBron_Specified: boolean;
  procedure SetBron(Index: Integer; const ABron: Bron);
  function  Bron_Specified(Index: Integer): boolean;
published
  property Bron: Bron  Index (IS_ATTR or IS_OPTN) read FBron write SetBron stored Bron_Specified;
end;

如您所见，没有提及 Bedrag 类型的基础值，但 wsdl 导入生成的 .pas 文件顶部的标题显示正确的 xsd 已被解析。如何让 Delphi 正确生成 BedragExtended 类型？

4

1 回答 1

0

在所有语言中看到这种行为是相当典型的（至少我知道）。简单类型通常不映射到类。唯一值得注意的例外是使用枚举方面的简单类型，在这种情况下，您可能会获得类型安全的枚举（Java 和 .NET）。

这在某种程度上是意料之中的，因为BedragExtended它是一个带有属性的字符串。不幸的是，在 XSD 1.0 中，您不能同时进行扩展（设置属性）和限制（限制词法空间），因此这种实现很常见，它是一种复杂类型（获取属性）但内容很简单（基本上是某种文本）。

于 2012-08-14T15:59:28.730 回答