FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Guardar archivos en campos
Hola,
Quiero guardar archivos (*.pdf, *.dxf. *.jpg) en campos de FireBird, es decir por cada registro un archivo, ¿como puedo hacer esto? Se que debo utilizar campos Blob, pero ¿como se haria? Una vez grabado en la base de datos como lo saco de la BD y como lo vuelvo a grabar como archivo? Muchas gracias |
#2
|
||||
|
||||
Supongo que algo similar a esto tiene que funcionar (No lo he probado)
Código:
var AStream : TFileStream; begin AStream := TFileStream.Create('c:\MiArchivo.ext', fmOpenRead); Try TBlobField(ADataSet.FieldByName('CAMPO') ).LoadFromStream(AStream); finally AStream.Free; end; end;
__________________
delphi.com.ar Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla. |
|
|
|