Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Complement to CreateBinary()
Message
De
15/07/1999 12:08:59
Gary Foster
Pointsource Consulting LLC
Chanhassen, Minnesota, États-Unis
 
 
À
15/07/1999 09:50:32
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00241273
Message ID:
00241807
Vues:
21
Thanks for the suggestion, I'll give it try.

Gary

>>Howdy All,
>>Does anyone know of a way to turn an array into a string quickly? I have to pass both arrays of bytes and binary strings to COM servers and clients. CreateBinary() is great at the conversion from string to array but I have been having to manually convert arrays to strings,(cData = cData + aData[x]...) MUCH slower, esp. with a 50k array. Thanks in advance.
>>
>>Gary Foster
>Gary,
>String concat. is painfully slow in Fox. I try to mimic C way (but not in memory) for such things. I cannot use memory as a stream but a file :
lcTempFile = "X"+sys(2015)+".tmp"
>lnHandle = fcreate(lcTempFile)
>lnElems = alen(myArray,1)
>for ix = 1 to lnElems
>   =fwrite(lnHandle,myArray[ix,1])
>endfor
>lnSize = fseek(lnHandle,0,2)
>= fseek(lnHandle,0,0)
>lcStr=fread(lnHandle,lnSize)
>=fclose(lnHandle)
>erase (lcTempFile)
Cetin
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform