SVG_Read_last

4D v20

SVG_Read_last_error


SVG_Read_last_error -> Resultado

Parámetro	Tipo	Descripción
Resultado	Entero largo	Número del último error

Descripción

El comando SVG_Read_last_error devuelve el número del último error ocurrido durante la ejecución de un comando del componente 4D SVG y reinicializa este error.

El número de error devuelto puede ser específico a un comando del componente o un error generado por 4D. Los errores generados por el componente son:

8850	Insufficient number of parameters
8851	Invalid parameter type
8852	Invalid reference
8853	Incorrect value for attribute
8854	The element does not accept this command
8855	Invalid (ID not found in document) object name (symbol, marker, filter, etc.)
8856	DTD file not found
8857	Incorrect value for a parameter
8858	Unknown error

Ejemplo 1

Dado el método "SVG_error_mgmt" del ejemplo del comando SVG_Set_error_handler:

  `Instalación del método de gestión de errores

 $ Error_Method_Txt:=SVG_Set_error_handler("SVG_error_mgmt")

  `de ahora en adelante se ejecutará el método SVG_error_mgmt en caso de error

 

  `Creación de un nuevo documento SVG

 $SVG:=SVG_New(1200;900;"SVG Component Test";"";True)

 SVG_SET_VIEWBOX($SVG;0;0;1500;1000)

 

 If(SVG_Read_last_error=0)

 

    ...

 

 Else

  `El método SVG_error_mgmt ha sido llamado y recibió el número de error

 End if

 

  `Desinstalación del método de gestión de errores

 SVG_Set_error_handler

Ejemplo 2

Dado el siguiente método SVG_error_mgmt:

 C_LONGINT($1)

 C_TEXT($2)

 

  `Conservar el error y el contexto

 errorNumber:=$1

 commandName:=$2

 

  `Definir la variable sistema OK en 0

 OK:=0

Este método puede utilizarse de la siguiente forma:

  ` Instalación del método de gestión de errores

 $ Error_Method_Txt:=SVG_Set_error_handler("SVG_error_mgmt")

 

  ` Creación de un nuevo documento SVG

 $SVG:=SVG_New(1200;900;" SVG Component Test ";"";True)

 SVG_SET_VIEWBOX($SVG;0;0;1500;1000)

 If(OK=1)

 

    ...

 

 Else

    ALERT("Error No."+String(errorNumber)+" durante la ejecución del comando \""+commandName+"\"")

 End if

 

  ` Desinstalación del método de gestión de errores

 SVG_Set_error_handler

Ver también

SVG_Set_error_handler