Подскажите, пожалуйста!
Можно ли при использовании EnvelopedData из CAPICOM для шифрования сертификатом CryptoPro получить контент, зашифрованный по ГОСТ 28147-89 ?
Следующая функция (делфи) теоретически должна это делать, но дает ошибку "The specified encryption algorithm is invalid".

function TCapicomClass.EncryptStr(const s: String): String;
begin
Result := '';
if s = '' then exit;
F_EnvelopedData := Unassigned;
EnvelopedData.Content := s;
EnvelopedData.Recipients.Clear;
EnvelopedData.Recipients.Add(F_EncodeCert);
EnvelopedData.Algorithm.Name := CRYPTO_PRO_ALG_ID;
EnvelopedData.Algorithm.KeyLength := CAPICOM_ENCRYPTION_KEY_LENGTH_MAXIMUM;
Result := EnvelopedData.Encrypt(CAPICOM_ENCODE_BASE64);
end;

Если в качестве алгоритма подставлять стандартные значения (CAPICOM_ENCRYPTION_ALGORITHM_xxx), то все работает на ура.

CryptoPro CSP 2.0, CAPICOM 2.0+2.1

Так вопрос тогда в следующем: в этом случае шифрование сообщения будет на ГОСТе или на каком-нибудь RC2, ключ которого зашифруется на ГОСТе?

Спасибо за ответы!
И еще один вопрос: у вас на сайте нашел программу cryptcp.exe, которая умеет подписывать и шифровать файлы. Я пытался использовать ее как эталон, однако сообщение, зашифрованное моей процедурой и расшифрованное данной программой переводится в юникод, а если шифровать вашей программой, а расшифровывать capicom, сообщение портится окончательно. Не подскажете как добиться совместимости?

И заодно по поводу лицензии на вашу программу: сколько будет действовать тестовая лицензия и что произойдет, когда она кончится?