Problemas a la hora de selccionar registros en un MSHFlexGrid

[bubu54]

Saludos.

Tengo un MSHFlexGrid asociado a un recordset de ADO.

El caso es que cuando cargo mi programa y relleno el flex, se vuelve loco a la hora de seleccionar los registros.

No se queda marcada ni las filas ni las columnas, y a veces le da por seleccionar todo el flex.

Eso es a su libre albedrio.

Alguna solucion? Gracias.

Edito para aclarar un poco las cosas.

Ese flex, se debe actualizar segun un criterio relacionado con un datagrid que hay un poco mas arriba del formulario. Es decir si en el datagrid hay codigo=1, el flex debe mostrar todos los registros del codigo 1, etc.

Pues si cuando carga el flex por primera vez, hay datos, funciona mas o menos bien, si selecciono el criterio, codigo=2 y hay datos, el flex sigue funcionando, pero si cuando voy al registro codigo=3, no hay datos, el flex ya se vuelve loco y hace lo que ya os he comentado.

Para actualizar el flex tengo un proceso que lo que hace es actualizar el datasource del flex mediante un objeto recordset.

[tazzito]

podrias indicarnos el codigo de actualizacion para ver cual podria ser el inconveniente.

[bubu54]

Pues basicamente es cargar un recordset y despues asignar el DataSource del flex al recordset, algo asi:

Código:

Dim rs As New ADODB.Recordset
    sql="select * from tabla where criterio='" & criterio & "'"
    Set rs = cn.Execute(sql)
    Set flex.DataSource = rs

Ya se que no he puesto codigo para abrir la conexion, pero ya viene abierta.

Por las pruebas que voy haciendo, se flipa cuando el recordset le llega vacio.

[tazzito]

es muy raro la verdad nunca eh trabajado con el mshfledgrid por que prefiero las grillas que cargo yo :P es un poco mas lento pero asi estoy seguro, pero veamos tu caso, existe la posibilidad que puedas comprobar arriba si hay registros y si no dejes el datasourse en blanco o tal ves escondas la grilla?

Dim rs As New ADODB.Recordset
sql="select * from tabla where criterio='" & criterio & "'"
Set rs = cn.Execute(sql)
if rs.eof then
set flex.datasourse = ''
flex.visible=false
flex.refresh
else
Set flex.DataSource = rs
endif

con algo asi como eso

[ManuNic]

mira en las propiedades del msh, la forma en que seleccionas con el mouse, por columna, por fila, libre, etc.

[albertovicat]

Yo usaba las MSH en mis programas, pero en ocasiones tenían un comportamiento a todas luces erróneo.
Estoy estrenando conexión a Internet y todavía no tengo bien organizadas las cosas. Pero si te interesa te puedo pasar dos mini-programas que hice para demostrar este comportamiento erróneo.
Lo cierto es que he dejado de usar las MSHFlexGrid en beneficio de las (más antiguas según MS) MSFlexGrid, que funcionan correctamente en los ejemplos que te menciono.
Saludos

[bubu54]

Ya, pero necesito que funcionen con ADO, por eso el MSHFlexgrid.

De momento lo que he hecho es flex.clear, y salgo del paso, pero me borra las cabeceras de las columnas.

[GeoAvila]

hace algo. quitalo de la conexión, ado y rellenalo normalmente, y ese problema se quita.. se que no es la mejor solución pero así es como lo he logrado quitar.

nos vemos..