H hthugm Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-11 #1 []delphi正在给WORD传送数据时(WORD可见) ,这是我不想传数据了, 点击WORD的关闭按钮, 为何机器‘黑屏‘ ,之后出现系统正忙请按任一键, 我的程序中断,请高手不惜指教。
C ccgaosong Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-12 #2 WordApplication的onquit事件中添加 var SaveChanges, OriginalFormat, RouteDocument: OleVariant; begin SaveChanges := WdDoNotSaveChanges; OriginalFormat := UnAssigned; RouteDocument := UnAssigned; try WordApplication1.Quit(SaveChanges, OriginalFormat, RouteDocument); WordApplication1.Disconnect; except on E: Exception do begin Showmessage(E.Message); WordApplication1.Disconnect; end; end; end;
WordApplication的onquit事件中添加 var SaveChanges, OriginalFormat, RouteDocument: OleVariant; begin SaveChanges := WdDoNotSaveChanges; OriginalFormat := UnAssigned; RouteDocument := UnAssigned; try WordApplication1.Quit(SaveChanges, OriginalFormat, RouteDocument); WordApplication1.Disconnect; except on E: Exception do begin Showmessage(E.Message); WordApplication1.Disconnect; end; end; end;
H hthugm Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-12 #3 ccgaosong 谢谢! 因为我用OLE自动化而不是用控件而且要传的数据很多,故用线程来做的(如果不用线程是不 会出现这种情况的),而且在Execute里面用 myword:=createOleobject('word.Application'); myWord.visible:=True; WORD不显示出来。必须在这个线程之外还要有一个线程在运行,为什么?请指教。
ccgaosong 谢谢! 因为我用OLE自动化而不是用控件而且要传的数据很多,故用线程来做的(如果不用线程是不 会出现这种情况的),而且在Execute里面用 myword:=createOleobject('word.Application'); myWord.visible:=True; WORD不显示出来。必须在这个线程之外还要有一个线程在运行,为什么?请指教。
D drummer Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-12 #4 太費事了吧還用線程啊﹐有此必要否 可能是兩個線程互七沒處理好
D drummer Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-12 #5 分給我﹐結束問題﹐好不好? [][][][][][][] [][][][][][][]