[SOLUCIONADO] Obtener numero de filas que contienen datos en un Grid?

[Jarmandaros]

Que tal compañeros, necesito de su ayuda con la siguiente cuestion:

tengo en VFox un Grid en el cual introduzco el nombre de una persona atraves de un boton (command)

evento click del boton:

thisform.Grid1.Column1.Text1.value = "Juan Antonio,Moran Mendez"



y quisiera que cuando presiono un segundo boton me pusiera en un textbox el numero de filas que tienen datos, es decir cuantos nombres hay en el Grid.

evento click del segundo boton:

thisform.text2.value = ? <<- Aca es donde necesito ayuda

Gracias de antemano 

[kikeuntercio]

fox es la leche para los programas comerciales, y eso no se lo quita ningun otro programa.

la cuestion esta que al parecer o al menos en una revisada rapida que le di al control Grid no encontre ninguna funcion o propiedad que haga un conteo de Lineas o registros del grid

pense que podia aplicarse "Controlcount"
o al menos que no la supe usar

pero para salir del apuro podes agregar una columna mas al grid claro que estaria oculta donde cada ves que vas agregando unnuevo nombre le agregas un numero.

Pero la cuestion esta en que estas agregando esos nombres solo al grid y sin almacenarlos en una base de datos
si es asi estará dificil, pero si estas usando una base de datos lo mejor es hacer el conteo de registros de la tabla =)

seramejor que te expliques bien ese detalle.

[Jarmandaros]

fox es la leche para los programas comerciales, y eso no se lo quita ningun otro programa.

la cuestion esta que al parecer o al menos en una revisada rapida que le di al control Grid no encontre ninguna funcion o propiedad que haga un conteo de Lineas o registros del grid

pense que podia aplicarse "Controlcount"
o al menos que no la supe usar

pero para salir del apuro podes agregar una columna mas al grid claro que estaria oculta donde cada ves que vas agregando unnuevo nombre le agregas un numero.

Pero la cuestion esta en que estas agregando esos nombres solo al grid y sin almacenarlos en una base de datos
si es asi estará dificil, pero si estas usando una base de datos lo mejor es hacer el conteo de registros de la tabla =)

seramejor que te expliques bien ese detalle.

Ok Kike, no andabas lejos y si los estoy almacenando en una base de datos pero encontre una solucion sencilla con el comando "Dimension" y la funcion "Ale()".

***************************************************************

DIMENSION (Comando)
Crea una matriz de variables de una o dos dimensiones.

 
DIMENSION ArrayName1(nRows1 [, nColumns1])
   [, ArrayName2(nRows2 [, nColumns2])] ...


***************************************************************

ALEN( ) (Función)
Devuelve el número de elementos, filas o columnas de una matriz.

 
ALEN(ArrayName [, nArrayAttribute])

Valores devueltos

Numeric

Parámetros

ArrayName
Especifica el nombre de la matriz. Si incluye únicamente el nombre de la matriz, ALEN( ) devolverá el número de elementos de la matriz.

nArrayAttribute
Determina si ALEN( ) devuelve el número de elementos, filas o columnas de la matriz según los siguientes valores de nArrayAttribute:

0 Especifica que se devuelve el número de elementos de la matriz. Omitir nArrayAttribute es idéntico a especificar 0.

1 Especifica que se devuelve el número de filas de la matriz.

2 Especifica que se devuelve el número de columnas de la matriz. Si la matriz es de una dimensión, ALEN( ) devolverá 0 (ninguna columna).

Ejemplo
El ejemplo siguiente utiliza AFONT( ) para crear una matriz que contiene los nombres de todas las fuentes disponibles. ALEN( ) se emplea para determinar el número de filas de la matriz. Se muestra el nombre de cada fuente con un ejemplo. Si hay más de 10 fuentes instaladas, solamente se muestran las 10 primeras.

/////////////////////////////////////////////////////////////////////////
CLEAR
=AFONT(gaFontArray)  && Array containing font names
gnNumFonts= ALEN(gaFontArray)  && Number of fonts
IF gnNumFonts > 10
   gnNumFonts = 10  && Display first 10 fonts
ENDIF

FOR nCount = 1 TO gnNumFonts
   ? ALLTRIM(gaFontArray(nCount))  && Display font name
   ?? '  This is an example of ' ;
      + ALLTRIM(gaFontArray(nCount)) FONT gaFontArray(nCount), 8
ENDFOR

/////////////////////////////////////////////////////////////////////////



asi que solucione de la siguiente manera:

Evento load del Form

dimension thisform.nombres(nn,2)


evento click del boton

thisform.text2.value = alen(nombres, 1)

ojala me haya explicado y gracias por su atencion, saludos 

[kikeuntercio]

no fregues esa no es una solucion sencilla jajajaja
si estas almacenando en una base de datos entonces esto seria una solucion sencilla
ejemplo
use tabla ---- bla bla
thisform.text2.value = RECCOUNT('tabla')

[Jarmandaros]

no fregues esa no es una solucion sencilla jajajaja
si estas almacenando en una base de datos entonces esto seria una solucion sencilla
ejemplo
use tabla ---- bla bla
thisform.text2.value = RECCOUNT('tabla')

Vaya pues eso es sencillo    yo decia...

Gracias por tus respuestas Kike. 

[MOISES]

Opinando,  porque no ocupa un contador??

cada vez que agregas un nombres podes hacer lo siguiente.
cuantos=cuantos+1

al inicio de formulario haces cuantos=0