topic-44317

Posts: 1279

Joined: Mon Feb 06, 2006 04:28 PM

Acopy para matrices
Posted: Tue Mar 05, 2024 03:49 PM

Queridos compañeros del Foro,

Quisiera hacer una función parecida a Acopy pero para matrices.
La idea es que con ella se pueda hacer un "append" de una matriz a otra (de igual estructura).
He estado tratando de buscar el como, pero por el momento no he podido, quizá no dan las neuronas :D (los años pasan), si alguien lo ha hecho o tiene ideas para aportar, les quedo muy agradecido

Saludos/Regards,

José Murugosa

"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"

Willi Quintana

Posts: 1054

Joined: Sun Oct 09, 2005 10:41 PM

Re: Acopy para matrices
Posted: Tue Mar 05, 2024 04:34 PM

Estimado, prueba esto....

Code (fw): Select all Collapse

Function ACOPYARRAY(aArr, nIni, nFin)
local nLen, nCont, aRet := {}
nLEN = LEN(aArr)
FOR nCont := nIni TO nFin
   AADD(aRet, aArr[nCont])
NEXT nCont

Return(aRet)

JoseAlvarez

Posts: 851

Joined: Sun Nov 09, 2014 05:01 PM

Re: Acopy para matrices
Posted: Tue Mar 05, 2024 05:27 PM

aArray2 := aClone(aArray1)

"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Acopy para matrices
Posted: Wed Mar 06, 2024 03:44 PM

JoseAlvarez wrote:aArray2 := aClone(aArray1)

Yes

Regards

G. N. Rao.

Hyderabad, India

jose_murugosa

Posts: 1279

Joined: Mon Feb 06, 2006 04:28 PM

Re: Acopy para matrices
Posted: Thu Mar 07, 2024 02:23 PM

Gracias Willi, Jose y Sr. Rao
Es muy bueno tener la ayuda de este foro.

Quizá no me expliqué bien, pero la solución que funcionó magníficamente con algún pequeño ajuste fue la de Willy.
Porque en realidad yo quería poder añadir varios arrays a un array que reúna todos los elementos de los mismos, y aClone() me permite añadir un array, pero si agrego otro, el array no se agrega a continuación, sino que reemplaza lo agregado.

Nuevamente gracias a todos. :D

Saludos/Regards,

José Murugosa

"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"

JoseAlvarez

Posts: 851

Joined: Sun Nov 09, 2014 05:01 PM

Re: Acopy para matrices
Posted: Thu Mar 07, 2024 02:36 PM

jose_murugosa wrote:Gracias Willi, Jose y Sr. Rao
Es muy bueno tener la ayuda de este foro.

Quizá no me expliqué bien, pero la solución que funcionó magníficamente con algún pequeño ajuste fue la de Willy.
Porque en realidad yo quería poder añadir varios arrays a un array que reúna todos los elementos de los mismos, y aClone() me permite añadir un array, pero si agrego otro, el array no se agrega a continuación, sino que reemplaza lo agregado.

Nuevamente gracias a todos. :D

Excelente !

"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.

FiveTech Support Forums

Continue the discussion