Форум: "Начинающим";
Текущий архив: 2006.06.25;
Скачать: [xml.tar.bz2];
ВнизОшибка при создании потока!! Найти похожие ветки
← →
Vitv © (2006-06-03 00:05) [0]procedure TForm1.Button6Click(Sender: TObject);
var
blb, f: TStream;
begin
if not IBDataSet1.FieldByName("B").isNull then
begin
SaveDialog1.Execute;
blb:=IBDataSet1.CreateBlobStream(IBDataSet1.FieldByName("B"),bmRead);-ругается
на параетр bmread. Пробовал разные, но всё равно не пашет.
f := TFileStream.Create(SaveDialog1.FileName, fmCreate);
f.CopyFrom(blb, blb.Size);
f.Free;
blb.Free;
end
else
ShowMessage("Blob is empty");
end;
← →
Джо © (2006-06-03 00:08) [1]> bmRead
uses DB?
← →
VitV © (2006-06-05 11:58) [2]Спасибо!
← →
VitV © (2006-06-05 11:58) [3]Спасибо!
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.06.25;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.01 c