Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
FOR EACH bug
Message
De
06/03/2003 01:40:15
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
FOR EACH bug
Divers
Thread ID:
00762002
Message ID:
00762002
Vues:
39
Hi,

I enjoy new collection class very much, but there is a bug I think. If objects are removed inside FOR EACH some of them are omitted.
oFrms = createobject('collection')
oFrms.Add(createobject('form'),'Form1')
oFrms.Add(createobject('form'),'Form2')
oFrms.Add(createobject('form'),'Form3')
oFrms.Add(createobject('form'),'Form4')

*** let's make forms visible
local oFrm
for each oFrm in oFrms
	oFrm.Show
next

*** ok, now let's try close them
for each oFrm in oFrms
	oFrm.Release
next

*** two forms remains open :(
messagebox(oFrms.Count)
It behaves the same way with _SCREEN.Forms collection. I think it should be considered as bug and be corrected.

Best,

Janusz Czudek
WORD Software
www.wordsoft.com.pl
jczudek@wordsoft.com.pl
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform