Ver Mensaje Individual
  #1  
Antiguo 13-10-2016
Avatar de vroa74
vroa74 vroa74 is offline
Miembro
 
Registrado: jul 2006
Posts: 254
Reputación: 18
vroa74 Va por buen camino
Question como ejecutar programa externo y detener el proceso del programa hasta que termine

Buen día:
estoy haciendo uso de un código, solo que me hace falta algo para que se efectúe correctamente
Lo que necesito es ejecutar el programa externo, modificar el archivo que necesito y cuando se cierre el programa externo
el archivo ya modificado abrirlo en el componente RichEdit1, hasta el momento no he podio hacerlo, y la única manera de detenerlo que se me ocurrió fue ponerle un ShowMessage. Se que no es muy eficiente sin embargo, me permite hacer la carga del archivo tal y como quiero.


Código Delphi [-]
var
  A : String;
  B: PWIDECHAR;

Begin

           B := PWIDECHAR( extractfilepath(paramstr(0)) + 'doc\Arch_Texto.rtf');
           ShellExecute(Handle, 'open', 'wordpad', B , nil, SW_SHOWNORMAL);
           ShowMessage(´presiones para continuar´);  {como poder desaparece esta linea }
           RichEdit1.Lines.LoadFromFile(B);

End;
Responder Con Cita