Discussion :

[delphidebutant]

Bonjour,
j'ai un programme qui doit parcourir une arborescence.
J'utilise à un endroit la récursivité.
A priori, je ne fais aucune création d'objet pendant mon parcours.
A l'éxécution, j'ai un plantage "Mémoire insuffisante".

En controlant la récursivité, pour détecter l'erreur, j'ai pu vérifier qu'il n'y avait pas plus de 9 appels récursifs.

Je ne vois donc pas pourquoi ça plante.

En vérifiant la conso mémoire, à l'éxécution, avec le gestionnaire des taches XP, j'ai un processus qui consomme entre 50 Mo et 125 Mo (volet "Processus").

Par contre, sous le volet "Performances", j'ai un graphique de l'historique du fichier d'échanges qui monte, qui monte, qui monte....telle la bêbête.

D'où cela pourrait-il venir ?
J'utilise Delphi 6, version perso.

Merci d'avance pour votre aide.

[Linkin]

La taille du processus en mémoire n'est pas vraiment significative de la taille qu'il occupe. (Je n'ai pas les termes exacts désolé). Par exemple si on compile avec Delphi un projet, que l'on regarde l'a taille du processus en mémoire et que l'on ferme Delphi, la mémoire libérée sera plus grande que celle indiquée pour le processus).

Par contre je n'ai pas d'idée pour résoudre ton problème.

[Okaryn]

Hum... Sans avoir le source sous les yeux, difficile de savoir

Tu ne fais pas appel toi même à des objets, mais peut être que des fonctions que tu utilises le font.

Là c'est un peu vague pour te répondre, désolé.

[qi130]

Peux-tu poster la partie récursive de ton code ?

Tu peux aussi essayer d'augmenter les valeurs de pile : Options du projet, onglet lieur ...

[Graffito]

Bonjour,

A chaque appel récursif, il y a allocation de mémoire pour les variables locales. Un nombre "infini" d'appels récursifs est en général à la source du problème d'Access violation rencontré.

Pour debugger, Il faudrait soit :
- mettre un compteur d'appel de la procédure en variable globale et s'arreter quand on a atteint un nombre excessif (10 000 appels par exemple).
- passer en parametre de la procédure récursive la profondeur : lorsqu'on appele la procédure en interne, le faire avec comme paramètre " profondeur d'entrée+1", s'arreter lorsque la profondeur est excessive (exemple : 1000).

[delphidebutant]

Bonjour,
Après une nuit de sommeil, je viens de voir que mon algorithme utilise une liste, d'entiers en l'occurence.

Cette liste vit de la façon suivante :

Dans une proc Ajoute, j'ai

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
New(Pint);
Pint^ := Valeur_a_stocker;
Maliste.Add(Pint);

Pint étant une variable locale, MaListe une variable globale et private.
De plus, je stocke Pint dans un tableau de pointeur TableauPint (variable globale), car Pint a une propriété univoque qui me permet de l'étiqueter dans un tableau.
Soit n l'endroit de stockage de Pint dans TableauPint.

Dans une proc Retire, je fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
EndroitStockListe := MaListe.Indexof(Pint); //(c'est là que mon tableau TableauPint  sert, je peux ainsi retrouver sa place dans ma liste sans la parcourir)  
MaListe.Delete(EndroitStockListe); //(à priori, ça devrait libérer la mémoire, mais le doute m'habite)
TableauPint[n] := nil;

(Pint était stocké à cette place, dans mon tableau de pointeurs...., donc le doute devrait-il m'habiter...??, là je détruis bien Pint, non ???...)

A tous les coups, il doit y avoir une salade sur le caractère local de PInt à la création, puis libération dans une autre proc....

[Balises CODE rajoutées par Pedro. Merci d'y penser à l'avenir]

[bjl]

Bonjour,

Tlist.delete ne libère pas la mémoire


pour libérer pint,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
dispose(pint);
Maliste.delete(EndroitStockListe);

[delphidebutant]

Bénis sois-tu, bjl.
Un truc aussi fondamental devrait figurer dans l'aide, dans la liste des "Voir Aussi", en rouge, et en caractères de 3cm de haut....ou alors que les listes manipulent autre chose que des pointeurs, saperlipopette !!

Enfin, la version de Delphi que j'ai étant gratuite....
Après moults essais de free, de nil mis un peu à la louche, çA MARCHE
et ma consomation mémoire est maintenant tout à fait raisonnable
Re BIG MERCI