TNetHeaders 赋值例子

TNetHeaders 是一个用于存储 HTTP 请求头的类，可以通过它来设置和获取 HTTP 请求头信息。以下是一个赋值 TNetHeaders 的例子：

var
  Headers: TNetHeaders;
begin
  Headers := TNetHeaders.Create;
  try
    // 设置请求头信息
    Headers.Accept := 'text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8';
    Headers.AcceptLanguage := 'en-US,en;q=0.5';
    Headers.ContentType := 'application/x-www-form-urlencoded';
    Headers.UserAgent := 'Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:89.0) Gecko/20100101 Firefox/89.0';

    // 发送 HTTP 请求
    // ...
  finally
    Headers.Free;
  end;
end;

在上面的例子中，我们实例化了一个 TNetHeaders 对象，然后通过设置 Accept、AcceptLanguage、ContentType 和 UserAgent 属性来设置请求头信息。如果需要添加或修改其他的请求头信息，可以根据需要设置对应的属性。最后我们在发送 HTTP 请求前释放了 TNetHeaders 对象。