ЕncryрtMеssage, проблема

[lollollollol]

Перехватываю функцию ЕncryрtMеssage из secur32.dll

Много раз перечитывал MSDM
В итоге написал следующий код:

type
  PSecBuffer=^TSecBuffer;
  TSecBuffer = record
    cBuffers :ULONG;
    BufferType:ULONG;
    pvBuffer:pointer;
  end;
  PSecBufferDesc=^TSecBufferDesc;
  TSecBufferDesc = record
    ulVersion:ULONG;
    cBuffers :ULONG;
    pBuffers:PSecBuffer;
  end;

function my_EncryptMessage(phContext:integer;fQOP:ULONG;pMessage:PSecBufferDesc;MessageSeqNo:ULONG):Integer; stdcall;
begin
OutputDebugStringA(PChar('EncryptMessage'+IntToStr(pMessage.cBuffers)+','+IntToStr(pMessage.pBuffers.cBuffers)
+','+IntToStr(pMessage.pBuffers.BufferType)+' :'+PChar(pMessage.pBuffers.pvBuffer)));
  Result:=old_EncryptMessage(phContext,fQOP,pMessage,MessageSeqNo);
end;

Как результат переменная pMessage.cBuffers содержит информацию, что имеется 3 или 4 блока данных.
Я всегда получаю только хедер заголовка, без POST запроса, в чём проблема?
Я думаю дело в том что информация хранится в остальных блоках, но как их найти, где они?

Как получить всю инфу, которая передаётся в эту функцию?

[lollollollol]

Тема закрыта, неправильно объявлял структуру

  PSecBuffer=^TSecBuffer;
  TSecBuffer = record
    cBuffers :ULONG;
    BufferType:ULONG;
    pvBuffer:Pointer;
  end;
  ArrSecBuffer = array[0..3] of TSecBuffer;
  PArrSecBuffer = ^ArrSecBuffer;
  PSecBufferDesc=^TSecBufferDesc;
  TSecBufferDesc = record
    ulVersion:ULONG;
    cBuffers :ULONG;
    pBuffers:PArrSecBuffer;
  end;