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

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


uses ...,JPEG;

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

end;