Page 2 of 2

Re: Image File

Posted: Thu Aug 06, 2009 4:36 am
by swapan
Dear Gfilatov:

Thanks a lot for your code! Never tried like this. Will have to check it someday..interesting!

But I too follow the way Roberto Sir has mentioned.

Re: Image File

Posted: Thu Aug 06, 2009 5:58 am
by sudip
Hello,

I want to share some ideas regarding this matter. :)

Those are very simple ideas.

Storing image data into memo field has one advantage. It is very useful for multiuser environment, where image file will be stored (encapsulated) within database.

For storing names and paths of image file, I store network path (eg., //main/c/MyProject/pic). And again my users change this for modification in network setting.

With best regards.

Sudip

Re: Image File

Posted: Thu Aug 06, 2009 6:54 am
by gfilatov
swapan wrote:Dear Gfilatov:

Thanks a lot for your code!
...
Hi,

You are welcome!

But all credits are dedicated to CAS for this nice contribution :!:

I'm provider only ;)

Re: Image File

Posted: Thu Aug 06, 2009 1:32 pm
by Roberto Lopez
sudip wrote:
rathinagiri wrote:In the case of MySQL, I had done one project successfully that I would share with a suitable example soon.
Yes Rathi, I am waiting for it ... :D
Regards.
Sudip
Me too!

Regards,

Roberto.

Re: Image File

Posted: Sat Feb 23, 2019 1:46 pm
by mustafa
Hola amigos:
Encontré esta Demo de "Image File" con el Sample del Maestro Filatov
http://www.hmgforum.com/viewtopic.php?f ... askBinData

Empecé a experimentar haber como se podría implementar , Altas, Bajas
y Exportar un nuevo fichero gráfico, partiendo de un gráfico que se
encuentra en un Campo Memo de la Base de datos.

Comparto las opiniones que en este trabajo expresan los Maestros.
Como indica el Maestro Roberto López creo que es mejor trabajar
señalando solo el nombre del fichero y no incorporado en la base
de datos dentro del Campo Memo.

Como indica el Maestro Grigory Filatov , la contribución es de CAS
creo que se llama Vailton Renato del Brasil

La misma Demo con los ficheros gráficos fuera de la Base de datos
la tienen en la Demo que publiqué --> DBF_Sample_WebCam.zip
http://www.hmgforum.com/viewtopic.php?f ... m&start=20

Espero que les sirva este nueva aportación
Saludos
Mustafa
*--------------------------------------------------------------------------------------*
Hello friends:
I found this Demo of "Image File" with the Sample of Master Filatov
http://www.hmgforum.com/viewtopic.php?f ... askBinData

I began to experience how it could be implemented, High, Low
and Export a new graphic file, starting from a graphic that
found in a Memo Field of the Database.

I share the opinions expressed in this work by the Masters.
As Master Roberto López indicates, I think it's better to work
noting only the name of the file and not incorporated in the database
of data within the Memo Field.

As indicated by Master Grigory Filatov, the contribution is from CAS
I think it's called Vailton Renato of Brazil

The same Demo with the graphic files outside the Database
they have it in the Demo that I published -> DBF_Sample_WebCam.zip
http://www.hmgforum.com/viewtopic.php?f ... m&start=20

I hope you can use this new contribution
Regards
Mustafa

Re: Image File

Posted: Sat Feb 23, 2019 8:31 pm
by andyglezl
mustafa wrote: Sat Feb 23, 2019 1:46 pm Comparto las opiniones que en este trabajo expresan los Maestros.
Como indica el Maestro Roberto López creo que es mejor trabajar
señalando solo el nombre del fichero y no incorporado en la base
de datos dentro del Campo Memo.
*--------------------------------------------------------------------------------------*
I share the opinions expressed in this work by the Masters.
As Master Roberto López indicates, I think it's better to work
noting only the name of the file and not incorporated in the database
of data within the Memo Field.

Hola Mustafa, gracias.

Yo también probé de las 2 formas y voy de acuerdo en no guardarlos
dentro del campo memo.

(Al menos que se trate de seguridad, que ya es otro tema)
*---------------------------------------------------------------------
Hello Mustafa, thank you.

I also tried the 2 forms and I agree not to save them
inside the memo field.

(At least it's about security, which is another issue)


P.D.
Hace tiempo hice un un prototipo donde se requerían varias imagenes
para un solo registro y la mejor forma fué manejando los archivos por fuera.
(Le baje el tamaño y la calidad al archivo gif porque el real, pesaba 13MB.)
+------------------------------------------------------------------------------------------------
Some time ago I made a prototype where several images were required
for a single record and the best way was handling the files on the outside.
(I lowered the size and quality to the gif file because the real one weighed 13MB.)
demogif7.gif
demogif7.gif (2.29 MiB) Viewed 3002 times

Re: Image File

Posted: Sun Feb 24, 2019 10:54 am
by mustafa
Hola Andrés
Estás hecho un artista , muy logrado je... je.. :lol:
un abrazo amigo
Mustafa

PD Estoy experimentando con "ScreenToGif" para
las presentaciones de las Demo en formato GIF , pero consume
muchos recursos, he probado con ACTIVEX.

Code: Select all

  DEFINE WINDOW Form_5 
       etc.etc.      
DEFINE TIMER Timer_1Q INTERVAL 2000  ACTION  ReleaseMemoryTest()

@ 20,20 ACTIVEX Test5        ;
             PARENT Form_5      ;
             WIDTH 795             ; 
             HEIGHT 593            ;  
             PROGID "shell.explorer.2" 

             cFile := HB_CurDrive() + ':\' + Curdir() + '\' + "Demo_Mail.gif" 

             Form_5.Test5.Object:Navigate( cFile )

 END WINDOW

   Form_5.Center
   Activate Window Form_5

RETURN NIL

*------------------------------------------*
PROCEDURE ReleaseMemoryTest()   <--- Courtesy by  Dr. Soto 
*-------------------------------------------*
STATIC IniMem := 0
LOCAL  EndMem
   IF IniMem == 0
      IniMem := GetProcessMemoryInfo()[3]
   ENDIF
   EndMem := GetProcessMemoryInfo()[3]
   #define MEM_LIMIT  3 // for example 3 times the initial amount of memory used
   IF (EndMem / IniMem) > MEM_LIMIT
      RELEASE MEMORY
      IniMem := GetProcessMemoryInfo()[3]
   ENDIF 
RETURN