comment vérifier qu'un fichier existe ? - Page 1

Comment vérifier qu'un fichier existe avant de l'ouvrir par exemple avec un viewer ?
exemple hibview("zmath/math1") Or ce fichier n'existe pas .
Comment on fait pour vérifier quil existe en Basic pour eviter le temps de décmpression de hibview avant qu'il se rend compte que se fichier n'exiistepas ??

Autre chose : Je voudrais faire k variant de 298 à 271) (F1,F2 ...)
k-267->e
z/le->l avec pour eu par exemple la valeur 2
ce qui donnerait en faite
z/l2->l soit la liste l2 situé dans le dossier z dans la liste l

Est ce que c possible ??

Enfin dernier trucs vaut il mieux faire des sous prog du type Define afficher()=Prgm dans son prog ou le taper dans une boucle de type For (peut etre pas tres claire :P ) car j'ai peur que ça ralentisse ma boucle .

En fait qd F1 ou F2 .. est pressé j'affiche la liste correspondant .

Voilà je sais pas si j'ai été très claire...
Merci d'avance
Christian

OdiN
: Comment on fait pour vérifier quil existe en Basic pour eviter le temps de décmpression de hibview avant qu'il se rend compte que se fichier n'exiistepas ??

:Local notexist
:If getType(zmath\math1)=getType(notexist) ...

Autre chose : Je voudrais faire: (k variant de 298 à 271) (F1,F2 ...)
k-267->e
z/le->l avec pour eu par exemple la valeur 2
ce qui donnerait en faite
z/l2->l soit la liste l2 situé dans le dossier z dans la liste l
Est ce que c possible ??

Oui.
#("z\l"&string(exact(e)))->l

Enfin dernier trucs vaut il mieux faire des sous prog du type Define afficher()=Prgm dans son prog ou le taper dans une boucle de type For (peut etre pas tres claire :P ) car j'ai peur que ça ralentisse ma boucle .

Il vaut mieux les mettre directement dans la boucle.

Merci bcp pour toutes ces réponses qui vont bien me faire avancer

KK> pq tu mets pas tt simplement If getType(fichier)="NONE" ?

Parceque Kevin est un fervant admirateur des apps de localisation (changement de langue). Comme Ti a merveilleusement bien construit ces applications, getType ne renvoie pas "NONE" dans toute les langues ("AUC" en français par exemple).

Bref, c'est pourquoi Kevin est parmis les seuls programmeurs basic à utiliser un code aussi gracieux et économique en place

lol

J'aurais besoin d'une autre aide
Je voudrais qd on Appui sur 2nd bas ça descende de 5 et qd on appuie sur 2nd haut ça monte de 5
Et qd on appuie sur Diamand bas ça aille tout en bas et inversemnt
J'utilise vertel pour détecter l'appuie d'une touche avec :
vertel("e*pause","/","e*retr","k")
k[1]->k
Et apres je fais des if k= ...

Je pourrais détecter 2nd et diamand et refaire une pause pour détecter la touche suivant bas ou haut pour faire l'action souhaité mais ça me parrait un peu long.

Merci d'avance

Le code de Haut est différent de celui de 2nd+Haut (la touche 2nd n'est de toute façon pas detectée toute seule).
Donc il te suffit de connaitre les codes des touches avec 2nd, Diams ou rien, puis de faire simplement tes if.

Au fait, il faut mettre "e*paus" et non pas "e*pause"

Petite faute de frappe

Ouais mais donc ya pas une technique plus courte ?

Qu'est-ce que tu veux de plus court ??? Il y a deux codes distincts, je vois mal comment tu veux faire plus simple...

Vertyos :
Parceque Kevin est un fervant admirateur des apps de localisation (changement de langue). Comme Ti a merveilleusement bien construit ces applications, getType ne renvoie pas "NONE" dans toute les langues ("AUC" en français par exemple).

Bref, c'est pourquoi Kevin est parmis les seuls programmeurs basic à utiliser un code aussi gracieux et économique en place

Non, il n'est pas le seul .

Effectivement vous êtes deux.

... Trois (en tous cas)

Cool... En vous mettant à deux avec le forum TICT vous arriverez peut-être à dépasser les doigts d'une main

Vous vous prenez à tête à garder une compatiblité avec une apps mal codée, ce qui résulte dans des programmes plus gros et plus lents que la moyenne.

Il y a juste setGraph et getType qui boguent? Pour getType, on peut pallier à ce problème avec la fonction 42 de clib. Renvoie le type (tag de fin de fichier) ou bien l'extension si elle est personnalisée.
Vertyos... Tu serais étonné si tu savais (en tous cas chez nous) le nombre de gens qui utilisent le français...

Vous vous prenez à tête à garder une compatiblité avec une apps mal codée, ce qui résulte dans des programmes plus gros et plus lents que la moyenne.

Surtout que tout le monde fait des getType et des setGraph en boucle, d'où un ralentissement certain... (et cl est même plus rapide que getType)
[Edit] Je crois avoir lu dans le manuel que TI permettait d'utiliser des constantes chaînes pour la compatibilité, mais il faut voir sur le CD...

Brunni
: Il y a juste setGraph et getType qui boguent?

Non.

Pour getType, on peut pallier à ce problème avec la fonction 42 de clib. Renvoie le type (tag de fin de fichier) ou bien l'extension si elle est personnalisée.

Moyen comme méthode pour "pallier" le problème, ça oblige utiliser une lib rien que pour ça. Au passage, FLib et Vertel la possèdent aussi.

Vertyos... Tu serais étonné si tu savais (en tous cas chez nous) le nombre de gens qui utilisent le français...

De toute façon un jour ou l'autre ils passeront leur calculatrice en anglais...

(et cl est même plus rapide que getType)

Heureusement Le contraire serait inquietant.

FLib est inquiétante

Brunni
: [Edit] Je crois avoir lu dans le manuel que TI permettait d'utiliser des constantes chaînes pour la compatibilité, mais il faut voir sur le CD...

Dans le cas de getMode et setMode, on peut utiliser des chaînes contenant des nombres (style "1"), mais seulement sous AMS 2, donc il faut aussi prévoir une solution pour AMS 1 (avec un Try par exemple). La solution la plus simple est d'éviter les changements de mode, c'est de toute façon plus propre.

Vertyos
:

Brunni
: Il y a juste setGraph et getType qui boguent?

Non.

Mais presque. Ce qui bogue:
* getType avec une chaîne constante. Solution: comparer avec le getType d'une variable (de préférence locale) de type connu.
* tout ce qui touche les changements de mode. Solution 1: éviter les changements de mode. Solution 2:
:Try
:setMode("1","1")
:Else
:ClrErr
:setMode("FOO","Bar")
:EndTry
(La première variante est pour AMS 2, la deuxième pour AMS 1.)
* expr avec des noms de fonctions intégrées. Solution: Ne pas utiliser des noms de fonctions intégrées avec expr.

Ah oui j'avais oublié expr. De toutes façons expr n'est (à l'excès) pas une manière très propre de procéder. La plupart du temps, on peut les remplacer par des indirections (c'est aussi plus rapide) du genre
CopyVar #nom,var
plutôt que
expr("CopyVar "&nom&",var")
(c'est con mais je faisais cette erreur il y a pas longtemps encore) A part ça, c'est vrai que cette histoire de langue est mauvaise. Pourquoi TI n'ont-ils même pas prévu un truc qui permet de remettre l'anglais par défaut? Ou bien laisser le TI-BASIC tel quel...

Moyen comme méthode pour "pallier" le problème, ça oblige utiliser une lib rien que pour ça. Au passage, FLib et Vertel la possèdent aussi.

Pas flib. Type ne renvoie que l'extension perso du fichier, s'il en a une.

De toute façon un jour ou l'autre ils passeront leur calculatrice en anglais...

Pourquoi?

Brunni
: La plupart du temps, on peut les remplacer par des indirections (c'est aussi plus rapide)

Il y a des cas ou expr est irremplaçable. Par exemple pour executer une instruction contenu dans une chaine.

Pas flib. Type ne renvoie que l'extension perso du fichier, s'il en a une.

Ah bon. Bah vertel alors

Pourquoi?

Parcequ'il n'y a qu'à voir le nombre de débutants qui viennent pleurer ici (ou sur d'autres forums) parceque le français est parti de leur calc. Et encore, ce n'est que la partie émergée de l'iceberg : il y en a surement beaucoup plus qui laissent leurs calcs telles quelles, et c'est très bien.

Brunni
: Pas flib. Type ne renvoie que l'extension perso du fichier, s'il en a une.

Si, FLib le fait, je l'utilisait dans une trés veille version d'un shell.

Kevin-> le Try fait bugguer les setGraph/setMode
le mieux est de faire:
Local testnone
If /*soit*/ getConfg()[1]="Product Name" /*soit*/ getType(testnone)="NONE" Then
setGraph("Axes","OFF")// en anglais on est sur qu'il passe
Else
setGraph("4","1")// Passera toujours si pas anglais, car forcément AMS2
Endif

ou alors flib2("folder:ma_var")
si fl={}, ma_var existe pas et si fl[1]=nom_d'un_dossier, alors le fichier existe

kilikou-> Et comment vérifiés-tu que flib et flib2 existent? et dans quel dossier ils se trouvent?

Remonter un topic d'un mois pour poster une connerie

ba la tu fait
:try
:flib("version") //exemple
:else
:disp "Flib est introuvable"
:stop
:endtry

ah ouais, mais ca verifie pas ou il se trouve...

Bah ué

le pb c'est que je vois pas comment faire.

Le problème c'est que flib dans un try ça fout un bordel pas possible et ça fait tout bugguer!

kilikou
: le pb c'est que je vois pas comment faire.

Chaîne Exec. C'est le seul moyen.