社区
Delphi
帖子详情
如何在线程中使用OLE自动化---急急急!!!
little_boy
2000-02-14 05:33:00
各位: 我在编程时,需要在线程中使用OLE自动化,比如在线程中利用OLE自动化建立一个WORD文档。但老是不成功。请各位高手指教!
...全文
244
11
打赏
收藏
如何在线程中使用OLE自动化---急急急!!!
各位: 我在编程时,需要在线程中使用OLE自动化,比如在线程中利用OLE自动化建立一个WORD文档。但老是不成功。请各位高手指教!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
11 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
netmare
2000-02-15
打赏
举报
回复
你必须在每个线程中先执行coinitialize/oleinitialize,然后才可以进行ole操作,这是ole要求的.
netmare
2000-02-15
打赏
举报
回复
Zhong说的对
Zhong
2000-02-15
打赏
举报
回复
uses ..., ActiveX, ...
Lin
2000-02-15
打赏
举报
回复
uses ..., ComObj, ...
new_power
2000-02-15
打赏
举报
回复
具体情况:
1。在主线程中创建一个TThread对象。
2。在TThread对象的Execute 方法中为以下代码:
procedure Execute;
var
V:variant;
begin
V:=createOleobject('Word.Basic');
V.filenew('normal');
V.insert('hello');
V.filesaveas('c:\test.doc');
end;
3.程序运行后,当创建Thread时,出现错误,说"coinitialize未初始化"
请问有什么方法解决!
越具体有效分越高!!!
little_boy
2000-02-15
打赏
举报
回复
这个我知道,但我不知道说明这个函数的文件是什么,即需在uses 中引用什么?
netmare
2000-02-15
打赏
举报
回复
coinitialize(0)即可
另外,别忘了线程结束前别忘了CoUninitialize( )
little_boy
2000-02-15
打赏
举报
回复
如何调用coinitialize/oleinitialize?
Firing_Sky
2000-02-14
打赏
举报
回复
创建一个TThread对象,继承它的Create()方法,在Create事件里用CreateOleObject……
Lin
2000-02-14
打赏
举报
回复
熟悉VBA和Variant变量吗?如下所示:
procedure TForm1.FormCreate(Sender: TObject);
var ole1: Variant;
begin
ole1 := CreateOleObject('Word.Document');
ole1.SaveAs('1234.doc');
end;
将产生一个文档1234.doc,虽然空空如也!
kxy
2000-02-14
打赏
举报
回复
请具体一些:)
技术
2011.10.9异步与多
线程
的
使用
场景 当需要执行I/O操作时,
使用
异步操作比
使用
线程
+同步 I/O操作更合适。I/O操作不仅包括了直接的文件、网络的读写,还包括数据库操作、Web Service、HttpRequest以及.net Remoting等跨进程的调用。而
线程
的适用范围则是那种需要长时间CPU运算的场合,例如耗时较长的图形处理和算法执行。但是往 往由于
使用
线程
编程
WEB开发文档2 总结
转自:http://blog.donews.com/lvjiyong/archive/2006/06/29/931071.aspx怎样将后台生成的在内存
中
的图象显示到客户端Microsoft IE WebControls下载地址如何在DATAGRID
中
使用
JAVASCRIPT脚本控制DataGrid
中
连接到下一页显示数据下载
中
文名文件时保存文件名乱码问题关于用ASP.net绘图的问题,请大虾指教那
关于一个用VB编写的PING工具的问题
我在互联网上找到一个用VB编写的程序,是PING一个计算机的IP是否能通的工具,我改了改,
使用
ADO重数据库
中
循环读取IP地址,并将测试后的状态写入到数据库,作完后运行是可以测试,但是速度太慢了,每循环测试一个IP地址都需要接近1秒的时间,如果IP多的话时间就太长了,有其他办法让测试时间缩短吗?多
线程
如何做呢?谢谢各位帮忙!!! VB代码: Option Explicit Private...
数据库帖子收集
这样的数据列表在存储过程
中
应该怎么样选择得到? 请问造成SQL2000服务不能启动的原因有哪些? sql server
中
有無類似于if 的函數,即像這樣select if(cancel=1,'cancel','') from sales 这样怎么返回呀!!!!记录集的返回。。 谁能跟我说说期初库存怎么样的一个业务逻辑!都要处理哪些内容!需要每月进...
基础
各位兄弟,在SDK编程
中
如果实现窗口分割呢?请问怎么得到一个函数的执行时间,单位毫秒!如何调试asp组件呀。用vc++调试编制的组件怎样画一个箭头?高分请教如何限制程序运行的方法?求助:通过编程DirectX抓屏
---
---
>masterz:再麻烦你一下,谢谢熟悉RichEdit的朋友过来看一下,RichEdit的几个问题.如何对 I/O 端口进行操作?有了该问题就有了思考(100分 献礼!)如何
Delphi
5,388
社区成员
262,730
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章