Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Reverse ALINES() ?
Message
De
23/03/2002 14:41:41
 
 
À
23/03/2002 13:50:01
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00636463
Message ID:
00636477
Vues:
16
>Is there any command or function that performs the reverse of ALINES(). That is take the contents of an array and concatenate them into a variable or memo field?

Bill,

Not that I know

Simply write a routine

str = ReverseAlines(@ArrayName)
function ReverseAlines(ArrayName)
    local out, i
    
    out = ''
    for i = 1 to alen(ArrayName,1)
        out = out + iif(empty(out), '', chr(13)) + ArrayName[i]
    endfor

    return Out
endfunc
Gregory
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform