Olá Paulo, use assim

ExecuteFile( 'Nome_do_exe.exe', '/s /y /c /qualquer parametro' );



Em 29/06/07, Paulo Daniel <[EMAIL PROTECTED]> escreveu:
>
>   Eduardo, gostei dessa sua rotina.
> Me poderia passar um exemplo de como você chama ela?
>
> ExecuteFile(?????, ?????);
>
> Grato pela ajuda.
>
> Eduardo Silva dos Santos escreveu:
> > eu uso essa rotina:
> >
> > uses Shellapi;
> >
> > .....
> >
> > Procedure ExecuteFile( cFileName,Param:String);
> > var
> > FileExec:TCustomFileRun;
> > Begin
> >
> > Try
> > FileExec := TFileRun.Create(nil);
> > with FileExec do begin
> > FileName := cFileName;
> > Parameters := Param;
> > Execute;
> > end;
> > Finally
> > FileExec.Free;
> > end;
> >
> > end;
>
>
>
>
>
> _______________________________________________________
> Yahoo! Mail - Sempre a melhor opção para você!
> Experimente já e veja as novidades.
> http://br.yahoo.com/mailbeta/tudonovo/
>
> 
>



-- 
Eduardo Silva dos Santos
DRD Sistemas.
(27) 3218-4201
MSN: [EMAIL PROTECTED]
Site: http://www.drdsistemas.com/


[As partes desta mensagem que não continham texto foram removidas]

Responder a