hi,
ich weiß, dass der Beitrag schon etwas älter ist, aber vielleicht bringts ja doch was nochmal nachzufragen.
und zwar. Ich versuche auch gerade eine PDF Aus einem VarBinary(Max) zu lesen. Habe es genau so gemacht, wie unten beschrieben, aber wenn ich die PDF dann öffnen will, sagt der Foxit Reader: format error: not a PDF or corrupted
Delphi-Quellcode:
procedure TForm.ViewPDF;
var
ts: TStream;
ms: TMemoryStream;
begin
ts := TStream.Create;
ts := dm.qQuery.CreateBlobStream(dm.qQuery.Fieldbyname('Datei'),bmRead);
ms := TMemoryStream.Create;
ms.LoadFromStream(ts);
ms.SaveToFile('C:\test3.pdf');
end
was mach ich hier falsch?