Trouver l'erreur

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
Georges-85
Messages : 5
Inscription : jeu. 16/sept./2010 14:05

Trouver l'erreur

Message par Georges-85 »

Bonjour,
Je suis nouveau, j'ai pas mal lu la doc et j'ai même commencé à écrire quelques lignes.
J'étais en train de décortiquer un script trouvé sur le net et je l'avais copié dans l'IDE. Je fais compiler exécuter pour voir et le compilateur m'affiche ce message : "Fichiers_Selectionner() n'est pas une fonction, un tableau ou une liste". Et justement si, d'après le scrip c'est bien une liste structurée. Alors ou est le truc ? Le script ou le compil qui bugge". Voici l'extrait concerné du script :

Code : Tout sélectionner

Structure Fichiers_A_Compresser
  nom.s          ; nom du fichier
  Position.l     ; position du fichier dans l'archive
EndStructure

NewList  Fichiers_Selectionner.Fichiers_A_Compresser()  ; récupère les infos des fichiers
; sélectionnés pour la compression

; ;==================================================================================================================
; ;==================================================================================================================

Procedure.l Compresse(NomFichier$)
      Shared Taille_non_Compres


   If CreatePack(NomFichier$) ; crée le le fichier qui va être compressé
      
      packers$ = OpenFileRequester("Choisissez le(s) fichiers a compresser", "tout", "*.*", 0, #PB_Requester_MultiSelection)
      If packers$ ; teste si la chaine existe

         Repeat
         ; dans cette boucle je compte le nombre de fichier pour pouvoir afficher la progressbar correctement
         ; le comptage va très vite
           Nb_FichiersACompresser + 1
           AddElement(Fichiers_Selectionner())
           Fichiers_Selectionner()\nom = packers$
           Fichiers_Selectionner()\Position = Nb_FichiersACompresser
           packers$ = NextSelectedFileName()

         Until packers$ =""
         Debug CountList(Fichiers_Selectionner()) 
         Debug ""
:roll:
Fred
Site Admin
Messages : 2809
Inscription : mer. 21/janv./2004 11:03

Re: Trouver l'erreur

Message par Fred »

Bienvenue ! Essaie de mettre un 'Global' devant le newlist pour qu'elle soit visible dans ta procedure.
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Re: Trouver l'erreur

Message par Backup »

Salut
et lorsque tu propose un code sur le forum (le mots "Script" est mal approprié)
dans l'editeur de rédaction des messages tu as un petit bouton "Code"

tu sélectionne ton code , puis tu clique sur le bouton code

cela va ajouter les balises [ code] et [/ code]
ce qui va enfermer ton code dans un cadre fait pour !!

Merci :)


ps: je viens de modifier ton message dans ce sens ;)
Georges-85
Messages : 5
Inscription : jeu. 16/sept./2010 14:05

Re: Trouver l'erreur

Message par Georges-85 »

Merci Fred
Etourderie de débutant
Désolé d'avoir créé un post pour si peu de choses, mais vraiment ça m'était passé au dessus de la tête. :mrgreen:
Avatar de l’utilisateur
djes
Messages : 4252
Inscription : ven. 11/févr./2005 17:34
Localisation : Arras, France

Re: Trouver l'erreur

Message par djes »

Bienvenue! :)

Essaye aussi de mettre des codes fonctionnels, que l'on puisse copier-tester sans trop de manips à faire, ou de prise de tête à essayer de piger ce que tu veux. On gagnera du temps et tu auras de meilleures réponses!
Georges-85
Messages : 5
Inscription : jeu. 16/sept./2010 14:05

Re: Trouver l'erreur

Message par Georges-85 »

Merci Dobro
J'en tiendrai compte la prochaine fois :oops:
Avatar de l’utilisateur
Ar-S
Messages : 9540
Inscription : dim. 09/oct./2005 16:51
Contact :

Re: Trouver l'erreur

Message par Ar-S »

Bienvenue,
Je t'invite aussi à regarder ce qui concerne PureForm et JaPBe qui sont un Editeur et un IDE fait par Gnozal.
Tu feras ton choix mais c'est peut être judicieux de t'y intéresser.
Voilou.
~~~~Règles du forum ~~~~
⋅.˳˳.⋅ॱ˙˙ॱ⋅.˳Ar-S ˳.⋅ॱ˙˙ॱ⋅.˳˳.⋅
W11x64 PB 6.x
Section HORS SUJET : ICI
LDV MULTIMEDIA : Dépannage informatique & mes Logiciels PB
UPLOAD D'IMAGES : Uploader des images de vos logiciels
Répondre