Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Triy to use macro substitution for object.property
Message
De
06/08/1999 18:57:16
Nancy Folsom
Pixel Dust Industries
Washington, États-Unis
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00250948
Message ID:
00250965
Vues:
15
Christian-

I see. If I may just suggest the following change (you might want to benchmark the speed since it should be faster).
LOCAL ii, mi
FOR ii = 1 TO 12
  FOR mi = 1 TO 5
    STORE EVALUATE("THIS.Chk" + LTRIM(STR(ii)) + ".VALUE") = 1
TO ('THISFORM.ClickF'+ALLTR(STR(ii))+'.Btn'+LTRIM(STR(mi))+'.ENABLED')
  ENDFOR
ENDFOR

>LOCAL ii, mi
>FOR ii = 1 TO 12
>  FOR mi = 1 TO 5
>    lcStrin='THISFORM.ClickF'+ALLTR(STR(ii))+'.Btn'+ALLTR(STR(mi))+'.ENABLED'
>    llResult = EVALUATE("THIS.Chk" + ALLTR(STR(ii)) + ".VALUE") = 1
>    &lcString = llResult
>  ENDFOR
>ENDFOR
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform