| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Не удается записать в TBlobField произвольный файл [D5]
REP © (2004-08-13 09:43:00)Код такой:
procedure TfrmMain.Button2Click(Sender: TObject);
Var
F:TFileStream;
BF:TBlobField;
begin
IF OD.Execute Then begin
BF:=TBlobField.Create(Nil);
F:=TFileStream.Create(OD.FileName,fmOpenRead);
Try
BF.LoadFromStream(F); //Здесь вылезает AV
Finally
BF.Free;
F.Free;
end;
end;
end;
OD=TOpenDialog
Спасибо.
REP (2004-08-13 11:31:00) [1]Я думал передать через параметры.
Выкрутился как:
ADOQ.Parameters.ParamByName('pDoc').LoadFromStream(F,ftBlob);
Но меня смущает, почему нельзя загрузить в переменную такого типа?
Desdechado (2004-08-13 10:55:00) [2]используй dataset.createblobstream
| |
