Уважаемые разработчики!
Вопрос про сохранение файла из blob поля,
бьюсь уже не мало времени
для сохранения взял примерчик и написал —
procedure TForm1.Button2Click(Sender: TObject);
var
blb, f: TStream;
begin
if not IBTable1.FieldByName('DATA').isNull then
begin
SaveDialog1.Execute;
blb:=IBTable1.CreateBlobStream(IBTable1.FieldByName('DATA'),bmRead);
f := TFileStream.Create(SaveDialog1.FileName, fmCreate);
f.CopyFrom(blb, blb.Size);
f.Free;
blb.Free;
end
else
ShowMessage('Blob is empty');
end;
так вот сохраняет он вордовский файл, но при его открытии ворд никак не может определить кодировку, квадратики там заместо буковок. В базе данные корректные, так как в olecontainer документики открываются. Пробовал и через filestream и blobstream, тоже самое происходит.
Заранее благодарю.