RE:Cómo hacer funcione un COMBOBOX dentro de una g
Lo que generalmente hago es remover el grid y luego crearlo según las características que quiero, te mando un ejemplo en el que le agrego cuadros de verificación en la columna 2 y 4, espero te sirva.
*/* Crea la cuadrícula
with thisform.Pgf_11.Pg_112.cnt_1123
.RemoveObject("gd_11231")
.AddObject("gd_11231","grid")
endwith
*/* Da las coordenadas de ubicación a la cuadrícula
with thisform.Pgf_11.Pg_112.cnt_1123.gd_11231
.recordsource = ""
.ColumnCount = 8
.Height = 151
.Left = 3
.Top = 4
.Width = 318
.Visible = .t.
.Enabled = .t.
endwith
*/* Da formato a la cuadrícula
with thisform.Pgf_11.Pg_112.cnt_1123.gd_11231
.recordsourceType = 1 && alias
.recordsource = "dbf_temp_11231"
.column1.width = 40
.column1.Header1.Caption = "Activo"
if xtipo < 7
.column2.width = 80
else
.column2.width = 0
endif
.column2.Header1.Caption = "F.Informe"
if xtipo < 7
.column3.width = 0
else
.column3.width = 120
endif
.column3.Header1.Caption = "Desc.Informe"
.column4.width = 40
.column4.Header1.Caption = "Rpta."
.column5.width = 80
.column5.Header1.Caption = "F.Rpta."
.column6.width = 0
.column7.width = 0
.column8.width = 0
endwith
*/* Pone en la columna 1 el cuadro de verificación
with thisform.Pgf_11.Pg_112.cnt_1123.gd_11231.column1
.AddObject("check1","checkBox")
.currentcontrol = "check1"
.Check1.Visible = .t.
.Check1.Caption = ""
.Sparse = .f.
endwith
*/* Pone en la columna 4 el cuadro de verificación
with thisform.Pgf_11.Pg_112.cnt_1123.gd_11231.column4
.AddObject("check1","checkBox")
.currentcontrol = "check1"
.Check1.Visible = .t.
.Check1.Caption = ""
.Sparse = .f.
endwith
thisform.Pgf_11.Pg_112.cnt_1123.enabled = .t.