![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Запись и чтение книги Excel из БД Paradox
O?O © (2003-05-07 13:54:00)Как сохранить книги Excel или документ Word непосредственно в БД, и так-же открыть его ?
WarLord (2003-05-08 10:10:00) [1]Пример:
procedure TForm1.Button1Click(Sender: TObject);
begin
if not OpenDialog1.Execute then exit;
with Query2 do
begin
SQL.Clear;
SQL.Add("INSERT INTO DOCTYP_DETAL");
SQL.Add("VALUES(:DOC_TYPID,:SHABLONINS)");
Parameters.ParamByName("DOC_TYPID").Value:=Query1.RecordCount+1;
Parameters.ParamByName("SHABLONINS").LoadFromFile(OpenDialog1.FileName, fTBlob);
ExecSQL;
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
//Query1ShablonIns: TBlobField
begin
if not Query1.Active then exit;
Query1ShablonIns.SaveToFile("temp.doc");
OleContainer1.CreateObjectFromFile("temp.doc",false);
end;
WarLord (2003-05-08 09:32:00) [2]Используй для хранения файлов поле типа OLE
O?O (2003-05-08 06:03:00) [3]Никто не сталкивался?