uses System.Hash;

var
    s : String;
    idx:Cardinal;
    StrAsBytes:TBytes;
    
begin
    h.Create(SHA256);

    s := "8050e721e49c013f00c62cf59f2163542a9d8df02464efeb615d31051b0fddc326";   // число в строковом виде   длина 66 символов
    
    SetLength(StrAsBytes, 33)
    
   i:=1;
   idx:=0;
   while i <= length(s) do          //  разбиваем на массив байтов
   begin
      StrAsBytes[idx]:=StrToInt('$'+s[i]+s[i+1]);

      i:=i+2;
      idx:=idx+1;
   end;


   h.Update(StrAsBytes);

   EditHash.Text := h.HashAsString;   // сюда выводится неверный хеш числа

  // 06b9635d255c90a90c6177760831832fb1cb2dc3da7e6ed23348feb0   -  неверный хеш,    56 длина


 // 63D7E562F7A0E809235D4591EDD273A3A8806A68FCEABFFA9D4DF3CE656A8C8C  -  должен быть такой,     64 длина
    
end;