[ProDaNTe]

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

Код:

1	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]

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

Код:

1	PDWORD(nil)^

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

Код:

1 2 3

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

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

Код:

1 2 3 4 5 6 7

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