...

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
Psycode
Messages : 131
Inscription : lun. 23/août/2004 18:47
Localisation : Jupiter ?

...

Message par Psycode »

...
Dernière modification par Psycode le ven. 03/sept./2004 17:10, modifié 1 fois.
Avatar de l’utilisateur
Chris
Messages : 3731
Inscription : sam. 24/janv./2004 14:54
Contact :

Message par Chris »

Le 101, c'est une valeur que tu attribue comme index au fichier. Tu mets ce que tu veux.

Pour le reste, pour charger un fichier en mémoire :

Code : Tout sélectionner

Fichier$ = "Test.txt"
Size = FileSize(Fichier$)

If Size > 0
  If ReadFile(0,Fichier$)
    *Buffer = AllocateMemory(Size)
    If *Buffer
      ReadData(*Buffer,Size)
    EndIf
    CloseFile(0)
  EndIf
EndIf

Debug PeekS(*Buffer)
nico
Messages : 3702
Inscription : ven. 13/févr./2004 0:57

Message par nico »

Code : Tout sélectionner

fich$="ecrire un octet.txt" ;dans le fichier j'ai écrit"Pure Basic"
result=ReadFile(1,fich$) 
If result = 0 : End : EndIf 

LongueurALire = Lof()
*Buffer = AllocateMemory(LongueurALire) 
LongueurLue = ReadData(*Buffer, LongueurALire) 
For a=0 To 9
  ascii.s=Chr(PeekB(*Buffer+a)) ;je lis les dix premiers caractères 
  Debug ascii
Next
Psycode
Messages : 131
Inscription : lun. 23/août/2004 18:47
Localisation : Jupiter ?

Message par Psycode »

...
Dernière modification par Psycode le ven. 03/sept./2004 17:10, modifié 1 fois.
nico
Messages : 3702
Inscription : ven. 13/févr./2004 0:57

Message par nico »

Je ne sais pas mais j'ai l'impression de me reconnaitre :lol:
Répondre