MSFlexGrid

[bk_820609]

No se si se pueda hacer lo que quiero....Miren señores expertos....tengo una base de datos en mysql....y hago busquedas y lo coloco en un flex....pero cuando me presenta la informacion de flex....quiero saber si se puede eliminar, actualizar, guardar...pero desde el flex...me explico....si la informacion que encontre esta duplicada..pues borrar.....la duplicidad.....y si encontre otro más reciente pues ....actualizarlo pero todo desde el flex.....si no se puede con el flex....entonces con que otra cosa seria?...

[avilware]

...Yo tenia el mismo problema que tu hace algunos meses, pero me decidi en SOLO MOSTRAR EN EL FLEXGRID LA BASE DE DATOS ACTUALIZADA, y los cambios los hacia de la siguiente manera...

...Al dar doble click sobre el flexgrid (YA CARGADO CON DATOS) me aparecian dichos datos en TEXTBOXES que estaban en la parte superior del flexgrid si queria modificar algun dato lo modificaba directamente en los textboxes y con un boton de GUARDAR enviaba los datos de los TEXTBOXES a guardar a la BASE DE DATOS

...En el caso de querer borrar un registro, pues igual DOBLE CLICK sobre el renglon (en el flexgrid) del dato a borrar y luego oprimir el boton de borrar

...Y para dar de alta, pues solo escribir los datos sobre los TEXTBOXES y pulsar en NUEVO

...Espero haber sido claro, sino lo fui, hazmelo saber...SALUDOS!
...(No se cual otra podria ser la solucion)

[bk_820609]

Ok bueno entonces...
1. Como puedo hacer para que de doble clic al flex y que los datos se vayan a la caja de texto?

[bk_820609]

Ok bueno entonces...
1. Como puedo hacer para que de doble clic al flex y que los datos se vayan a la caja de texto?

[GeoAvila]

text1.text = msflexgrid.textmatrix(columna,fila)

de esa manera..

nos vemos..

[avilware]

...Claro, poniendo dicho renglon en el evento "DOBLE CLICK" del FLEXGRID...

[bk_820609]

Oye una pregunta..lo que pasa esque le coloque tu codigo y simpre me nada el mismo
Nombre.Text = flex.TextMatrix(0, 0)
ApPat.Text = flex.TextMatrix(0, 1)
ApMat.Text = flex.TextMatrix(0, 2)

y yo quiero el que se selecciona ya sea el registro 3 o 100

[bk_820609]

ya lo encontre pero me marca un error---porque?
Private Sub flex_Click()
With msfgFechas
If flex.Row <> flex.RowSel Then
flex.Row = flex.RowSel

'con estas dos lineas de codigo se selecciona la fila completa con lo que no es necesario que lo pongas
flex.Col = 0
flex.ColSel = flex.Cols - 1
End If
End With
End Sub
------
Private Sub flex_DblClick()

'Text1.Text = MSFlexGrid.TextMatrix(columna, fila)
Nombre.Text = flex.TextMatrix(flex.Row, flex.Col)
ApPat.Text = flex.TextMatrix(flex.Row, flex.Col + 1)
ApMat.Text = flex.TextMatrix(flex.Row, flex.Col + 2)


End Sub

[avilware]

Hola!
(No Dices en que linea es el error)
Pero Creo que el problema sera cuando le das el doble click en una columna que no es la primera y se sale de rango, ya que en tu codigo, incrementas en uno a partir de la columna en que das el doble click, creo que lo mejor seria que dejaras la columna sin incremento, mejor dejarla ESTATICA de la siguiente manera

Private Sub flex_DblClick()
'Text1.Text = MSFlexGrid.TextMatrix(columna, fila)
Nombre.Text = flex.TextMatrix(flex.Row, 1)
ApPat.Text = flex.TextMatrix(flex.Row, 2)
ApMat.Text = flex.TextMatrix(flex.Row, 3)
End Sub

...La diferencia es que en vez de tener el "Flex.Col, Flex.Col+1...etc,etc" pues le das el valor FIJO dependiendo de la columna que quieras mostrar en el TEXTBOX...Espero te sirva...Saludos!