FoxPro/Visual FoxPro - Combo no muestra el dato deseado

Hola, me ayudan a resolver un problema, al parecer simple.
Tengo un combo tipo lista desplegable, con las sig propiedades:
RowSource Type : Instruccion SQL
RowSource: SELECT NOM_ACT, COD_ACT FROM ACTIVIDAD ORDER BY COD_ACT INTO CURSOR CURACT
BoundColumn: 2
BoundTo: T
Column Count: 1

En el metodo Activate() del formulario, para que el combo me muestre el dato almacenado pongo:

thisform.Combo1.Value = alltr(Actividad.Nom_Act)
ThisForm.Combo1.Refresh()

Pero el Combo1 no me muestra el dato, se que me lo trae bien porque depurando no me da error y veo que thisform.Combo1.Value me trae el dato que quiero pero no se muestra, ademas probé cambiando el combo por un textbox y éste si me muestra , pero el tema es que quiero que el combo me muestre el valor.

Desde ya muchas gracias.

Que tal...
Prueba colocando la consulta de sql en el Init de tu form
{Init}
SELECT NOM_ACT, COD_ACT FROM ACTIVIDAD ORDER BY COD_ACT INTO CURSOR CURACT

Ya en tu listbox ponlo asi:
RowSource Type: Alias
RowSource: curact.Nom_Act

Prueba haber como va

PD:
Ya esto lo quitas:
thisform.Combo1.Value = alltr(Actividad.Nom_Act)
ThisForm.Combo1.Refresh()

Bytes!

Lamentablemente sigue sin mostrar el dato =(

Que otra cosa puedo probar?.

Debio de funcionarte.
Pero puedes probar verificando la consulta, puedes copiar y pegar la consulta en un boton y luego darle un browse a ver si se esta haciendo bien.
Otra cosa es que verifiques si estas colocando bien el campo de resultado en RowSource
tambien que en RowSource Type: tenga ALIAS.
Suerte!

Hola Marcela :
Hace un momento que acabo de ver tu pregunta y veo que el colega Hector no atino con la solucion a tu problema.
Pues bien analizando tu pregunta te dire que tengo 2 soluciones practicas a tu problema. Te las voy a detallar una a una y tu eligiras la que mejor te parezca.
Tomando tu ejemplo...

En tu combo establece las siguientes propiedades:

1er Respuesta :

RowSource Type : Instruccion SQL
RowSource: SELECT NOM_ACT, COD_ACT FROM ACTIVIDAD ORDER BY COD_ACT INTO CURSOR CURACT
BoundColumn: 2
BoundTo: T
Column Count: 2
ColumnLines = .F.
ColumnWidths = 100,0 && Si deseas mostrar el codigo sera => 100,50

2da. Respuesta :

RowSource Type : Instruccion SQL
RowSource: SELECT NOM_ACT FROM ACTIVIDAD ORDER BY COD_ACT INTO CURSOR CURACT
BoundColumn: 1
BoundTo: T
Column Count: 1
ColumnLines = .T.
ColumnCount = 1
ColumnWidths : 110

En mi caso aplico el segundo ejemplo...
Hace unos dias tuve este caso parecido al tuyo...

Bueno amiga Marcela espero haber respondido de manera acertada a tu pregunta...

Saludos,

GABRIEL
(Lima-Perú)

PD : CUALQUIER CONSULTA ESTOY PARA AYUDARTE...BUENO HASTA DONDE ALCANCEN MIS CONOCIMIENTOS...

Gracias me dio resultado al fin!.-