Delphi Вызов функции API (SOAP)

Question

Я получил API от компании, к которой мы стремимся интегрироваться, используя предоставленный WSDL.Вот фрагмент кода в API, в котором у меня возникла проблема:

  AppointmentRequest = class(TRemotable)
  private
    FStartDate: TXSDateTime;
    FEndDate: TXSDateTime;
    FProperty_: Property_;
    FServiceIDs: ArrayOfInt;
  public
    destructor Destroy; override;
  published
    property StartDate: TXSDateTime read FStartDate write FStartDate;
    property EndDate: TXSDateTime read FEndDate write FEndDate;
    property Property_: Property_ read FProperty_ write FProperty_;
    property ServiceIDs: ArrayOfInt read FServiceIDs write FServiceIDs;
  end;

В моем коде я пытаюсь установить свойство Start & End Date следующим образом:

  aApptReq  := c_xxx_API.AppointmentRequest.Create();
  aApptReq.StartDate.AsDateTime := Date();
  aApptReq.EndDate.AsDateTime := Date() + 7;

Я считаю, что это сработало в какой-то момент, но теперь выдает ошибку Access Violation at Address ... Когда я наводю курсор мыши на aApptReq.StartDate (или EndDate), он отображается как 'nil'.

Я пытался сделатьaApptReq.StartDate.Create (), но это не помогло.

Чего мне не хватает при использовании этого объекта API?

Answer 1

Вам необходимо создать элемент TXSDateTime самостоятельно.

aApptReq  := c_xxx_API.AppointmentRequest.Create();   
aApptReq.StartDate := TXSDateTime.Create;
aApptReq.StartDate.AsDateTime := Date;