проблемы решил, дело было как всегда в моей тупости и с БД не имело никакой связи.
Но теперь появилсь проблема, при нажатии на кнопку
Код:
procedure TfmMain.BitBtn5Click(Sender: TObject);
begin
sdstemp2.Post;
sdstemp2.ApplyUpdates(0);
sdstemp2.Refresh;
statusbar1.Panels[0].Text:='документ загружен';
end;
почему-то отказывается работать процедура открытия файла из BLOB-ячейки. Хотя до её нажатия работает прекрасно.
Код:
procedure TfmMain.BitBtn1Click(Sender: TObject);
var
ptkwrd:Tmemorystream;
begin
ptkwrd:= Tmemorystream.Create;
try
tblobfield(sdstemp2.FieldByName('document')).SaveToStream(ptkwrd);
ptkwrd.Position:=0;
ptkwrd.SaveToFile('tmp/temp_document.doc');
shellexecute(Handle, 'open','tmp/temp_document.doc',nil,nil,SW_SHOWNORMAL);
finally
ptkwrd.Free;
end;
end;
вот ошибка
