FoxPro/Visual FoxPro - asignar valor al TEXT de la columna de un GRID

   
Vista:

asignar valor al TEXT de la columna de un GRID

Publicado por VICTOR PEREZ (137 intervenciones) el 06/03/2013 00:03:08
Hola,

Necesito llenar un grid con la informacion de un cursor.

Resulta que el cursor contiene mas campos de los que mostrare en el grid, esto porque necesito toda la informacion al hacer doble click en las lineas del grid y regresar a otra pantalla donde se despliega la informacion, tanto de lo que veo en el grid como de los otros campos contenidos en el cursor.

La situacion es que necesito especificar que campos del cursor se mostraran en las diferentes columnas del grid y no recuerdo como hacerlo.

Un ejemplo, el cursor contiene los campos fecha,importe,total,impresion.

Yo solo tengo tres columnas en el grid que deben mostrar los campos fecha, importe e impresion.

Si uso la opcion de GRid.Recorsource="cursor" me desplegara en el grid las tres primeros campos y me dejara por fuera el campo "impresion" que lo necesito.

ASi que uso GRID.column3.text1.value=cursor.impresion y no me resulta....no recuerdo la propiedad que debo usar y no recuerdo tampoco si es propiedad del column o del text del column.

Si me pueden ayudar a recordar...he buscado por internet y no encuentro la informacion exacta.

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

asignar valor al TEXT de la columna de un GRID

Publicado por Marco Aurelio marcobh2000@hotmail.com (263 intervenciones) el 06/03/2013 18:00:05
Hola.

Prueba creando un cursor con todos los campos que vas ocupar, de ahi se lo envias al Grid, en el prodras ingresar datos a tu gusto.


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

asignar valor al TEXT de la columna de un GRID

Publicado por VICTOR PEREZ (137 intervenciones) el 06/03/2013 19:26:51
Hola,

Si, asi lo hago, pero no se como asignar campos especificos del cursor a determinada columna del GRID.

Los datos estan todos en el cursor, pero como selecciono los que quiero ver...

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

asignar valor al TEXT de la columna de un GRID

Publicado por Fidel (558 intervenciones) el 07/03/2013 16:13:03
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
* Suponiendo
* Tenemos un cursor llamado "MiCursor"
* Tiene 20 campos Campo1,campo2,Campo3... etc Campo20
* Queremos mostrar solamente Campo1,Campo3,Campo4,Campo8,Campo16
* Lo de cLista y Alines() está pensado para pasar los valores
* como parámetor a un Método ó Procedure para generar la cuadrícula
* Esto se puede mejorar captando el tipo de valor a mostrar
* Incluso agregando objetos a las columnas (por ejemplo, CheckBox y EditBox
* para campos L y M respectivamente)
****************************************************************************
cLista="Campo1,Campo3,Campo4,Campo8,Campo16"
cWids="62,200,120,40,60,20"
nColumns=Alines(gacol,clista,1,",")
nWids=Alines(gaWids,cWids,1,",")
nSumWids=0
nRows=10
for i=1 to alen(gaWids)
	gaWids[i]=val(gawids[i]
	nSumWids=nSumWids+gaWids[i]
next
cCursor="MiCursor"	&& nombre de tabla o cursor
with thisform.grid
	.REcordSource=cCursor
	.Columncount=nColumns
 
	* Otras configuraciones
 
 
	for i=1 to nColumns
		lcCampo=gaCol[i]
		lcName=cCursor+"."+lcCampo
		.Columns[i].Header1.Caption=Proper(lcCampo)
		.Columns[i].ControlSource='&lcname'
		.Columns[i].Width=gaWids[i]
	next
	.Width=nSumWids+nWids+25  && Ajustar
	.Height=nRows*.RowHeight+.headerHeight+nRows  && Ajustar
endwith
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