Clipper/FiveWin - ..Como hago un Combo

...Hola que tal

Estoy iniciando programar en fivewin pero como todo nuevo tengo problemas, yo programé mucho tiempo en clipper, pero ahora me quiero cambiar a fivewin.

ok.

tengo la tabla DEPTOS.DBF con los campos: clvdep, descripcion

en otra tengo INGRESOS con los campos : clvdep, ingresos,subsidio

ok.

cuando capturo para la tabla INGRESOS

pido :
Cave del departamento:_____ mclave
Total de ingresos: _____

ok.

quiero que en el get de MCLAVE me aparezca un combo de la tabla DEPTOS. y pueda yo seleccionar la clave que necesite.

... NOTA: lo quiero hacer por medio de codigo prg, no con recursos

Gracias.

Que pasó, no logras hacer funcionar tu cerebro ?, jejejeje

El Duro

Jose manuel, esta pregunta ya está contestada en el foro... solo necesitas buscarla y revisar antes de preguntar... aún así te escribo el codigo adaptado a tus necesidades:

...
local amclave, a
select deptos
a=0;count to totdb;go top
amclave:=array(totdb)
do while .not. eof()
a:=a+1
amclave[a]:=deptos->clvdep
skip
enddo
go top
IF .not. EOF()
mclave=amclave[1]
else
mclave=space(0)
endif
define dialog....
redefine ....
redefine combobox omclave var mclave items amclave id ... of ....
redefine .....
activate dialog ...
_______________________
... y listo el pollo !!!

Un saludo, LORENZO