Вниз
Скачать: CL | DM;

сохранить из olecontainer в ексел   Найти похожие ветки 

← →
LORN   (2005-12-05 17:20) [0]

загружаю в olecontainer ексел документ
olecontainer1.CreateObjectFromFile("C:\test.xls",false);
вношу в него необходимые изменения
как сохранить это документ
что то не выходит


← →
Набережных С. ©   (2005-12-05 20:53) [1]

SaveAsDocument?


← →
LORN   (2005-12-06 16:32) [2]

что то такая маза не проходит
по возможности напиши код который у тебя работает


← →
Набережных С. ©   (2005-12-06 21:20) [3]


> LORN   (06.12.05 16:32) [2]
> по возможности напиши код который у тебя работает

Уф-ф-ф...еле управился, лови:

procedure TForm1.Button1Click(Sender: TObject);
begin
 OleContainer1.CreateObjectFromFile("E:\Doc1.doc", false);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
 OleContainer1.SaveAsDocument("E:\Doc1.doc");
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
 OleContainer1.SaveAsDocument("E:\Doc2.doc");
end;

:))


← →
LORN   (2005-12-09 15:20) [4]

спасибо за код
я его раньше тоже пытался юзать но ничего не выходило
щас получилось
только один глюк есть
на кнопку с кодом <<OleContainer1.SaveAsDocument("E:\Doc1.doc");>> надо ДВА раза кликать , хотя процедура <<procedure TForm1.Button2Click(Sender: TObject);>>
что за хрень не знаю


← →
LORN   (2005-12-09 15:25) [5]

теперь всё работает с одного клика
procedure TForm1.Button3Enter(Sender: TObject);
begin
olecontainer1.SaveAsDocument("C:\www.xls");
showmessage("!!!!!!!!!!!!!!!!");
end;
во как



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c
2-1180442702
=Teddy=
2007-05-29 16:45
2007.06.17
Как установить компонент, если нет файла .bpl


2-1180076046
Gentos
2007-05-25 10:54
2007.06.17
Интерполяция функции


8-1159785652
kav01
2006-10-02 14:40
2007.06.17
Как очистить канву прозрачного компонента


15-1179745110
Knight
2007-05-21 14:58
2007.06.17
Первоначально было всего 4 конференции?


15-1179529496
Kostafey
2007-05-19 03:04
2007.06.17
Существуют готовые ли решения перевода числа в прописной вариант




   Наверх