Arexx : help me
12 sujets de 1 à 12 (sur un total de 12)
-
en faite parse et limité à 15 arguments et mon string est variable il peut avoir de 1 à + de 15 argument donc parse va me posé problème j’ai fais cela mais existe t’il plus simple :
Extention = « jpg, gif, tiff, iff, png, psd »
Extention = COMPRESS(Extention)
i=0
DO WHILE (LASTPOS(‘,’,Extention) > 0)
ExtIn.i = LEFT(Extention,INDEX(Extention,’,’)-1); Extention = SUBSTR(Extention,INDEX(Extention,’,’)+1);
i=i+1
END
ExtIn.i = Extention
TotalExt = Extin.0
do TT=1 to i
TotalExt = TotalExt || ‘|’ || ExtIn.TT
End
say TotalExt
salut tooony
peux être en declarant un tableau d’extensions
en c:
char* extensions[] = {
« gif »,
« png »,
« jpg »,
NULL};
int i;
int main(int argc, char* argv[])
{
do { printf(« %s », extensions); }while(extensions[i++]);
}
Salut j’ai une nouvelle question au sujet d’arexx,
en faite je n’arrive pas à récuperer dans une variable le resultat de la ligne dessous :
address command version « Sys:libs/asl.library »
ou sinon existe t’il une fonction pour connaître le numero de version d’une library sans passé par une commande externe
Moi j’écrirai dans un fichier que tu relis. Voici un morceau d’un script où je fais ça :
variable « filename » contenant mon fichier à vérifier.
tmp = ‘T:fichier.txt’
ADDRESS COMMAND ‘version *>NIL: file full ‘filename’ >’tmp
IF (~OPEN(‘fic’,tmp,’R’)) THEN
DO
SAY ‘Error reading version of ‘filename
EXIT /* an error occured */
END
str = READLN(‘fic’)
CLOSE(‘fic’)
Maintenant que j’y pense certains scripts ont :
IF ~SHOW(‘L’,’rexxsupport.library’) THEN
CALL ADDLIB(‘rexxsupport.library’,0,-30) /* needed for statef() and showlist() */
Peut-être que SHOW permet de faire un test sur la version. Faut voir la doc….
Heu oui, j’avais même commencé un courriel pour te répondre… et j’ai zappé après.
En fait ton application utilise les spécificités du WB. Sous MorphOS avec Ambient, il faudra que j’essaye de voir les équivalents.
Sinon la fenetre de prefs s’ouvre bien.
A part le fait que l’application ne quitter pas quand on envoi un Ctrl+C et que la fenetre est bloquée en largeur (HSpace(1000) huuu fo pas).
Bon j’ai fixé le ctrl_c sans savoir pourquoi ce marchait pas…
Sinon j’ai identé la création de la GUI pour bien voir la structure de l’empilement.
A+
12 sujets de 1 à 12 (sur un total de 12)
- Vous devez être connecté pour répondre à ce sujet.
› Forums › AmigaOS, MorphOS et AROS › Développement › Arexx : help me