alfredo Master

Registrado: 13 Oct 2003Mensajes: 246Ubicación: Valencia Venezuela
|
Publicado: Sab 15 Mar, 2008 2:52 pm Asunto: |
|
|
Depende lo que realmente quieres, una cosa es grabar el contenido del
fichero y otra grabar el fichero en si.
Puedes meter casi cualquier cosa en un campo tipo blob, imagenes, aplicaciones... cualquier fichero inclusive otra base de datos que a su vez
contenga imagenes, aplicaciones y otra base de datos que a su vez contenga.....
Funciona en cualquier base de datos que maneje campos blob y casi no tiene
limitaciones de tamaño, he conseguido guardar 400 Mb de un archivo tiff de
una valla full color de 12 * 4 Mts. en una tabla de TClientDataSet.
Crea un proyecto nuevo, agrega la tabla de cualquier tipo con un campo blob
la tabla la llamaremos tbTabla y el campo fBlob. Agrega un TOpenDialog y un TSaveDialog ademas un boton, en el evento click del boton escribe:
| Código: | if(OpenDialog1->Execute())
{
tbTabla->Append();
static_cast<TBlobField>
(tbTabla->FieldByName("fBlob"))->LoadFromFile(OpenDialog1->FileName);
tbTabla->Post();
} |
Para extraerlo agrega otro boton y en su evento OnClick escribe:
| Código: | if(SaveDialog1->Execute())
static_cast<TBlobField>
(tbTabla->FieldByName("fBlob"))->SaveToFile(SaveDialog1->FileName);
|
|
|