Hola amigos ( me tomo la libertad de trataros como tal ...
)
He estado haciendo pruebas con el tema este de marras y me dice que el fichero donde redirecciono la salida no existe, por lo que parece que no se ejecuta el comando.
Pistas:
- strCommand contiene 'arp -a > c:\borrar.txt', confirmado.
- Si pongo SW_SHOW arranca una ventana porque la veo abrirse y cerrarse.
- Y poco más. Muestro las líneas para comprobar que lo hago bien.
En la ayuda no he encontrado documentación de winexec.
Utilizo Delphi 7
Agradecería cualquier sugerencia o similar.
Adjunto el código
Código:
****************************************************
procedure TFormMain.comprobar;
var n: integer; strCommand : String; zCommand : array[0..79] of Char;
begin
strCommand:= EComando.Text+' > '+FileListBox2.Directory+Esalida.text;
winexec(StrPCopy(zCommand, StrCommand), SW_HIDE);
Salida.LoadFromFile(ESAlida.Text);
For n:=0 to Salida.Count-1 do
showmessage(Salida[n]);
end;
Error: Cuando hace el LoadFromFile dice que el fichero que tiene ESalida.Text no existe.
****************************************************
Un saludo a todos