EVP_SealInit

var EVP_SealInit: function(

  ctx: PEVP_CIPHER_CTX;

  _type: PEVP_CIPHER;

  ek: PPIdAnsiChar;

  ekl: PIdC_INT;

  iv: PIdAnsiChar;

  pubk: PPEVP_PKEY;

  npubk: TIdC_INT

):TIdC_INT = Nil;