Hallo Fritz,
am Ende läuft alles auf eine Zeile hinaus:
Delphi-Quellcode:
var
bild: TBlobField;
image: TImage;
begin
with bild do
begin
DataSet.Edit;
Assign(image.Picture); // <-- the very line
DataSet.Post;
end;
end;
Vielleicht kannst du ja meine angehängte Demo auch mit D4 lesen.
Freundliche Grüße vom marabu