FoxPro/Visual FoxPro - fotos otro ej.

bueno le comento que probe este codigo que lo saque de esta pagina:
evento click
m.fotos=getfile("jpg","imagen:","abrir",0,"buscar foto")
thisform.pageframe1.page1.image1.picture=m.fotos

el campo fotos es memo

esto me deja seleccionar la carpeta y busco la foto q yo quiero, pero en realidad sigue si hacer lo q necesito ,
cuando le doy click me muestra un registro determinado y yo necesito q la foto corresponda a ese registro. gracias

Hola Marina, el codigo que mencionas sirve para mostrar la foto o imagen, el valor de la variabale m.fotos debes guaradarla en el campo correspondiente de tu tabla:
selec mitabla
replace CampoFoto with m.foto

Para mostrar la foto "almacenada" en la tabla seria algo asi:

Select mitabla
locate for codigo=m.codigo && O como sea tu busqueda
if.not.found()
wait window nowait 'Error, codigo no encontrado'
return
nodefault
else
m.fotos=CampoFoto
thisform.pageframe1.page1.image1.picture=m.fotos
thisform.refresh
endif

Otra cosa, usa la funcion GETPICT(), que te muestra los archivos de imagenes soportadas por VFP. (GIF,BMP.JPG,PNG,etc)
En mi caso yo guardo las imagenes en una Subcarpeta que se redirecciona con SET PATH, y con la funcion JUSTFNAME() guardo el link devuelto por GETPICT() (o GETFILE; en tu caso) con el nombre y la extencion del archivo:

m.fotos=GETPICT()
SELEC mitabla
REPLACE fotos WITH JUSTFNAME(m.fotos)