FORUM DU LOGICIEL PRISM

salut,

C'est mon premier script, et pour mes besoins j'ai besoins de séparer la couche verte des images APN que j'ai et de sauvegarder cette image.

je but sur la partie de sauvegarde qui refuse obstinement de fonctionner.
(jai besoin de sauvegarder une image verte avec un indice-i pour pouvoir les réutiliser ensuite sous PRISM)

comment dois-je faire? merci d'avance ce votre aide.


Resetdlgbox
TypeFileList=7
adddlgbox TypeFileList " fichier couleur a traiter"

dispdlgbox ModalResult

if (ModalResult=1)

getdlgbox ListeFile$ NbFile

// split des images couleurs
for i=1 NbFile
// j'ouvre l'image
open img ListeFile$
//je separe les plan couleurs
SPLIT_COLOR_IMG img imgR imgV imgB
//je ferme ce qui ne me sert a rien...
close imgR
close imgB
//je sauvegarde dans mon dossier
SaveCPA imgV C:\Users\pinx7\Desktop"ESSAIS.CPA"
//je ferme la derniere image.
close imgV

close imgV
next i


au fait y a t'il moyen de faire plus rapidement sans ouvrir les images ?

euh... je crois que j'ai reussi:

j'ai remplacé ma ligne de sauvegarde par cela:


STR I I$
chemin$="C:\Users\pinx7\Desktop\AA\ESSAIS-"+i$+".CPA"
SaveCPA imgV chemin$

Salut,

La fonction OPEN permet d'ouvrir un fichier image.
Tu peux ajouter un paramètre optionnel à la fin pour que l'image, qui sera ouverte par Prism et affichée, soit masquée immédiatement après son chargement, avec le paramètre MINIMIZE.

REM Nom de l'image
Input "Nom de l'image : " Name$

REM Get the directory of the image
REM in the String Directory$
GetRepName Directory$

Open Image Directory$+Name$ MINIMIZE

PRINT "Cliquer sur PLAY !"
PAUSE
Close Image

Marc