从URL中提取URL参数？在 Delphi 中

7nbnzgx9 于 2023-05-17 发布在其他

关注(0)|答案(1)|浏览(189)

我有一个传入的URL，我需要捕捉一些参数，我们的项目是在 Delphi 中。下面是URL的样子：
我需要在“state”之后和“code”之前得到值。我正在使用图里中的类

AURL = 'https://accounts.google.com/o/oauth2/approval/v2?auto=false&response=state%3DF409B222-B0B5-4AF0-B3A2-BC64DCEDA5B6%26code%3D4%2F1AY0e-g6kT90V4_L-HN_BkljW8XCAP79bVIaoE7ZErspKCTr83teAEPxbyHs%26scope%3Dprofile%2520openid%2520https%3A%2F%2Fwww.googleapis.com%2Fauth%2Fuserinfo.profile%26authuser%3D0%26prompt%3Dconsent&approvalCode=4%2F1AY0e-g6kT90V4_L-HN_BkljW8XCAP79bVIaoE7ZErspKCTr83teAEPxbyHs#'
uri := TUri.Create(AUrl); 
returnstate := uri.ParameterByName['state'];

当使用参数byname时，它是空的。感谢你的帮助。

delphi

来源：https://stackoverflow.com/questions/66657817/extract-url-parameters-from-url-in-delphi

1条答案

按热度按时间

vbkedwbf1#

如注解中所述，您需要解码response参数。
第一步是百分比解码。你可以使用TURLEnconding来实现。

Response := TURLEncoding.Decode(uri.ParameterByName['response']);

然后，在编码的&字符处断开嵌入的response。可能有一种更简单的方法，但您可以使用Pos或TPerlRegEx。我认为一个快速的方法是使用TStringList并将&设置为Delimiter字符：

ResponseParams := TStringList.Create;
ResponseParams.Delimiter := '&';
ResponseParams.DelimitedText := Response;

然后，您有名称-值对，标准的TStringList将为您分隔它们。

ResponseParams.Values['status']

赞(0）回复(0）举报 2023-05-17

我来回答

从URL中提取URL参数？在 Delphi 中

1条答案

相关问题

热门标签

最新问答