silverman
Nombre de messages : 968
Age : 51
Localisation : Picardie
Date d'inscription : 18/03/2015
 | | Sujet: bug SYNEDIT + REPLACE = mémoire insuffisante Mer 24 Jan 2018 - 14:03 | |
| Bonjour à tous La fonction REPLACE de l'objet synedit provoque une erreur "mémoire insuffisante". Le code suivant montre le bug sur un texte généré, d'une taille d'~2 Mo (La config de mon PC est dans ma signature). - Code:
-
dim i,j,k,total,fnd,N
total=100
dim s$(total)
' fabrique un texte
k=100
s$(1)=str$(k)
for i=2 to total :' des lignes qui s'agrandissent
k=k+1
s$(i)=s$(i-1)+" / "+str$(k)
next i
for i=1 to total :' on ajoute les caractères de fin de ligne, pour le synedit
s$(0)=s$(0)+s$(i)+chr$(13)+chr$(10)
next i
N=6
for i=1 to N :' 6400 lignes, soit total*(2^N)
s$(0)=s$(0)+s$(0)
next i
caption 0,"taille du texte généré = "+str$(len(s$(0))/(1024*1024))+" Mo"
' un synedit
full_space 0
synedit 1 : full_space 1
text 1,s$(0)
free s$
' ici, on montre le pb de mémoire insuffisante qui apparait au bout de quelques remplacements(ligne 1367 sur mon PC)
while fnd<>-1
fnd=replace("100","000",1,fnd+1)
end_while
| |
|
silverman
Nombre de messages : 968
Age : 51
Localisation : Picardie
Date d'inscription : 18/03/2015
| | Sujet: Re: bug SYNEDIT + REPLACE = mémoire insuffisante Jeu 25 Jan 2018 - 17:50 | |
| Je viens de tester sur un 'memo', pas d'erreur, c'est donc bien un pb spécifique à l'objet synedit. | |
|
Calendrier