como insertar una foto
HOLA A TODOS UN SALUDO MUY GRANDE DE PUEBLA DE LOS ANGELES MEXICO.... TENGO UNA PREGUNTA... ESTOY UTILIZANDO UN SISTEMA PARA IMPRIMIR CREDENCIALES PERO RESULTA QUE NO PUEDO INSERTAR UNA FOTO EN EL CAMPO... ESTOY UTILIZANDO EL SIGUIENTE CODIGO:
SELECT ALUMNOS
APPEND GENERAL FOTO;
FROM GETFILE ("JPG");
CLASS PAINT.PICTURE
EN UN BOTON... PERO SOLO INSERTA EL NOMBRE DE LA IMAGEN ... COMO LE HAGO... DE ANTEMANO MUCHAS GRACIAS....
THISFORM.OLEFOTO.VISIBLE=.T.
SELECT ALUMNOS
APPEND GENERAL FOTO;
FROM GETFILE ("JPG");
CLASS PAINT.PICTURE
EN UN BOTON... PERO SOLO INSERTA EL NOMBRE DE LA IMAGEN ... COMO LE HAGO... DE ANTEMANO MUCHAS GRACIAS....
THISFORM.OLEFOTO.VISIBLE=.T.
EN EL LOAD DEL FORMULARIO
PUBLIC IMG
SELE 1
USE ALUMNOS
EN TU FORMULARIO AGREGAS UN CONTROL IMAGEN PARA PODER VISUALIZAR LA IMAGEN QUE GUARDARAS
AGREGAS DOS BOTONES UNO AGREGAR FOTO Y EL OTRO GRABAR FOTO
EN EL PRIMERO PONES IMG=GETFILE("BMP;JPG;ICON") GUARDA LA FOTO EN UNA VARIABLE
EN TU OTRO BOTON PONES SELE 1
APPEN BLANK
APPEN GENERAL FOTO FROM &IMG
NO TE OLVIDES DE BORRA TU VARIABLE IMG CON RELEASE
PUBLIC IMG
SELE 1
USE ALUMNOS
EN TU FORMULARIO AGREGAS UN CONTROL IMAGEN PARA PODER VISUALIZAR LA IMAGEN QUE GUARDARAS
AGREGAS DOS BOTONES UNO AGREGAR FOTO Y EL OTRO GRABAR FOTO
EN EL PRIMERO PONES IMG=GETFILE("BMP;JPG;ICON") GUARDA LA FOTO EN UNA VARIABLE
EN TU OTRO BOTON PONES SELE 1
APPEN BLANK
APPEN GENERAL FOTO FROM &IMG
NO TE OLVIDES DE BORRA TU VARIABLE IMG CON RELEASE
