HowTo: PDF oder HTML Dokumente in Paradox Datenbank ablegen?

[MarcoWarm]

Hi Hacki,

also ich benutze Interbase, aber das Prinzip ist wohl das gleiche:

Delphi-Quellcode:

procedure irgendwas;
var
  MyStream : TStream;
  Image    : TBitmap;
begin
    //Tabelle bearbeiten
    Table1.edit;

    //Bitmapobjekt erzeugen und aus Datei laden
    Image:=TBitmap.Create; 
    Image.LoadFromFile('D:\Bilder\test.bmp');

    //einen Blobstream aus dem Tabellenfeld (Typ BLOB) erstellen
    MyStream:=Table1.CreateBlobStream(table1.FieldByName('BILD'),bmReadWrite);
    
    //Das Bild in den Stream speichern - das BLOB-Feld wird automatisch aktualisiert
    Image.SaveToStream(MyStream);

    //Allen Kram freigeben
    Image.Free;
    MyStream.Free;
    
    //Änderungen schreiben
    Table1.Post;
end

Ciao

Marco