| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вставка BLOB из файла...
VitV © (2006-02-24 14:18:00)procedure TForm1.DBImage1Click(Sender: TObject);
var S:TStream;
FileS:TFileStream;
begin
if not OpenDialog1.Execute then exit;
Reestr.IBDataSet3.edit;
S:=Reestr.IBDataSet3.CreateBlobStream(Reestr.IBDataSet3.FieldByName('FOTO'),bmRe adWrite);
try
FileS:=TFileStream.Create(OpenDialog1.FileName,fmOpenRead);-ошибка!!
S.CopyFrom(FileS,FileS.Size);
finally
FileS.Free;
S.Free;
Reestr.IBDataSet3.Post;
end;
end;
API (2006-02-24 19:15:00) [1]ему не нравится bmRe adWrite
Замените "bmRe adWrite" на "bmWrite".
(Пытаясь завести машину перочинным ножом...)
Desdechado (2006-02-24 18:25:00) [2]Вообще-то "ему не нравится bmRe adWrite" противоречит "fmOpenRead);-ошибка!!".
Играем дальше в угадайку?
Плохиш (2006-02-24 18:17:00) [3]
> VitV © (24.02.06 18:08) [2]
> ему не нравится bmRe adWrite
Хм, мне тоже не нравиться, а что это такое?
VitV (2006-02-24 18:08:00) [4]ему не нравится bmRe adWrite :(
Desdechado (2006-02-24 15:37:00) [5]а LoadFromFile не проще ли?
ps файл может быть заблокирован чем-то для монопольного доступа, и его нельзя даже для чтения открыть
| |
