RE:foto programa de nomina
Con VFP6 lo he resuelto de la siguiente manera. No he encontrado forma de incluir una foto en una tabla, solamente almacenar la referencia del fichero de foto, y esto obliga a tener un archivo en formato .bmp, .jpg o .gif por cada foto.
1.- Añade un campo memo en la tabla “empleados” denominado “foto”. Ahí se guardará la dirección de la foto del empleado.
2.- Crea una carpeta, por ejemplo “c:fotos”, y pon ahí los ficheros de fotos.
3.- Para ver la foto en el form, crea un objeto imagen “imgFoto” con: Stretch = 1-Isométrico, para que ajuste la foto en el cuadro.
4.- Para guardar la dirección de cada foto, añade en el formulario un botón “Cargar Foto”, y en su evento Click:
LOCAL mfoto
mfoto = GETFILE('jpg') && Sólo me interesan archivos .jpg
IF !EMPTY(mfoto)
REPLACE empleados.foto WITH mfoto && Guarda nombre de archivo y ruta
ThisForm.imgFoto.Picture = empleados.foto && Pone la foto en el imagen
ThisForm.Refresh
ENDIF
Revisa en la ayuda estos comandos y suerte.
Un saludo, Mario