DBImage и format JPEG

← →
melavcorp © (2003-03-20 11:01) [0]

Господа!! Поскажите, как сохранить в MSSQL2000(формат поля Image)рисунки. Схема такова: Клиентская часть реализована на ADO -> серверная MSSQL2000.

Если загрузить рисунок в DBImage формата jpeg, он нормально загружается, но при попытки сохранения в БД(POST) - удаляется из DBImage и соответственно в БД не записывается.
Попробовал через потоки, но увы.....не работает..
Представляю кусок кода..Что здесь не так???

uses ...,JPEG;

procedure TForm1.BitBtn3Click(Sender: TObject);
var Stream:TADOBlobStream;
begin
Stream := TADOBlobStream.Create(TBlobField(ADOQuery1.FieldByName("Picture")), bmReadWrite);
try
ADOQuery1.Edit;
Stream.Seek(0, soFromBeginning);
Stream.Truncate;
DBImage1.Picture.Graphic.SaveToStream(Stream);
ADOQuery1.Post;
finally
Stream.Free;
end;

end;

← →
melavcorp © (2003-03-20 11:17) [1]

Господа...не оставьте без внимания мой вопрос....

DBImage и format JPEG Найти похожие ветки