启用协议 HTTP2 Delphi 11答案

【问题标题】：Enable Protocol HTTP2 Delphi 11启用协议 HTTP2 Delphi 11
【发布时间】：2021-11-16 15:17:09
【问题描述】：

如何启用 HTTP2 Delphi 11 ？我一直在尝试使用代码，但无法正常工作

NetHTTPClient1.ProtocolVersion := 'HTTP_2_0';

【问题讨论】：

标签： delphi delphi-11-alexandria

【解决方案1】：

这应该可行：

implementation

uses
  System.Net.HttpClient;

procedure DoSomeHTTPThings;
var
  http: THTTPClient;
  httpresponse: IHTTPResponse;
  stringstream: TSTringStream;
begin
  http := THTTPClient.Create;
  stringstream := TStringStream.Create;
  try
    http.ProtocolVersion := THTTPProtocolVersion.HTTP_2_0;
    httpresponse := http.Get('http://exampleurl.com', stringstream);
    case httpresponse.Version of
      THTTPProtocolVersion.UNKNOWN_HTTP: ;
      THTTPProtocolVersion.HTTP_1_0: ;
      THTTPProtocolVersion.HTTP_1_1: ;
      THTTPProtocolVersion.HTTP_2_0: ;
    end;
  finally
    stringstream.Free;
    http.Free;
  end;
end;

编辑：2021-09-23 12:23：将代码更新为您在评论中的问题

【讨论】：

如何从响应中获取协议版本？
更新了我的答案
谢谢你的回答，但我检查提琴手为什么 HTTP/1.1 ？ image.prntscr.com/image/pETAOJS6QpeX2FYEKcQasw.jpg
我不是专家，但我不知道是否必须使用发送请求的相同协议版本来回答。好像不是。
@Blawjack 该网站不是论坛/聊天室：创建 (a) 可以回答的新问题，而不是依赖 cmets。严格来说UNKNOWN_HTTP 可以表示HTTP/0.9。