HowTo: PDF oder HTML Dokumente in Paradox Datenbank ablegen?

[hacki]

Hi,

ich hab es nun auch nochmal so ausprobiert, das PDF aus dem BLOB zu lesen und als File zu speichern. Diesmal genauso, wie es oben beschrieben steht.

Zitat:

1. Blobstream erzeugen
2. Filestream erzeugen (mit fmCreate)
3. Filestream.CopyFrom(BlobStream,0)
4. Alles Freigeben

Allerdings mit dem gleichen Ergebnis:

Delphi-Quellcode:

    // Blob-Stream erzeugen
    MyStream:=Table1.CreateBlobStream(table1.FieldByName('pdf'),bmRead);

    // FileStream erzeugen
    MyFileStream.Create('C:\transfer\12345.pdf',fmCreate );

    MyFileStream.CopyFrom(MyStream, 0);

Code:

   Access violation at adress ..... in module project.exe .....

Habt ihr eine Ahnung was anders zu machen ist ??

[hacki]

Hi all,

nur zur Info, es hat nun folgendermassen gefunzt:

Code:

    Table1.Open;

    MyStream := TStream.Create;

    MessageDlg('MyStream.Create.', mtInformation,  [mbOk], 0);

    MyStream:=Table1.CreateBlobStream(table1.FieldByName('pdf'),bmRead);

    // FileStream erzeugen
    MyFileStream := TFileStream.Create('C:\transfer\12345.pdf',fmCreate );

    MyFileStream.CopyFrom(MyStream, 0);

    MyStream.Free;
    MyFileStream.Free;

    Table1.Close;

Grüsse, Hacki