Я пытаюсь сделать базовый запрос аутентификации HTTP POST, используя скрипт Inno Setup.
Мои усилия:
procedure CurStepChanged(CurStep: TSetupStep);
var
WinHttpReq: Variant;
ReqContent: String;
begin
if CurStep = ssInstall then
begin
WinHttpReq := CreateOleObject('WinHttp.WinHttpRequest.5.1');
WinHttpReq.Open('POST', '<http://www.xxxx.com>', false);
WinHttpReq.SetRequestHeader('Content-Type', 'application/json');
ReqContent = {
"UserName":"xxx",
"Password":"abcd"
}
WinHttpReq.Send(ReqContent);
end;
end;
Итак, как отправить Имя пользователя и Пароль с POST
запросом?