Ver Mensaje Individual
  #5 (permalink)  
Antiguo 22/02/2008, 10:33
franko1809
 
Fecha de Ingreso: enero-2008
Ubicación: Lima - Perú
Mensajes: 1.127
Antigüedad: 16 años, 4 meses
Puntos: 10
Re: Movelast en un objeto recordset - vb6.0

Me exprese mal, el problema no es la perdida del enfoque que se soluciona con el .setfocus me explico mejor.Por ejemplo al llegar a la ultima fila del datagrid se
muestra de esta manera
http://img.tomatone.net/big/0011232.jpg
al estar en la ultima fila y precionar el boton siguiente se ejecuta esta linea de codigo
rsCargo.MoveNext
If rsCargo.EOF Then rsCargo.MoveLast
Y el datagrid se muestra de esta manera
http://img.tomatone.net/big/0011244.jpg
Es decir pierde el valor de la propiedad MarqueeStyle intente hacer esto
rsCargo.MoveNext
If rsCargo.EOF Then rsCargo.MoveLast
DataGrid1.MarqueeStyle = dbgHighlightRow
tambien colocando la linea despues del end select y nada la unica forma de volver a activar la propiedad MarqueeStyle es haciendo click en una fila del datagrid y precionado una tecla que puede ser arriba o abajo, creo que tiene algon que ver con los eventos lostfocus, rowcolchange,keydown,keyup pero no se como hacerlo

espero me puedas ayudar estare esperando tu respuesta y espero no ser muy pesado al hacer este tipo de pregunta

saludos