Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   MySQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=21)
-   -   PDF en mysql (https://www.clubdelphi.com/foros/showthread.php?t=63797)

Willo 03-03-2009 16:01:19

PDF en mysql
 
Buen dia;

estoy buscando algun ejemplo que me permita, guardar y leer un PDF grabado en una tabla de MySQL.

hasta ahora en internet, encontre este ejemplo para la parte del guardado:

To write a blob field in a query, you should use parameters. For example:

"insert into Table values (:BlobValue)"

Then you have to set the value of this parameter like this:

.ParamByName('BlobValue').LoadFromStream(SourceStream, ftBlob);
This methods loads the content of SourceStream to the parameter from the
cursor to the end of the stream.


(you can use .LoadFromFile method the same way).


Me queda claro como guardarlo y al parecer funciona, lo que aun no logro sacar en claro es como leerlo... alguien tiene alguna sugerencia?

Gracias de antemano.

Neftali [Germán.Estévez] 03-03-2009 17:45:51

Prueba a ejecutar la consulta, y guardar directemente el stream.
Algo así (te lo pongo de memoria)

Código Delphi [-]
  TBlobField(Field).SaveToFile(FileName);

Me refería a algo similar a esto: link hilo

Willo 03-03-2009 18:30:41

Gracias Neftali...

si graba el archivo, pero con extension de 0 bytes... este es mi codigo...

TBlobField(Qformatos.fieldbyname('formato')).SaveToFile('c:\temp\pdftemp.pdf');
ShellExecute(Form1.Handle, 'open', Pchar('c:\temp\pdftemp.pdf'),nil,nil,SW_SHOWNORMAL);

algo estoy haciendo mal... pero la verdad no se que sea.


La franja horaria es GMT +2. Ahora son las 12:26:55.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi