Software components for data protection, secure storage and transfer
InBuf : array[0..32767] of byte;
for iCounter := 0 to 32767 do
InBuf[iCounter] := 0;
s := IWEdit1.Text;
for iCounter := 1 to Length(s) do
InBuf[iCounter - 1] := ord(s[iCounter]); //-48
HashC := TElHashFunction.Create(SB_ALGORITHM_DGST_MD5);
IWEdit2.Text := HashC.Finish;
Number of guests: 1, registered members: 0,
in total hidden: 0
Copyright (c) 2017, /n software, inc.
As of July 15, 2016 EldoS business operates as a division of /n software, inc. For more information, please read the announcement.