Bom dia André, iniciei a minha aplicação e não consigo gerar o md5 pra ela, dá o erro -1.. veja como implementei:
Delphi
(...)
function TECF.GerarMD5(nmPath, MD5 : String): string;
var
_MD5 : String;
begin
if _isBematech then
begin
_MD5 := MD5;
setlength(_MD5, 33);
tpRetorno := md5FromFile(nmPath, _MD5);
verificaRetorno(tpRetorno);
if(tpRetorno > 0) then
Result := _MD5
else
Result := '';
end;
end;
(...)
Consigo gerar para outras aplicações, menos para a que está executando esta função. É normal?