TDBImage i stream read error

0

Witajcie

Mam prostą bazę danych (mySQL)
Id - AutoIncrement oraz picture - BLOB
Stosuje bibliotekę ZEOS

Chcę do pola picture zapisać obraz (jpg, png). Robię to jak poniżej

if openpicturedialog1.Execute then
    begin
      ZQuery1.Append;
      ZQuery1pic1.LoadFromFile(openpicturedialog1.FileName);
      ZQuery1.Post;      
    end;  

Wszystko jest OK.

Natomiast jeżeli w formie dołożę TDBImage powiążę odpowiednio DataSource i DataField. To przy przeglądaniu wyskakuje mi błąd "stream read error". Jeżeli pozwolę kontynuować wykonywanie programu to podgląd obrazka pokazuje się. Błąd powtarza się, jeżeli w bazie przechodzę do innego wiersza.
Zaznaczam, dzieje się tak zarówno wtedy jeżeli właściwość TDBImage. WriteHeader ustawiam na TRUE jak i na FALSE.

Co robię źle?
Sc0li0sis

0

Bez przykładu ciężko zgadnąć.
U siebie nie zauważyłem takiego zachowania.
W załączniku przykład - wymaga zainstalowanego komponentu Lazzreport (Pakiety > Instaluj/odinstaluj pakiety > po prawej należy znaleźć lazreport > Instaluj zaznaczone > Zapisz i przebuduj IDE).
Do katalogu z programem musisz wrzucić sqlite.dll

project1_zeos.7z

1 użytkowników online, w tym zalogowanych: 0, gości: 1