Привет!
У меня есть проблема: при попытке генерациии клиента для Веб Сервиса по WSDL генератор дельфийский работает неверно! В схеме елемент FlightAvailabilitySegment имеет поделемент FlAvOriginDestinationOB(Тоже сложный тип) с maxOccurs="unbounded". Что делает генератор: для <FlightAvailabilitySegment > генерит тип со свойством для <FlAvOriginDestinationOB>. Пока все верно. Идем в декларейшн типа этого свойства и что: вместо того, чтобы описать его как массив, для него просто создается класс.(т. е. выходит этот елемент может появиться только раз, а не много).
Кто-то знает, может надо какую-то галочку в свойствах поставить или еще чего?
Схема(из WSDL):

код:
--------------------------------------------------------------------------------

<xsd:complexType name="FlightAvailabilitySegment">
<xsd:sequence>
<xsd:element name="OperatorCode" type="xsd:string"/>
<xsd:element name="Route" type="xsd:string" minOccurs="0"/>
<xsd:element name="FlAvOriginDestinationOB" type="tns:FlightAvailabilityOriginDestination" maxOccurs="unbounded"/>
<xsd:element name="FlAvOriginDestinationIB" type="tns:FlightAvailabilityOriginDestination" maxOccurs="unbounded"/>
<xsd:element name="FareData" type="tns:FlightFareData"/>
</xsd:sequence>

--------------------------------------------------------------------------------


Код дельфы:

код:
--------------------------------------------------------------------------------

FlightAvailabilitySegment = class(TRemotable)
private
FOperatorCode: WideString;
FRoute: WideString;
FFlAvOriginDestinationOB: FlightAvailabilityOriginDestination;
FFlAvOriginDestinationIB: FlightAvailabilityOriginDestination;
FFareData: FlightFareData;
public
destructor Destroy; override;
published
property OperatorCode: WideString read FOperatorCode write FOperatorCode;
property Route: WideString read FRoute write FRoute;
property FlAvOriginDestinationOB: FlightAvailabilityOriginDestination read FFlAvOriginDestinationOB write FFlAvOriginDestinationOB;
property FlAvOriginDestinationIB: FlightAvailabilityOriginDestination read FFlAvOriginDestinationIB write FFlAvOriginDestinationIB;
property FareData: FlightFareData read FFareData write FFareData;
end;

--------------------------------------------------------------------------------

(пока все верно, теперь смотрим код для типа FlightAvailabilityOriginDestination)

код:
--------------------------------------------------------------------------------


FlightAvailabilityOriginDestination = class(TRemotable)
private
FFlightDetails: FlightResponseDetails;
FSmokingInd: Boolean;
FRsDepartureAirport: ResponseAirport;
FRsArrivalAirport: ResponseAirport;
FDepartureDateTime: WideString;
FArrivalDateTime: WideString;
FFlAvCabin: FlightAvailabilityCabin;
FEquipment: FlightEquipment;
FEnRouteStops: Integer;
public
destructor Destroy; override;
published
property FlightDetails: FlightResponseDetails read FFlightDetails write FFlightDetails;
property SmokingInd: Boolean read FSmokingInd write FSmokingInd;
property RsDepartureAirport: ResponseAirport read FRsDepartureAirport write FRsDepartureAirport;
property RsArrivalAirport: ResponseAirport read FRsArrivalAirport write FRsArrivalAirport;
property DepartureDateTime: WideString read FDepartureDateTime write FDepartureDateTime;
property ArrivalDateTime: WideString read FArrivalDateTime write FArrivalDateTime;
property FlAvCabin: FlightAvailabilityCabin read FFlAvCabin write FFlAvCabin;
property Equipment: FlightEquipment read FEquipment write FEquipment;
property EnRouteStops: Integer read FEnRouteStops write FEnRouteStops;
end;

--------------------------------------------------------------------------------

(Какого черта это просто класс, а не что-то типа
FlightAvailabilityOriginDestination= array of FlightAvailabilityOriginDestinationOBJ, где

FlightAvailabilityOriginDestinationOBJ=->

код:
--------------------------------------------------------------------------------


FlightAvailabilityOriginDestinationOBJ = class(TRemotable)
private
FFlightDetails: FlightResponseDetails;
FSmokingInd: Boolean;
FRsDepartureAirport: ResponseAirport;
FRsArrivalAirport: ResponseAirport;
FDepartureDateTime: WideString;
FArrivalDateTime: WideString;
FFlAvCabin: FlightAvailabilityCabin;
FEquipment: FlightEquipment;
FEnRouteStops: Integer;
public
destructor Destroy; override;
published
property FlightDetails: FlightResponseDetails read FFlightDetails write FFlightDetails;
property SmokingInd: Boolean read FSmokingInd write FSmokingInd;
property RsDepartureAirport: ResponseAirport read FRsDepartureAirport write FRsDepartureAirport;
property RsArrivalAirport: ResponseAirport read FRsArrivalAirport write FRsArrivalAirport;
property DepartureDateTime: WideString read FDepartureDateTime write FDepartureDateTime;
property ArrivalDateTime: WideString read FArrivalDateTime write FArrivalDateTime;
property FlAvCabin: FlightAvailabilityCabin read FFlAvCabin write FFlAvCabin;
property Equipment: FlightEquipment read FEquipment write FEquipment;
property EnRouteStops: Integer read FEnRouteStops write FEnRouteStops;
end;

--------------------------------------------------------------------------------


тогда бы все было верно?)