FoxPro/Visual FoxPro - TRY,CATCH,ENDTRY

 
Vista:

TRY,CATCH,ENDTRY

Publicado por jorge (15 intervenciones) el 05/10/2007 15:13:25
Estimados amigos del foro:
He desarrolaldo una aplicacion para digitalizar documentacion mediante un scanner y
estoy utilizando una rutina bajada de PORTALFOX para transformar un archivo BMP a JPG, la verdad que todo funciona bien en VFP 9. Al utilizarla en VFP 6 me da un error, ya que contiene una sintaxis de lenguaje que desconozco.
Para ejemplificar ésta es la parte de la rutina que me error:
******************************************
PROTECTED FUNCTION InitGDIplus
LOCAL hToken, cInput
hToken=0
cInput = PADR(CHR(1),16,CHR(0))

*Toda esta extructura me da error
TRY &&
THIS.errorcode = GdiplusStartup(@hToken, @cInput, 0)
CATCH
THIS.errorcode = -1
ENDTRY

THIS.hToken=hToken
RETURN (THIS.errorcode=0)
**************************************************

"TRY,CATCH,ENDTRY" es una sintaxis nueva para mi.
Me podrian explicar cual es su uso o si puede reemplazarla con
otra para que funcione en VFP6.
Desde ya muy agradecido
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:TRY,CATCH,ENDTRY

Publicado por Plinio (7841 intervenciones) el 05/10/2007 18:42:38
Esta disponible desde la version 8 en adelante. Es el manejo de errores extructurados. Solucion, ponerla en comantario

PROTECTED FUNCTION InitGDIplus
LOCAL hToken, cInput
hToken=0
cInput = PADR(CHR(1),16,CHR(0))

*Toda esta extructura me da error
*TRY &&
THIS.errorcode = GdiplusStartup(@hToken, @cInput, 0)
*CATCH
*THIS.errorcode = -1
*ENDTRY

THIS.hToken=hToken
RETURN (THIS.errorcode=0)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:TRY,CATCH,ENDTRY

Publicado por sergio (737 intervenciones) el 05/10/2007 20:21:13
el try catch en vfp6 no anda no existe ese comando en vfp6
No tenes nada en vfp6 qu epueda reemplazar eso, tendrias que create alguna funcion que simule ese funciobnamiento.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar