Esta es la forma que yo opero con archivos, no es con los componentes UniDAC pero supongo que para todos es la misma,
Para guardarlo:
Código Delphi
[-]
var
LStream: TStream;
begin
LStream := TFileStream.Create(RutaAlPdf, fmOpenRead);
try
Parameters.ParamByName('PDF').LoadFromStream(LStream , ftVarBytes);
finally
LStream .Free;
end;
end;
Para obtener el archivo:
Código Delphi
[-]
procedure DownloadPdf(const RutaDescarga: string);
var
LQuery: TXXXQuery; begin
LQuery := .... try
LQuery.SQL.Text := ' SELECT * FROM Archivo '; LQuery.Open; TBlobField(LQuery.FieldByName('Dato')).SaveToFile(RutaDescarga);
finally
LQuery.Free;
end;
end;