Поместить файл в базу данных

← →
gedd (2004-11-11 18:07) [0]

Люди помогите ничего не понимаю вот код
говорит что dataset не в режиме edit? насильно поставить его не помогает, где ошибка?

Stream:= form1.ADOQuery1.CreateBlobStream( form1.ADOQuery1.FieldByName("tbf1") , bmReadWrite);
try
Stream.Seek(0, soFromBeginning);
fs := TFileStream.Create(form1.psvOpenDialog1.FileName, fmOpenRead);
try
Stream.CopyFrom(fs, fs.Size)
finally
fs.Free
end;
finally
Stream.Free
end;

← →
Reindeer Moss Eater © (2004-11-11 18:33) [1]

И где ты его насильно в режим Edit ставишь?

← →
gedd (2004-11-12 12:19) [2]

До этой строки
Stream:= form1.ADOQuery1.CreateBlobStream( form1.ADOQuery1.FieldByName("tbf1") , bmReadWrite);
ставлю form1.ADOQuery1.Edit;

← →
gedd (2004-11-12 17:17) [3]

Удалено модератором

Поместить файл в базу данных Найти похожие ветки