Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
ASCAN Bug?
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
ASCAN Bug?
Divers
Thread ID:
00288574
Message ID:
00288574
Vues:
55
OK Guy and Girls,

I have a strange problem. I created a combo box and reference an array that is a property I created in the combo box. This works fine. However, when I try to use ASCAN() on this array it gives me an error. Here is a piece of code that will reproduce the error. As you will see the RegularArray works fine but the property array doesn't scan. Has anyone else encountered this problem?

*!* BEGIN Program
CLEAR

? ScreenArray() && Errors

? RegularArray() && Prints 3 whic is correct

RETURN

PROC ScreenArray
_Screen.AddProperty("aServices[1]")
DIME _Screen.aServices[3,2]
_Screen.aServices[1,1] = 1
_Screen.aServices[1,2] = [ONE]
_Screen.aServices[2,1] = 2
_Screen.aServices[2,2] = [TWO]
_Screen.aServices[3,1] = 3
_Screen.aServices[3,2] = [THREE]
RETURN ASCAN(_Screen.aServices, 2)
ENDPROC

PROC RegularArray
DIME aServices[3,2]
aServices[1,1] = 1
aServices[1,2] = [ONE]
aServices[2,1] = 2
aServices[2,2] = [TWO]
aServices[3,1] = 3
aServices[3,2] = [THREE]
RETURN ASCAN(aServices, 2)
ENDPROC

*!* End Program
Ronald L. Thorp
http://www.Fox-Pros.com
Fox-Pros, Inc.
Office 407-498-0100
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform