aurelien2723
Messages postés181Date d'inscriptionjeudi 12 janvier 2006StatutMembreDernière intervention26 janvier 2011
-
20 mars 2008 à 09:11
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 2021
-
20 mars 2008 à 11:27
Bonjour,
Au même titre que cette fonction extrait des données des ressources :
Public Function ExtractDR(FileName As String, RType As String, RNumber As String)
Dim BUFFER_RES_DATA() As Byte
Open FileName For Binary Access Write As #1
BUFFER_RES_DATA = LoadResData(RNumber, RType)
ReDim Preserve BUFFER_RES_DATA(UBound(BUFFER_RES_DATA))
Put #1, , BUFFER_RES_DATA
Close #1
End Function
Existe t'il une fonction qui permet d'ajouter un fichier dans ces ressources svp??