dbgrid+combobox

24/12/2005 - 21:06 por Natalia Sensini | Informe spam
quiero saber como poner dentro de un campo de una dbgrid un combobox
Garacias!

Preguntas similare

Leer las respuestas

#1 Cristina
26/12/2005 - 01:36 | Informe spam
Respuesta Responder a este mensaje
#2 Cid
26/12/2005 - 19:51 | Informe spam
En 2005 se hace desde el diseño del grid (ya viene implementado), en 2003
puedes hacer algo asi:
Pones el grid y un combo fuera y cuando el usuario se pone en una celda de
la columna que quieras entonces posicionas el combo sobre la celda y lo
haces visible. Te pongo un codigo de ejemplo. Salu2.
Private Sub DG_CurrentCellChanged(ByVal sender As Object, ByVal e As
System.EventArgs) _

Handles DG.CurrentCellChanged

If Combo.Visible = True Then Combo.Visible = False

If DG.CurrentCell.ColumnNumber <> 2 Then Exit Sub

Dim CeldaAlto As Integer = DG.GetCellBounds(DG.CurrentCell.RowNumber,
DG.CurrentCell.ColumnNumber).Height

Dim CeldaAncho As Integer = DG.GetCellBounds(DG.CurrentCell.RowNumber,
DG.CurrentCell.ColumnNumber).Width

Dim PosicionX As Integer = DG.GetCellBounds(DG.CurrentCell.RowNumber,
DG.CurrentCell.ColumnNumber).X + DG.Left

Dim PosicionY As Integer = DG.GetCellBounds(DG.CurrentCell.RowNumber,
DG.CurrentCell.ColumnNumber).Y + DG.Top

Combo.Left = PosicionX

Combo.Top = PosicionY

Combo.Height = CeldaAlto

Combo.Width = CeldaAncho

Combo.Visible = True

Combo.DroppedDown = True

End Sub





Private Sub Combo_SelectedIndexChanged(ByVal sender As System.Object, ByVal
e As System.EventArgs) _

Handles Combo.SelectedIndexChanged

DG.Text = Combo.Text

Combo.Visible = False

End Sub


"Natalia Sensini" escribió en el mensaje
news:
quiero saber como poner dentro de un campo de una dbgrid un combobox
Garacias!


email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida