FoxPro/Visual FoxPro - problema con matriz

   
Vista:

problema con matriz

Publicado por hernan (10 intervenciones) el 15/10/2010 20:51:06
hola que tal,estoy probando con matrices y no logro que me muestre los datos correctamente ,que estoy haciendo mal?
por ejem
el cursor contiene 5 campos en este caso y quiero pasar el nombre de cada campo a una matriz en la primer columna.cuando se muestra la matriz en una lista de 5 columnas me muestra la primer columna bien como quiero,pero en las otras columnas empiezan a repetirce elementos de la primera que no tendrian que estar.
lista:el error es que salen datos en la columna 2,3,4 y 5

nomcampo1 nomcampo1 nomcampo1 nomcampo1 nomcampo1
nomcampo2 nomcampo2
nomcampo3
nomcampo4
nomcampo5

este es el codigo:
select " cursor"

dimension thisform.matriz[5,1]

FOR i =1 TO FCOUNT()
thisform.Matriz[i,1]=FIELD(i)
ENDFOR

thisform.list2.RowSource="thisform.Matriz"
thisform.list2.Refresh

cual es el error o que le falta ? les agradezco sus respuestas saludos!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Mauricio

Problema con matriz

Publicado por Mauricio (1368 intervenciones) el 15/10/2010 21:30:03
Prueba de esta manera:
dime matriz(1,5)
*este es el codigo:
*select " cursor"
*
*dimension thisform.matriz[5,1]
*
FOR i =1 TO FCOUNT()
matriz[1,i]=FIELD(i)
ENDFOR
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Problema con matriz

Publicado por hernan (10 intervenciones) el 15/10/2010 23:08:39
hola muchas gracias por tu respuesta,probe y me sigue pasando lo mismo ,porque debe de ser?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:problema con matriz

Publicado por Juanma Cruz (508 intervenciones) el 18/10/2010 10:21:54
¿No sería más simple hacer un COPY TO ARRAY?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:problema con matriz

Publicado por xx (378 intervenciones) el 18/10/2010 19:42:20
Bueno no se entiende muy bien como pretendes que te muestre las columnas pero podrias probar esto:

select cursor
dimension thisform.matriz[FCOUNT()]
FOR i =1 TO FCOUNT()
thisform.Matriz[i]=FIELD(i)
ENDFOR
thisform.list2.rowsourcetype=5
thisform.list2.RowSource ="thisform.Matriz"
thisform.list2.Refresh()

*// o de modo mas eficiente, suponiendo que list2 sea un combo deberia funcionar igual
*// si es un listbox pero no lo probe
SELECT CURSOR
THISFORM.LIST2.ROWSOURCETYPE=0 &&insercion por programacion
FOR I=1 TO FCOUNT()
THISFORM.LIST2.ADDITEM( FIELD(I), I )
ENDFOR
THISFORM.LIST2.REQUERY()
THISFORM.LIST2.LISTINDEX=1

esto te mostrara el campo1 abajo el campo2 abajo el campo2 etc.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:problema con matriz

Publicado por hernan (10 intervenciones) el 19/10/2010 01:17:31
hola muchas gracias!! por la idea saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar