FoxPro/Visual FoxPro - Mensajes.

Hola !!, quería saber como hago para que cuando ejecuto mi programa no paresca ningun mensaje de error, no como depurar los errores, sino solo como hago para que no aparescan los mensajes.

Hola Sabes, si tienes algun problema para que te muestre los errores (no se que errores), pero de antemano te digo si hay errores tu aplicacion no esta correcta yo como controlo cualquier insidencia es asi..

Depura este codigo y te servira.
Tienes que hacer una pantalla para que te muestre esto y luego ya sabes que hacer mas o menos..

Suerte.

ON ERROR DO errhand WITH ;
ERROR( ), MESSAGE( ), MESSAGE(1), PROGRAM( ), LINENO( )
*** The next line should cause an error ***
USE nodatabase
ON ERROR && restore system error handler
PROCEDURE errhand
PARAMETER merror, mess, mess1, mprog, mlineno
CLEAR
? 'Error number: ' + LTRIM(STR(merror))
? 'Error message: ' + mess
? 'Line of code with error: ' + mess1
? 'Line number of error: ' + LTRIM(STR(mlineno))
? 'Program with error: ' + mprog

ON ERROR variable_tonta = .f.