Page 1 of 2

Imágenes en una DBF

Posted: Thu Feb 11, 2021 8:53 am
by AIDA
Hola

Alguien sabe como se guarda una imagen en una dbf y como se debe leer para presentarla en la pantalla :mrgreen:


Gracias... :D

Saluditos :wink:

Re: Imágenes en una DBF

Posted: Thu Feb 11, 2021 9:50 am
by leandro
Una idea

Code: Select all

function guardaImg()
local rutaimg := ".\imgs\laimagen.bmp"
local rutaTXT := ".\imgs\laimagen.txt"

//CONVERTIMOS LA IMAGEN A TEXTO
fMimeEnc( rutaimg, rutaTXT ) //Convertimos la imagen en base64
cText := MemoRead( rutaTXT ) //Con la info en la variable la puedes guardar en la dbf
 

Re: Imágenes en una DBF

Posted: Thu Feb 11, 2021 9:12 pm
by hmpaquito
A no ser que sean pocas imágnes, es muy desaconsejable guardar las imagenes en las tablas, sean .dbf o sean tablas Mysql

Re: Imágenes en una DBF

Posted: Thu Feb 11, 2021 10:02 pm
by karinha
hmpaquito wrote:A no ser que sean pocas imágnes, es muy desaconsejable guardar las imagenes en las tablas, sean .dbf o sean tablas Mysql
De acuerdo. Mejor és guardar en archivos .RC ó .RES.

IMAGENES.RES
IMAGENES2.RES
IMAGENES3.RES

etc.

Saludos.

Re: Imágenes en una DBF

Posted: Fri Feb 12, 2021 11:34 am
by nageswaragunupudi
karinha wrote:
hmpaquito wrote:A no ser que sean pocas imágnes, es muy desaconsejable guardar las imagenes en las tablas, sean .dbf o sean tablas Mysql
De acuerdo. Mejor és guardar en archivos .RC ó .RES.

IMAGENES.RES
IMAGENES2.RES
IMAGENES3.RES

etc.

Saludos.
Personally I prefer to save in the tables. There are limitations on the total size of DBF files but there is no such limitation with ADS and any RDBMS like MySql, Oracle, etc.
There are ways to fine-tune the performance of the tables despite storing huge catalogs of images in the tables.
Anyway, it is a matter of opinion and personal preferences.

Re: Imágenes en una DBF

Posted: Fri Feb 12, 2021 11:35 am
by nageswaragunupudi
leandro wrote:Una idea

Code: Select all

function guardaImg()
local rutaimg := ".\imgs\laimagen.bmp"
local rutaTXT := ".\imgs\laimagen.txt"

//CONVERTIMOS LA IMAGEN A TEXTO
fMimeEnc( rutaimg, rutaTXT ) //Convertimos la imagen en base64
cText := MemoRead( rutaTXT ) //Con la info en la variable la puedes guardar en la dbf
 
This is not necessary.

Re: Imágenes en una DBF

Posted: Fri Feb 12, 2021 11:42 am
by nageswaragunupudi
Storing images in DBF and displaying
Sample-1

Code: Select all

   DBCREATE( "MYIMAGES", { { "NAME", "C", 10, 0 }, { "IMAGE", "M", 10, 0 } }, "DBFCDX", .T., "IMG" )
   DBAPPEND()
   FIELD->NAME  := "OLGA1"
   FIELD->IMAGE := MEMOREAD( "c:\fwh\bitmaps\olga1.jpg" )
   DBAPPEND()
   FIELD->NAME  := "SEA"
   FIELD->IMAGE := MEMOREAD( "c:\fwh\bitmaps\sea.bmp" )
   GO TOP
   XBROWSER
 
Image

Re: Imágenes en una DBF

Posted: Fri Feb 12, 2021 12:16 pm
by nageswaragunupudi
Sample-2

Using the DBF we created above:

Code: Select all

#include "fivewin.ch"

REQUEST DBFCDX

function Main()

   local oDlg, oFont, oBrw, oImage

   USE MYIMAGES NEW VIA "DBFCDX"

   DEFINE FONT oFont NAME "VERDANA" SIZE 0,-14
   DEFINE DIALOG oDlg SIZE 600,500 PIXEL TRUEPIXEL FONT oFont

   @ 20, 20 XBROWSE oBrw SIZE 150,-20 PIXEL OF oDlg ;
      DATASOURCE "MYIMAGES" COLUMNS "NAME" LINES NOBORDER

   WITH OBJECT oBrw
      :bChange := { || oImage:Refresh() }
      //
      :CreateFromCode()
   END

   @ 20,200 XIMAGE oImage SOURCE MYIMAGES->IMAGE SIZE -20,-20 OF oDlg

   ACTIVATE DIALOG oDlg CENTERED ON INIT oImage:Refresh()
   RELEASE FONT oFont

return nil
 
Image

Re: Imágenes en una DBF

Posted: Fri Feb 12, 2021 1:45 pm
by acuellar
Mr. Rao

DBCREATE( "MYIMAGES", { { "NAME", "C", 10, 0 }, { "IMAGE", "M", 8, 0 } }, "DBFCDX", .T., "IMG" )

There is a difference between saving in MEMO field or PICTURE field?

Thanks.

Re: Imágenes en una DBF

Posted: Sun Feb 14, 2021 4:53 am
by AIDA
Hola es que tengo pensado que las fotos que quiera guardar el usuario sean guardadas en un dbf :)


Saluditos :wink:

Hello, I have thought that the photos that the user wants to save are saved in a dbf :)


Greetings: wink:

Re: Imágenes en una DBF

Posted: Sun Feb 14, 2021 6:47 am
by nageswaragunupudi
Hello, I have thought that the photos that the user wants to save are saved in a dbf :)
Yes. We can save the photos that the user wants.
Can you explain what exactly you are looking for?

Re: Imágenes en una DBF

Posted: Tue Feb 16, 2021 2:25 am
by AIDA
nageswaragunupudi wrote:
Hello, I have thought that the photos that the user wants to save are saved in a dbf :)
Yes. We can save the photos that the user wants.
Can you explain what exactly you are looking for?

It is a program for people who build scale models is to register their finished models as if they are in a box is to record the data and photograph of the model or the box

es un programa para personas que arman modelos a escala es para que registren sus modelos terminados a si como los que a un están en caja es registrar los datos y fotografía del modelo o la caja

Re: Imágenes en una DBF

Posted: Tue Feb 16, 2021 3:51 pm
by ACC69
nageswaragunupudi wrote:Sample-2

Using the DBF we created above:

Code: Select all

#include "fivewin.ch"

REQUEST DBFCDX

function Main()

   local oDlg, oFont, oBrw, oImage

   USE MYIMAGES NEW VIA "DBFCDX"

   DEFINE FONT oFont NAME "VERDANA" SIZE 0,-14
   DEFINE DIALOG oDlg SIZE 600,500 PIXEL TRUEPIXEL FONT oFont

   @ 20, 20 XBROWSE oBrw SIZE 150,-20 PIXEL OF oDlg ;
      DATASOURCE "MYIMAGES" COLUMNS "NAME" LINES NOBORDER

   WITH OBJECT oBrw
      :bChange := { || oImage:Refresh() }
      //
      :CreateFromCode()
   END

   @ 20,200 XIMAGE oImage SOURCE MYIMAGES->IMAGE SIZE -20,-20 OF oDlg

   ACTIVATE DIALOG oDlg CENTERED ON INIT oImage:Refresh()
   RELEASE FONT oFont

return nil
 
Image


Hola buenos dias Ing. Mr. Rao Nages, que tal como esta, se me viene a la mente de si se puede guardar archivos pdf en una tabla dbf?, ya que vi su ejemplo que esta excelente para un mini proyecto que deseo visualizar con un programa que estoy pensando desarrollar, donde todos mis archivos las guardo en una carpeta ya sea imagenes, pdfs y archivos .doc, y con un programa realizado por mi, pueda yo visualizar los archivos guardados en una tabla dbf??

Se puede Ing. Mr Raro o alguien que lo haya hecho y pueda compartir trozo de visualizar todo tipo de archivo antes mencionado, esto es con la finalidad de que el usuario de evitar abrir uno por uno cada archivo ya sea imagen o pdf, o cualquier otro tipo de archivo, simplemente visualizar navegando estilo xbrowse .

Saludos quedo a la respuesta favorable.

Atte: Adriano C. C.

Re: Imágenes en una DBF

Posted: Tue Feb 16, 2021 8:28 pm
by nageswaragunupudi
You can store any data in a memofield:

Code: Select all

FIELD->MEMOFIELDNAME := MEMOREAD( <anyfile> )
 
When reading, how do you plan to show pdf, docx files, etc?

Re: Imágenes en una DBF

Posted: Wed Feb 17, 2021 2:39 pm
by ACC69
nageswaragunupudi wrote:You can store any data in a memofield:

Code: Select all

FIELD->MEMOFIELDNAME := MEMOREAD( <anyfile> )
 
When reading, how do you plan to show pdf, docx files, etc?

Hola Ing. Mr Rao Nages como esta, espero que bien!, esa es una muy buena pregunta como debo mostrar el contenido almacenado en mi tabla dbf los archivos, pdf,docx, etc etc , yo pensaba como la muestra de su ejemplo de la imagen a la derecha crear un dialogo que me muestre todo tipo de archivos, navegando por xbrowse o tiene alguna sugerencia que nos puede ayudar y beneficiar a todos??

Para iniciar a desarrollar ese pequeño programa que tengo en mente y no estar abriendo y cerrando con diferente aplicacion para cada archivo dentro la carpeta uno por uno los archivos mencionados.

Espero sugerencia y el codigo a mostrar todo tipo de archivos desde mi tabla dbf.

Atte: Adriano C. C.