FoxPro/Visual FoxPro - Como funciona SHELLEXECUTE()

Saludos:
*************************************
Shellexecute(0,"Open","mpasmwin.exe","miarchivo.asm","",0)
if .not. file("miarchivo.hex")
messagebox("Error, no se ha creado el archivo","ERROR")
else
messagebox("se ha creado el archivo miarchivo.hex","OK")
endif
*************************************

Tengo esta rutina en un boton y cuando la ejecuto, noto que antes de ejecutar el MPASMWIN
aparece ya el MESSAGEBOX diciendo Error,no se ha creado el archivo ..... para simultaneamente ejecuta el programa anterior.
Lo cierto es que realmente crea el archivo ... pero no se porque me dice que no ... creo que lee hasta el final de las lineas de codigo para luego volver a la funcion ...?porque?

Gracias.

Hola!
es probable que siga ejecutando el código despues de crear el archivo.
prueba poner un WAIT antes del IF y ver si funciona.
saludos.
Uplift.

Hola, como sabrás, SHELLEXECUTE() es una función perteneciente a la API de Windows, por lo tanto, no está sujeta a los eventos de tu programa. La función se ejecuta cuando presionas el botón que creaste e inmediatamente retorna el control a tu programa, ejecutando la línea de código inmediatamente siguiente; por lo visto, esto ocurre antes de que termine de cargarse el MPASMWIN, y por eso es que el mensaje aparece antes de que se cargue MPASMWIN.

SHELLEXECUTE() devuelve un valor, creo que si este es distinto de cero es porque se ha producido un error al cargar el archivo solicitado, si no tienes documentación detallada con respecto a los valores que devuelve la función, yo te los puedo enviar.

Puedes evaluar lo siguiente:

nError = Shellexecute(0,"Open","mpasmwin.exe","miarchivo.asm","",0)
if nError = 0
messagebox("Error, no se ha creado el archivo","ERROR")
endif
// En caso contrario no se ejecuta el comando.

Espero que te sirva