httpapi: почему HttpSendHttpResponse возвращает неверный параметр?

Question

Я пытался портировать http.h на Delphi, но мои вызовы HttpSendHttpResponse возвращают «неверный патаметр», и я не уверен почему.тестирую на WinXP.Я разместил исходный код, который я использую для тестирования здесь: http://nldelphi.com/Forum/showthread.php?t=37904

Answer 1

У меня были некоторые проблемы с этим, и очевидной проблемой были правила выравнивания для типов данных. Добавьте следующее в блок для проверки ваших структур данных:

initialization
  {$if sizeof( HTTP_REQUEST          ) <> 464}{$message error 'HTTP_REQUEST          sizeof error.'}{$ifend}
  {$if sizeof( HTTP_RESPONSE         ) <> 280}{$message error 'HTTP_RESPONSE         sizeof error.'}{$ifend}
  {$if sizeof( HTTP_COOKED_URL       ) <>  24}{$message error 'HTTP_COOKED_URL       sizeof error.'}{$ifend}
  {$if sizeof( HTTP_DATA_CHUNK       ) <>  32}{$message error 'HTTP_DATA_CHUNK       sizeof error.'}{$ifend}
  {$if sizeof( HTTP_REQUEST_HEADERS  ) <> 344}{$message error 'HTTP_REQUEST_HEADERS  sizeof error.'}{$ifend}
  {$if sizeof( HTTP_RESPONSE_HEADERS ) <> 256}{$message error 'HTTP_RESPONSE_HEADERS sizeof error.'}{$ifend}
  {$if sizeof( HTTP_SSL_INFO         ) <>  28}{$message error 'HTTP_SSL_INFO         sizeof error.'}{$ifend}