prefer TDerInteger.ValueOf

Author: Xor-el

CryptoLib.Tests/src/Security/DigestUtilitiesTests.pas

@@ -252,7 +252,7 @@ procedure TTestDigestUtilities.TestGetDigestAlgorithmIdentifierRejectsParameters
   LRaised: Boolean;
 begin
   LAlgID := TAlgorithmIdentifier.Create(TNistObjectIdentifiers.IdSha256,
-    TDerInteger.Create(1) as IDerInteger);
+    TDerInteger.ValueOf(1));
   LRaised := False;
   try
     TDigestUtilities.GetDigest(LAlgID);