delphi - 如何在 OnBeforeExecuteEvent 中将 THTTPRio.Converter.Options 设置为 soLiteralParams

Question

引用帖子Delphi SOAP Envelope and WCF .

有人可以发布一个示例代码，它可以向我展示如何在 Delphi 7 中的 THTTPRio.Converter.Options 中设置 soLiteralParams 。我当前有以下代码。

我已将 HTTPRIO 组件拖放到文档中，该文档在代码开头创建了一行 HTTPRIO1: THTTPRIO。我基本上想了解如何在上述组件中设置 soLiteralParams 。以下是我尝试执行的代码，该代码给了我错误。

procedure TForm1.CleanUpSOAP(const MethodName: String; var SOAPRequest: WideString);
var RIO: THTTPRIO;
begin

  //The following line is giving error
//      RIO.Converter.options :=  [soLiteralParams];
end;

在上面的代码中，我声明了一个 THTTPRIO 类型的变量 RIO，我不确定它是否正确。

Answer 1

只是猜测，因为您在问题中提供的信息很少。

使用分配给您放置在表单上的组件的变量。不要声明一个新的本地变量(无论如何你都没有创建过)。要在代码中设置 Converter.Options，您需要将 OPToSOAPDomConv 添加到您的 use 子句中。

implementation

  uses 
    OPToSOAPDomConv;

// BTW, this name might not be a good one if it's the 
// OnBeforeExecute event handler as that isn't 
// clear from the name.
procedure TForm1.CleanUpSOAP(const MethodName: String; var SOAPRequest: WideString);
begin
  // Note this clears any previous options!
  HTTPRIO1.Converter.Options :=  [soLiteralParams];
  // If you want to keep the previous options instead of replacing them
  // HTTPRIO1.Converter1.Options := HTTPRIO1.Converter1.Options + [soLiteralParams];
end;

如果您已将组件放在表单上，​​我不确定为什么您不在对象检查器中处理它。

如果这不能解决问题，请编辑您的问题并提供您收到的确切错误消息，包括引发异常时的任何内存地址。