Code:
InternetGetLastResponseInfo Function
--------------------------------------------------------------------------------
Retrieves the last Microsoft®
Win32® Internet function error description or server response on the thread calling this function.
Syntax
BOOL InternetGetLastResponseInfo(
LPDWORD lpdwError,
LPTSTR lpszBuffer,
LPDWORD lpdwBufferLength
);
Parameters
lpdwError
[out] Pointer to an unsigned long integer variable that receives an error message pertaining to the operation that failed.
lpszBuffer
[out] Pointer to a buffer that receives the error text.
lpdwBufferLength
[in, out] Pointer to an unsigned long integer variable that contains the size of the lpszBuffer buffer in TCHARs. When the function returns, this parameter contains the size of the string written to the buffer, not including the terminating zero.
Ich bekomme das irgendwie nicht gebacken. So habe ich es probiert:
Code:
var
szBuffer: array[0..255] of Char;
dwError: DWORD;
begin
...
InternetGetLastResponseInfo(dwError, szBuffer, sizeof(szBuffer));
Als Fehlermeldung bekomme ich von Delphi:
Zitat:
[Fehler] FTPClient.dpr(207): Die Typen der tatsächlichen und formalen Var-Parameter müssen übereinstimmen
(Der Cursor steht vor dem Semikolon.)