class function TUtils.GetStringMD5(const AInPut: string): string;
begin
  Result := THashMD5.GetHashString(AInPut).ToLower;
end;