Guardar una archivo de imagen (bmp,jpg..etc), en la base de datos
 

hola todos como esta.... espero que bien....

tengo una base de datos firebird, necesito guardar la foto de unos empleados en la base de datos, como seria el cogido fuente para realizar esta acción...

les agradesco cualquier ayuda.....

ma o meno seria: imaginemos tu tienes un campo blob llamado imagen, y una tabla/clientdataset en delphi llamada TEmpleados, con sus corespondientes campos TEmpleadoCodigo, TEmpleadoImagen...

Código Delphi [-]
Templeado.edit
TempleadoImagen.LoadFromFile('c:\fotofeo.bmp')

en lugar de la cadena esa puedes hacer que se habra un dialogo mediante el componente openfiledialog

Guardar un archivo de imagen
 

hola

podria ser util de esta forma

FieldByName('campo').Assign(imagen.Picture.Bitmap);

imagen es un componente TImage, yo lo he trabajado asi y me funciona.

Saludos ....

gracias por su ayuda
 

gracias por todo

De Esta Manera Es Mas Efectiva
 

sql2.SQL.Clear;
sql2.SQL.Add('insert into emple(coemp,idemp,foto)');
sql2.SQL.Add('values(:v_coemp,:v_idemp,:V_FOTO)');
sql2.ParamByName('V_COEMP').Value:=strtoint(V_COEMP.Text);
sql2.ParamByName('V_IDEMP').Value:=V_IDEMP.Text;
sql2.ParamByName('V_FOTO').LoadFromFile('C:\IMAGEN\FOTO.BMP',ftBlob);
sql2.ExecSQL;