Timage aus Blobfeld

[WS1976]

Hallo dataspider,

dein Code funktioniert einwandfrei. Für alle die das nachvollziehen wollen:
bei dir hat sich leider ein kleiner Fehler eingeschlichen.
(hab try except; weggelassen)

Delphi-Quellcode:

procedure TForm1.Button4Click(Sender: TObject);
var AStream: TStream;
begin
  MyTable.Active := true;
  MyTable.First;
  AStream := MyTable.CreateBlobStream(Mytable.FieldByName('Picture'), bmRead);
  image1.Picture.Icon.LoadFromStream(AStream);
end;

Bei dir:
image1.Picture.LoadFromStream(AStream);
Die Methode Loadfromstream gibt's bei picture nicht!
Richtig:
image1.Picture.Icon.LoadFromStream(AStream);

Zu deinem Code Neutral General:
dein Code funktioniert nicht. Ergebnis Streamlesefehler. (Warum hab ich noch nicht rausgefunden.)

Vielen Dank!!!
Ihr habt mir sehr geholfen.