4D Doc Center : Lire nom ressource

4D v12.4

Lire nom ressource


Lire nom ressource ( resType ; resNum {; resFichier} ) -> Résultat

Paramètre	Type	Description
resType	Chaîne	Type de ressource (4 caractères)
resNum	Entier long	Numéro de référence de ressource (ID)
resFichier	RefDoc	Numéro de référence du fichier de ressource ou Tous les fichiers de ressources ouverts si omis
Résultat	Chaîne	Nom de la ressource

Description

Lire nom ressource retourne le nom de la ressource dont le type est passé dans resType et le numéro de référence (ID) dans resNum.

Si vous ne passez pas le paramètre resFichier, la ressource est recherchée dans tous les fichiers de ressources ouverts. Si vous passez un numéro de référence de fichier de ressource dans le paramètre resFichier, la ressource n'est recherchée que dans ce fichier.

Si la ressource n'existe pas, Lire nom ressource retourne une chaîne vide.

Exemple

La méthode projet suivante copie une ressource ainsi que son nom et ses attributs d'un fichier de ressources vers un autre :

  ` Méthode projet COPIER RESSOURCE

  ` COPIER RESSOURCE ( Alpha ; Entier long ; Heure ; Heure )

  ` COPIER RESSOURCE ( typeRes ; IDRes ; fichierResSource ; fichierResDest )

 

 C_ALPHA(4;$1)

 C_ENTIER LONG($2)

 C_HEURE($3;$4)

 C_BLOB($vxResData)

 

 LIRE RESSOURCE($1;$2;$vxData;$3)

 Si(OK=1)

    ECRIRE RESSOURCE($1;$2;$vxData;$4)

    Si(OK=1)

       ECRIRE NOM RESSOURCE($1;$2;Lire nom ressource($1;$2;$3);$4)

       ECRIRE PROPRIETES RESSOURCE($1;$2;Lire proprietes ressource($1;$2;$3);$4)

    Fin de si

 Fin de si

Lorsque cette méthode projet est présente dans votre application, vous pouvez écrire :

  ` Copier la ressource 'DATA' ID = 15000 de fichier A au fichier B

 COPIER RESSOURCE("DATA";15000;$vhFichResA;$vhFichResB)