Добрый день.

Столкнулся с проблемой
При формировании подписи формата CADES-T программно - получаю ошибку 80072EE6
Подпись формата CADES-BES формируется нормально. Видимо проблема с доступом к службе штампов времени
Фаерволы, антивирусы отключены. Прокси серверов нет. Галку из свойств IE "Автоматическое определение параметров" снял
Версия SDK 2.0 КриптоПро 4 сертифицированная
Лицензии действующие.
Похожие ветки просмотрел, но там не программное формирование/

Может кто-нибудь сталкивался? Может кто натолкнет на мысль. Спасибо

Код формирования - Delphi. Создан по аналогии с кодом на С++ из примеров

SERVICE_URL:='http://testca.cryptopro.ru/tsp/tsp.srf';

FillMemory(@tspConnectionPara, SizeOf(CADES_SERVICE_CONNECTION_PARA), 0);
tspConnectionPara.dwSize:=SizeOf(CADES_SERVICE_CONNECTION_PARA);
tspConnectionPara.wszUri:= @SERVICE_URL;
tspConnectionPara.pAuthPara:=nil;

FillMemory(@CadesSignPara, SizeOf(CadesSignPara), 0);
CadesSignPara.dwSize := SizeOf(CadesSignPara);
CadesSignPara.dwCadesType := CADES_T;
CadesSignPara.pTspConnectionPara:=@tspConnectionPara;

FillMemory(@CryptSignMessagePara, SizeOf(CryptSignMessagePara), 0);
CryptSignMessagePara.cbSize := SizeOf(CryptSignMessagePara);
CryptSignMessagePara.dwMsgEncodingType := X509_ASN_ENCODING or PKCS_7_ASN_ENCODING;
CryptSignMessagePara.pSigningCert := pCertContext;
CryptSignMessagePara.HashAlgorithm.pszObjId:='1.2.643.2.2.9';

FillMemory(@CadesSignMessagePara, SizeOf(CadesSignMessagePara), 0);
CadesSignMessagePara.dwSize := SizeOf(CadesSignMessagePara);
CadesSignMessagePara.pSignMessagePara := @CryptSignMessagePara;
CadesSignMessagePara.pCadesSignPara := @CadesSignPara;

pSignedMessage := nil;
if not CadesSignMessage(@CadesSignMessagePara, false, 1, @MessageArray[0], @MessageSize[0], pSignedMessage) then
ShowMessage(IntToStr(GetLastError())+#10#13+SysErrorMessage(GetLastError));