Forum: Datenbanken
by Klaus01,
16. Aug 2012
Das die Fehlerbenhandlung den Fehler nicht behebt war mit klar - nur dachte ich, dass eventuell
ein verwertbare Fehlermeldung dabei herauskommen würde.
Das TImage weiß das ein jpg hereinkommt, Du übergibst ja die jpg Instanz.
Grüße
Klaus
Forum: Datenbanken
by Klaus01,
16. Aug 2012
.. sollte aber eigentich funktionieren.
Im Stream befindet sich ein jpg Image?
Ist der Stream o.k. - sind darin Daten vorhanden?
eventuell noch eine Fehlerbehandlung einbauen
(FindField('BLOB1') As TBlobField).SaveToStream(MS);
ms.Position := 0;
J := TJPEGImage.Create;
try
Forum: Datenbanken
by Klaus01,
16. Aug 2012
Wird es so besser?
J := TJPEGImage.Create;
ms.seek(0,soFromBeginning); // oder ms.position :=0
J.LoadFromStream(MS);
Form3.Image1.Picture.Assign(J);
Grüße
Klaus