BLOB + MySQL

← →
ed_30 (2002-05-15 11:54) [0]

procedure TForm1.Button1Click(Sender: TObject);
begin
ZMySqlTable1.Insert;
TBLOBField(ZMySqlTable1.FieldByName("type_x")).LoadFromFile("42150.jpg");
MySqlTable1.Post;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
jpg: TJPEGImage;
f: TStream;
begin
jpg := TJPEGImage.Create;
TBLOBField(ZMySqlTable1.FieldByName("type_x")).SaveToFile("42151.jpg");
jpg.LoadFromFile("42151.jpg");
Image1.Picture.Assign(jpg);
jpg.Free;
end;

Если выполнить Button1Click а затем Button2Click, то картинка отображается нормально.
Если приложение закрыть, а потом после открытия выполнить только
Button2Click для загрузки сохраненной ранее (в предыдущем сеансе) картинки, отображается только ее часть.
В чем тут может быть дело.
Заранее спасибо за ответ.

← →
Nikolay M. © (2002-05-15 19:01) [1]

Возможно, кеширование картинки на клиенте? А картинка большая? На маленьких - тоже самое? А ZMySqlTable1.FieldByName("type_x")) - какого типа? Возможно, тут обрезание и происходит, когда постятся данные, хотя в НД картинка остается? Короче, смотри по шагам, что у тебя считалось из файла, что положилось в поле, что запостилось на сервер, можно даже брать не обязательно картинку, а любой текст, чтобы проще смотреть было. Библиотека эта, вроде, не глючная, покопайся сначала в своем коде.

← →
ed_30 (2002-05-16 10:05) [2]

Николай!

Огромное спасибо за подсказку. Поле type_x было BLOB и естественно сохраняло 65 кБ информации, поставил MEDIUMBLOB - все заработало.

Еще раз, спасибо.

longblob - лучше

BLOB + MySQL Найти похожие ветки