Inclure un fichier et sen servir

scaraber · Message par **scaraber** » mar. 16/mai/2006 19:12

salut
voila j'ai inclu dans mon exe deux fichier

Global listing,CDC

DataSection
listing:
IncludeBinary "listing.txt"
CDC:
IncludeBinary "Créateur_de_chipset.compress"
EndDataSection

mais je voudrait m'en servir apres (ouvrir le fichier txt et le packer)
comment faire ?
merci d'avance
a+
scaraber

AWEAR · Message par **AWEAR** » mar. 16/mai/2006 19:21

Comme ca :

CreatePack(ton_pack$)

AddPackMemory(?debut, ?fin-?debut)

DataSection
debut:
IncludeBinary "ton fichier"
fin:
EndDataSection

?

scaraber · Message par **scaraber** » mar. 16/mai/2006 19:25

non
mes fichier son deja créé je veu les mettre dans un fichier puis les utiliser avec openpack et openfile
a+
scaraber

Dorian · Message par **Dorian** » mar. 16/mai/2006 19:30

Voici le code : (v4)

Code : Tout sélectionner

CreateFile(0, "listing.txt")
WriteData(0, ?listing, ?CDC - ?listing)
CloseFile(0)
CreateFile(0, "Créateur_de_chipset.compress")
WriteData(0, ?CDC, ?end - ?CDC)
CloseFile(0)

;- Inclusion des fichiers
DataSection
  listing: ; adresse mém du début du fichier listing
  IncludeBinary "listing.txt"
  CDC: ; adresse mém de la fin du fichier listin et début du fichier Créat...
  IncludeBinary "Créateur_de_chipset.compress" 
  end: ; adresse de fin du fichier Créat ...
EndDataSection

Sa doit marché (compilé sous la béta 1 mais doit pas avoir de grosse différences ^^)

scaraber · Message par **scaraber** » mar. 16/mai/2006 20:48

et en 3.94 sa donne .?:D
je suis sous 3.94 je suis sur un viex PC et jai la fleme de dl la 4 de plsu que je susi en vitesse de conexion reduite en ce moment....

Dorian · Message par **Dorian** » mar. 16/mai/2006 20:51

Presque la même chose, suffit de d'enlever le "0, " du writedata() et sa roule normalement ^^