Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Merging Arrays?
Message
De
06/11/2001 14:15:07
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
00578130
Message ID:
00578155
Vues:
35
Sergey, I was just looking at that when I got your response! Your ideas worked! I used the code below (I have to actually merge 4 arrays, but below is the code for merging one) to get it working:

*--Create an array from dfiles and sfiles arrays
LOCAL lntot,lnend
*--get current length of target array
lnend=ALEN(thisform.dfiles)
*--get new number of rows of target array by adding number of rows from source array to it
lntot=ALEN(thisform.dfiles,1)+ALEN(thisform.sfiles,1)
*--Redimension the target array to hold the additional rows from the source array
DIMENSION thisform.dfiles(lntot,5)
*--Copy the source array's rows to the target array starting at the first blank element
=ACOPY(thisform.sfiles,thisform.dfiles,1,-1,lnend+1)

Thanks again,
Tracy
.·*´¨)
.·`TCH
(..·*

010000110101001101101000011000010111001001110000010011110111001001000010011101010111001101110100
"When the debate is lost, slander becomes the tool of the loser." - Socrates
Vita contingit, Vive cum eo. (Life Happens, Live With it.)
"Life is not measured by the number of breaths we take, but by the moments that take our breath away." -- author unknown
"De omnibus dubitandum"
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform