Текущий архив: 2003.04.07;
Скачать: CL | DM;
Вниз
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]Господа...не оставьте без внимания мой вопрос....
Страницы: 1 вся ветка
Текущий архив: 2003.04.07;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.013 c
