Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Insertar imagen en un campo blob de mysql (https://www.clubdelphi.com/foros/showthread.php?t=41556)

coletaun 19-03-2007 14:49:18

Insertar imagen en un campo blob de mysql
 
Hola a todos.

Tengo que insertar o actualizar imagenes en un campo TBlob o TlongBlob en Mysql.
Tengo las imagenes en el disco y quiero insertarlas en una tabla 'imagenes' con los campos (codigo,nombre,imagen) en el que el campo imagen es de tipo tblob.

Utlizo las Zeos.

¿como podria guardar la imagen en este tipo de campos?

Muchas gracias de antemano.

DTAR 21-03-2007 14:07:01

Código Delphi [-]
Var
MS : TmemoryStream;
Begin
ms:=TMemoryStream.Create ;                        
MyTImage.Picture.Graphic.savetoStream(ms);
ExecSQL(insert into empleados (nombre,apellido,id) values ('Juan','Perez','1212'))
OpenSQL('select * from  empleados where id ='1212',zquery2);
zquery2.Edit;
ZQuery2foto.LoadFromStream(ms);
ZQuery2.Post;
end;

No es Muy elegante pero me funciona...
Otra tambien podria ser...

Código Delphi [-]
OpenSQL('select * from  empleados where id ='''+id+'''',zquery2);
zquery2.Edit;
ZQuery2foto.LoadFromFile(OpenDialog1.FileName );
ZQuery2.Post ;

P.D.: El OpenSQL y ExecSQL, son funciones mias que lo unico que hacen es ejecutar la consulta....seria lo mismo que
zquery2.sql.tex='select * from empleados';
zquery2.execsql;

espero que te sirva...:)

cureham 23-05-2007 19:29:21

que tal, me parece buena tu respuesta solo q a ver si me puedes explicar que esl zquery2foto y como lo ligas con zquery2


La franja horaria es GMT +2. Ahora son las 19:34:20.

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