Код:

UnicodeString key = "18e14a7b6a307f426a94f8114701e7c8e774e7f9a47e2c2035db29a206321725", chsum;
   uint8_t private_key[32] = {0};
   uint8_t eliptic_public_key[64] = {0};
   uint8_t compressed_public_key[33] = {0};
   //Заполняем private_key десятичными значениями
   char h[2]={'0'};
   int i=0;
   while(key.Length()!=0)
   {
	  h[0]=key[1];
	  h[1]=key[2];
	  key.Delete(1,2);
	  private_key[i] = xtodec(h);
	  i++;
   }
   //вычисляем публичный ключ через ECDSA
   const uECC_Curve_t * curve;
   curve = uECC_secp256k1();
   uECC_compute_public_key(private_key, eliptic_public_key, curve);
   key = "";
   for(i=0; i<64; i++)
	key += dectox(eliptic_public_key[i]);
   //преобразуем в сжатый формат публичного ключа
   uECC_compress(eliptic_public_key, compressed_public_key, curve);
   key="";
   for(i=0; i<33; i++)
   	key += dectox(compressed_public_key[i]);

Код:

//шифрование публичного ключа
	key = THashSHA2::GetHashString(key);
	RIPEMD_160 hash;
	std::string stdLine(AnsiString(key).c_str());
	hash.message = stdLine;
	stdLine = hash.ripemd_160();
	key = stdLine.c_str();

Код:

key = THashSHA2::GetHashString(*compressed_public_key);