ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

BUG : Collection et Evaluate ?   



L'auteur

Anatole
France France
Membre Simple
# 0000000002
enregistré le 12/10/2004

Fiche personnelle


Note des membres
pas de note

Contributions > 60 - AtoutFox

BUG : Collection et Evaluate ?
# 0000000451
ajouté le 11/06/2007 15:22:51 et modifié le 28/06/2007
consulté 8030 fois
Niveau débutant

Version(s) Foxpro :
VFP 9.0

Description

J'ai trouvé ce qui me parait être un bug dans les collections avec VFP 9.0

Dans l'aide sur les collections, on peut lire :

The following lines of code are equivalent:

? MyCollection(1)
? MyCollection.Item(1)
? MyCollection("myKey")



Seulement il y a problème avec Evaluate(), voir le code ci-dessous.

  Est-ce que quelqu'un rencontre le même problème, ou comprend pourquoi ça ne fonctionne pas ?

Code source :
local oMain

m.oMain = CreateObject("Main")

* OK
?"Test 1 : " + m.oMain.Elements.Item("KEY1")

* OK
?"Test 2 : " + m.oMain.Elements("KEY1")

* OK
?"Test 3 : " + Evaluate([m.oMain.Elements.Item("KEY1")])

* BUG
?"Test 4 : " + Evaluate([m.oMain.Elements("KEY1")])



define class Main as Custom

  Elements = null

  procedure Init()
    this.Elements = CreateObject("Collection")
    this.Elements.Add("Value 1""KEY1")
  endproc && Init

enddefine
Commentaires
le 14/06/2007, Francis Faure a écrit :
https://connect.microsoft.com/VisualStudio/feedback/ViewFeedback.aspx?FeedbackID=282799

Publicité

Les pubs en cours :


www.atoutfox.org - Site de la Communauté Francophone des Professionnels FoxPro - v3.4.0 - © 2004-2024.
Cette page est générée par un composant COM+ développé en Visual FoxPro 9.0-SP2-HF3