Hallo
Wie kann ich ein BLOB datenfeld direkt in eine Datei schreiben? Alternativ lösung wäre das ganze zuerst in einen OLEContainer zu laden und von dort aus zu speichern.
Code:
procedure TForm1.Button5Click(Sender: TObject);
var S: TStream;
begin
S:=TMemoryStream.create;
try
S:=Table1.CreateBlobStream(Table1.FieldByName('TEXTMODULE'), bmRead);
OleContainer1.LoadFromStream(S);
finally
S.Free
end;
end;