Insertar una foto
Como insertar una foto y que estos se graben con los datos, por ejemplo tengo un formulario de datos de los funcionario y me gustaría insertar la foto de ellos y que la foto se grabe como un campos más. Por favor con un ejemplo... Gracias.
1 Respuesta
Respuesta de julio_44_182
1
Primero necesitas en la tabla un campo tipo "blob"
En el form necesitas un botón para abrir un cuadro de dialogo para buscar la imagen, esto es:
PUBLIC cfile
cFile = GETPICT()
thisform.image1.Picture=cFile
&&Image1 es un objeto para visualizar la imagen
ahora para darle de alta, en el botón de guardar queda así:
Append blank
REPLACE campo WITH FILETOSTR( cFile ) IN nombredelatabla
Y es todo.
En el form necesitas un botón para abrir un cuadro de dialogo para buscar la imagen, esto es:
PUBLIC cfile
cFile = GETPICT()
thisform.image1.Picture=cFile
&&Image1 es un objeto para visualizar la imagen
ahora para darle de alta, en el botón de guardar queda así:
Append blank
REPLACE campo WITH FILETOSTR( cFile ) IN nombredelatabla
Y es todo.
