Image ds un ficfier
JeanMarcus
Messages postés
147
Date d'inscription
samedi 28 mai 2005
Statut
Membre
Dernière intervention
10 mars 2014
-
3 avril 2006 à 18:48
JeanMarcus Messages postés 147 Date d'inscription samedi 28 mai 2005 Statut Membre Dernière intervention 10 mars 2014 - 4 avril 2006 à 17:27
JeanMarcus Messages postés 147 Date d'inscription samedi 28 mai 2005 Statut Membre Dernière intervention 10 mars 2014 - 4 avril 2006 à 17:27
A voir également:
- Image ds un ficfier
- Convolution image - Conseils pratiques -Java
- Fpdf image - Forum PHP
- Image en tiff ✓ - Forum C# / .NET
- Change image png - Forum Visual Basic 6
- Rogner image css ✓ - Forum Javascript / DHTML
2 réponses
Flachy Joe
Messages postés
2103
Date d'inscription
jeudi 16 septembre 2004
Statut
Membre
Dernière intervention
21 novembre 2023
1
3 avril 2006 à 19:17
3 avril 2006 à 19:17
Tu les enregistres dans des fichiers séparrés, tu ouvre chacun d'eux avec une boucle et tu sauvegarde dans le fichier déstination avec un truc du genre
Open dest for binary as #1
for i = 0 to 10
open src & i & ".jpg" for binary as #2
dim data as string
data=string(lof(2),0)
get #2,,data
close #2
put #1,,clng(len(data))
put #1,,data
next
close #1
et tu charges avec
open src for binary as #1
on error goto fin
dim length as long
do
get #1,,length
data=string(length,0)
get #1,,data
loop until eof(1)
fin:
close #1
Et voila !
[;)] Flachy Joe [;)]
Open dest for binary as #1
for i = 0 to 10
open src & i & ".jpg" for binary as #2
dim data as string
data=string(lof(2),0)
get #2,,data
close #2
put #1,,clng(len(data))
put #1,,data
next
close #1
et tu charges avec
open src for binary as #1
on error goto fin
dim length as long
do
get #1,,length
data=string(length,0)
get #1,,data
loop until eof(1)
fin:
close #1
Et voila !
[;)] Flachy Joe [;)]
JeanMarcus
Messages postés
147
Date d'inscription
samedi 28 mai 2005
Statut
Membre
Dernière intervention
10 mars 2014
4 avril 2006 à 17:27
4 avril 2006 à 17:27
Ok et merci Flachy Joe
Je vais essayer et sinonje reviens !!!
Bravo à tous !!
Bye
Je vais essayer et sinonje reviens !!!
Bravo à tous !!
Bye
