¿Cómo ubicarse automáticamente en el primer dato de un flexgrid?

[t0n1]

Buenas!!! ¿Existe alguna propiedad como la de "ListIndex" de un list box en el flex grid para que se ubique después de una actualización de un registro, en el primer dato del Fgrid?

Saludos!!!

[t0n1]

Buenas!!! ¿Existe alguna propiedad como la de "ListIndex" de un list box en el flex grid para que se ubique después de una actualización de un registro, en el primer dato del Fgrid?

Saludos!!!

Edit: Perdón, quise editar el de arriba y envié en respuesta.

[t0n1]

Bueno, la única manera que me tome la propiedad SetFocus del msflexgrid es poniendo el código fuera del form. O sea, nada más pude aplicarla cuando actualizo los registros.

Si alguien sabe como hacer para que cuando se ejecute el formulario, se ponga el foco en la la primera fila de la columna del flexgrid, se agradece.

Saludos!!!

[lokoman]

Hola!!
Creo que te funcionaria SENDKEYS "{HOME}" despues del proceso de actualizar.

[t0n1]

Iniciado por lokoman

Hola!!
Creo que te funcionaria SENDKEYS "{HOME}" despues del proceso de actualizar.

Claro. Después de actualizar me funciona. El problema es que yo quiero que aparezca el foco ni bien cargo el form de inicio.

[lokoman]

No entendi bien, pero si quieres que al cargar tu FROM el grid tenga el foco, pues asignale el TABINDEX=0

[t0n1]

Iniciado por lokoman

No entendi bien, pero si quieres que al cargar tu FROM el grid tenga el foco, pues asignale el TABINDEX=0

Mejor pongo el código:

Código:

Sub cargar2()

If Not Conectar Then Exit Sub
sql = "Select * from Informes order by Codigo asc"
Set Rs = Cn.Execute(sql)
lin = 0

If Not Rs.EOF Then
    grdInf.Clear
    Do While Not Rs.EOF
    With grdInf
    .Cols = 1
    .ColAlignment(0) = 4
    .TextMatrix(0, 0) = "Código del Interesado"
    .ColWidth(0) = 4000
    lin = lin + 1
    .AddItem ""
    .TextMatrix(lin, 0) = Rs!Codigo
    Rs.MoveNext
    End With
    Loop
    grdInf.Col = 0
    grdInf.Row = 1
    grdInf.SetFocus
Else
    cargar3
End If

End Sub

Con esa sub, actualizo el registro en el grid y le indico el foco.

El problema es que la primer celda del grid se me pinta de rojo pero no se me pone en el foco.

Después no sé como hacer para que poner el foco a penas se carga el formulario porque pongo el tabindex del grid en cero pero no se donde en donde poner "grdInf.Setfocus" para darle la instrucción.

[t0n1]

Listo, tenías razón. Abajo del setfocus tenía que poner SENDKEYS "{HOME}" o "{UP}"...

Una pregunta, una vez que hago el alta en el grid me quedan después del último registro muchas filas vacías ¿por qué es eso?

[t0n1]

Iniciado por t0n1

Listo, tenías razón. Abajo del setfocus tenía que poner SENDKEYS "{HOME}" o "{UP}"...

Una pregunta, una vez que hago el alta en el grid me quedan después del último registro muchas filas vacías ¿por qué es eso?

Solucionado lo de las filas vacías.

Sumo la variable de la última matríz que indica las filas para que me dé como resultado la fila siguiente:

Código:

lin = 0 

linB = lin + 1

y después hago un additem "" del grid para que me agregue una nueva fila para

el registro siguiente:

Código:

grdInf.AddItem ""

grdInf.TextMatrix(linB, 0) = ""

Ahora lo que me faltaría es la cuestión del tabindex en cero del grid para que arranque en foco cuando se inicia el formulario ¿tengo que colocar la propiedad setfocus del grid en algún lugar además de poner en cero el tabindex?

[lokoman]

En las propiedades del GRID pones el TABINDEX=0. No es necesario poner el SETFOCUS.