[ProDaNTe]

Делфи XE5 ругается на строчку:

Код:

HttpQueryInfo(hhURL,HTTP_QUERY_STATUS_CODE,@lpBuf,dwBufLen,PDWORD(nil)^);

[dcc32 Error] Unit4.pas(599): E2033 Types of actual and formal var parameters must be identical
Чуть не забыл на XE3 полет нормальный!

[M.A.D.M.A.N.]

Ctrl+Shift+Space внутри скобок и смотри, какой параметр не указан.

[ProDaNTe]

Вот именно что все указаны, в XE3 то работало все!

Понятно теперь в XE5 надо явно указывать переменную типа кардинал для последнего параметра!
Извините за беспокойство!

[NumLock]

да ладно, работало... с

Код:

PDWORD(nil)^

все-равно AV будет. а так:

Код:

function HttpQueryInfo(hRequest: HINTERNET; dwInfoLevel: DWORD;
  lpvBuffer: Pointer; var lpdwBufferLength: DWORD;
  var lpdwReserved: DWORD): BOOL; stdcall;

т.е. параметры заданы через var. следовательно:

Код:

var
  lpvBuffer: Pointer;
  lpdwBufferLength: DWORD;
  lpdwReserved: DWORD;
begin
  HttpQueryInfo(nil, HTTP_QUERY_STATUS_CODE, lpvBuffer, lpdwBufferLength, lpdwReserved);
end;