DELETE RESOURCE

4D - Documentation   Français   English   German   Español   English   4D v11 SQL, Comandos por temas   4D v11 SQL, Lista alfabética de comandos   4D v11 SQL, Constantes por temas   Regresar   Anterior   Siguiente

versión 6.0


DELETE RESOURCE (resTipo; resNum{; resArchivo})

ParámetroTipoDescripción
resTipoAlfaTipo de recurso (4 caracteres)
resNumNuméricoNúmero de recurso
resArchivoDocRefNúmero de referencia del archivo de recursos o
archivo de recursos actual, si se omite

Descripción

El comando DELETE RESOURCE borra el recurso cuyo tipo se pasa en resTipo y cuyo número se pasa en resNum.

Si pasa un número de referencia de archivo de recursos en el parámetro resArchivo, el recurso se busca únicamente en ese archivo. Si no pasa resArchivo, el recurso se busca en todos los archivos de recursos abiertos.

Si el recurso no existe, DELETE RESOURCE no hace nada y la variable OK toma el valor 0 (cero). Si se encuentra y borra el recurso, la variable OK toma el valor 1.

Advertencia: NO borre recursos que pertenezcan a 4D o a archivos del sistema. Si lo hace, puede provocar la aparición de errores del sistema.

Ejemplos

1. El siguiente ejemplo borra el recurso "STR#" ID=20000:

      ` Note que este ejemplo borrará el primer recurso "STR#" ID=20000 
      ` encontrado en los archivos de recursos abiertos:
   DELETE RESOURCE ("STR#";20000)

2. El siguiente ejemplo borra el recurso "STR#" ID=20000 si se encuentra en un archivo de recursos especificado:

      ` Note que este ejemplo borrará el recurso "STR#" ID=20000
      ` sólo si esta presente en el archivo de recursos especificado por $vhResArchivo:
   DELETE RESOURCE ("STR#";20000;$vhResArchivo)
      ` Note también que si existe un recurso idéntico en un archivo de recursos abierto
      ` diferente al especificado en $vhResArchivo, este recurso permanecerá sin cambios   
3. El método de proyecto BORRAR RECURSOS DE TIPO borra todos los recursos del tipo especificado (por el segundo parámetro) del archivo de recursos especificado (por el primer parámetro):

      ` Método de proyecto BORRAR RECURSOS DE TIPO
      ` BORRAR RECURSOS DE TIPO ( Hora; Alfa )
      ` BORRAR RECURSOS DE TIPO ( resArchivo ; resTipo )
   
   C_TIME($1)
   C_STRING(4;$2)
   
   RESOURCE LIST($2;$aiResNum;$asResNombre;$1)
   If(OK=1)
      For($vlElem;1;Size of array($aiResNum))
         DELETE RESOURCE($2;$aiResNum{$vlElem};$1)
      End for
   End if

Una vez este método de proyecto está en su base, puede escribir:

      ` Borrar todos los recursos de tipo "PREF" del archivo de recursos $vhResArchivo
   BORRAR RECURSOS DE TIPO ($vhResArchivo;"PREF")

4. El método de proyecto BORRAR RECURSOS DE NOMBRE borra un recurso (de un tipo especifico) cuyo nombre se conoce:

      ` Método de proyecto BORRAR RECURSOS DE NOMBRE
      ` BORRAR RECURSOS DE NOMBRE ( Hora; Alfa ; Alfa )
      ` BORRAR RECURSOS DE NOMBRE ( resArchivo ; resTipo ; resNombre )
   
   C_TIME($1)
   C_STRING(4;$2)
   C_STRING(255;$3)
   
   RESOURCE LIST($2;$aiResNum;$asResNombre;$1)
   If(OK=1)
      $vlElem:=Find in array($asResNombre;$3)
      If($vlElem>0)
         DELETE RESOURCE($2;$aiResNum{$vlElem};$1)
      End for
   End if

Una vez este método de proyecto esté presente en su base, puede escribir:

      ` Borrar del archivo de recursos $vhResArchivo, el recurso "PREF" cuyo nombre es "Parámetros estándar":
   
BORRAR RECURSOS DE NOMBRE
 ($vhResArchivo;"PREF";"Parámetros estándar")

Ver también

RESOURCE LIST, SET RESOURCE PROPERTIES.

Variables y conjuntos sistema

La variable OK toma el valor 0 si el recurso no existe. Si el recurso ha sido borrado, la variable OK toma el valor 1.


4D - Documentation   Français   English   German   Español   English   4D v11 SQL, Comandos por temas   4D v11 SQL, Lista alfabética de comandos   4D v11 SQL, Constantes por temas   Regresar   Anterior   Siguiente