|
Es sencillo, puedes hacerlo con cualquier formato de imagen,lo primero es cargar tus fotografias a una tabla, en ella puedes poner el nombre personalizado de tu foto, la fecha , la clase etc segun cuantos campos quieras colocar en esta tabla con informacion adicional de tu imagen asignando un campo para cada uno de estos valores , pero para guardar el contenido de la imagen debes de utilizar un campo del tipo MEMO.
Luego para cargar esta imagen en tu tabla , lo unico que tienes que hacer es utilizar el comando
APPEND MEMO nombredelcampomemo FROM "C:\MIRUTA\mimagen.jpg" (por ejemplo)
Bien ahora , que ya tenemos los datos en la tabla , incluida la imagen misma(claro que en un otro formato), solo nos queda realizar un artificio para presentarla en nuestros formularios
En el evento LOAD de tu Formulario debes escribir lo siguiente
para copiar el contenido de la imagen de la tabla a tu disco duro local o cualquier otra ruta :
COPY MEMO nombredelcampomemo TO "C:\OTRARUTA\MIIMAGEN.JPG"
Luego de haber hecho esto, levanta esta nueva imagen recien creada, a tu control image de tu formulario de la sigiente manera :
THISFORM.MICONTROL.PICTURE="C:\OTRARUTA\MIIMAGEN.JPG"
y ..Listo, veras como la imagen se carga en tu control sin problemas , no olvides de darle la propiedad Strecht a TRUE, sino sale recortada
Nota : colocar el SET SAFETY en OFF, para que no te salga el mensaje de alert cada vez que chancas el archivo de imagen temporal
|
