el codigo que utilize fue el mismo que mencione al principio del hilo
Código Delphi
[-]
TBlobField(ADOTable1.FieldByName('pdf')).LoadFromFile('archivo.pdf');
TBlobField(ADOTable1.FieldByName('pdf')).SaveToFile('archivo.pdf');
este es un ejemplo de como lo utilize en mis codigo de pruebas
para guardar en la base de datos
Código Delphi
[-]
begin
try
TBlobField(ADOTable1.FieldByName('archivos')).LoadFromFile(Open.FileName);
finally
ADOTable1.Post;
ShowMessage('archivo guardado');
end;
end;
y este es para guardar de la base de datos al disco
Código Delphi
[-]
begin
TBlobField(ADOTable1.FieldByName('archivos')).SaveToFile('C:\'+ DBEdit1.Text+'.exe');
ShowMessage('archivo guardado');
end;