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

Как сделать, чтобы после закрытия приложения не закрывался Word?   Найти похожие ветки 

← →
lovres ©   (2002-09-27 15:32) [0]

После закрытия приложения закрывается Word(я использую компоненты WordApplication & WordDocument). Перетыкал все св-ва - не помогает, помогите советом как решить эту проблемму?


← →
qube ©   (2002-09-27 15:36) [1]

AutoQuit должно помогать, по идее


← →
lovres ©   (2002-09-27 15:48) [2]

Пробовал и true и false - не помогло.
По идее должно быть просто, но как?


← →
lovres ©   (2002-09-30 14:40) [3]

Подскажите, а?


← →
lovres ©   (2002-10-06 16:46) [4]

ну, снизойдите


← →
Ученик ©   (2002-10-06 17:20) [5]

>lovres © (27.09.02 15:32)
Тестовый пример не набросаешь ?


← →
lovres ©   (2002-10-11 10:35) [6]

Тестовый пример:

procedure TITRP.SpeedButton4Click(Sender: TObject);
var
FileName,InvoiceTemplate:oleVariant;
Word1:variant;
begin
WordApplication1.Connect;
WordApplication1.Visible := true;
InvoiceTemplate := ExtractFilePath(Application.ExeName) + "отчёты\shablon.doc";
WordApplication1.Documents.Open(InvoiceTemplate,EmptyParam,EmptyParam,EmptyParam
,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam);
WordDocument1.ConnectKind:=ckAttachToInterface;
WordDocument1.ConnectTo(WordApplication1.ActiveDocument);

WordGotoBookmark("zak1");
WordInsertText(nameuser);

WordGotoBookmark("zak2");
WordInsertText(usergroup);

WordGotoBookmark("zak3");
WordInsertText(nazvtemi);


WordGotoBookmark("zak5");
WordInsertText(datetimetostr(daykogda));

FileName:=GetCurrentDir+"\отчёты\"+nameuser+inttostr(nomertemi)+".doc";
WordDocument1.SaveAs(FileName);
end;


← →
lovres ©   (2002-10-16 15:47) [7]

Что можете сказать?


← →
TTCustomDelphiMaster ©   (2002-10-16 22:23) [8]

У меня не закрывается.


← →
Delphist   (2002-10-16 23:14) [9]

>Как сделать, чтобы после закрытия приложения не закрывался Word?

Попробуй не закрывать свое приложение. Рано или поздно Ворд зависнет и вот тогда-то его хрен чем закроеш.



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

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



Память: 0.46 MB
Время: 0.014 c
3-92376
Maik
2002-10-07 18:30
2002.10.28
Список активных пользователей


6-92632
klik
2002-08-27 14:28
2002.10.28
NMMSGServ


1-92448
Sego
2002-10-15 14:46
2002.10.28
Twebbrowser ?


1-92593
dim-
2002-10-16 22:48
2002.10.28
Как определить, что ListView был изменен


4-92804
Velocity
2002-09-16 11:44
2002.10.28
Резиденты




   Наверх