Código
comando := '/c md5sum.exe -b c:rede'+compnomeEAD+' > c:redeTESTE2.TXT';
ShellExecute(self.Handle, 'Open', 'cmd.exe',PCHAR(comando), 'c:rede', SW_HIDE);
Na função acima:
compnomeEAD = nome de um arquivo qualquer.
TESTE2.TXT = arquivo auxiliar onde será gravado o resultado da chave md5
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009