PureBasic

Backup · Message par **Backup** » sam. 28/août/2004 1:55

;=======================================================
Fich$="ma_dll.dll" ;mettre le nom d'un fichier a compresser
;=======================================================

sait tu qu'il existe les requester pour ça ??

remplace ta ligne ci dessus par ça :

Code : Tout sélectionner


Fich$ = OpenFileRequester("charge un fichier", "c:\", "*.*", 0 )

Psycode · Message par **Psycode** » sam. 28/août/2004 2:22

Backup · Message par **Backup** » sam. 28/août/2004 11:30

pourquoi tu transform en ascii pour retransformer en numerique ??

Code : Tout sélectionner

a$ = Chr(PeekB(*Buffer+i))
a = Asc(a$)

a la place ceci ne marche pas ??

Code : Tout sélectionner

 a=PeekB(*Buffer+i))

Psycode · Message par **Psycode** » sam. 28/août/2004 12:25

Psycode · Message par **Psycode** » sam. 28/août/2004 18:51

...