| 技术论坛 |
|
|
| ≡技术区≡ ① |
| DELPHI技术 |
| lazarus/fpc/Free Pascal |
| 移动应用开发 |
| Web应用开发 |
| 数据库专区 |
| 报表专区 |
| 网络通讯 |
| 开源项目 |
| 论坛精华贴 |
| ≡发布区≡ ② |
| 发布代码 |
| 发布控件 |
| 文档资料 |
| 经典工具 |
| ≡事务区≡ ③ |
| 网站意见 |
| 盒子之家 |
| 招聘应聘 |
| 信息交换 |
| 论坛信息 |
|||
|
| 导航： | 论坛 -> DELPHI技术 斑竹:liumazi,sephil | |||||
| 作者： |
|
2004/3/1 9:59:37 | ||||
| 标题： |
|
加入我的收藏 | ||||
| 楼主： | 要用DELPHI调用WORD打开文件，照API说明，一点不差地写出来，出错：（ ======以下是声明======== var FileName, ConfirmConversions, ReadOnly, addToRecentFiles,Passworddocument． PasswordTemplate, Revert,WritePassworddocument． WritePasswordTemplate, Format, Visible, OpenConflictdocument．OpenAndRepair, document．irection, NoEncodingDialog: OleVariant; ========以下是变量赋值========= FileName := dlgOpen.FileName; //dlgOpen是“Opendialog”控件 ConfirmConversions := False; ReadOnly := False; AddToRecentFiles := False; Passworddocument．nbsp:= '; PasswordTemplate := '; Revert := True; WritePassworddocument．nbsp:= '; WritePasswordTemplate := '; Format := wdOpenFormatdocument． Visible:=true; OpenConflictdocument．=true; openandrepair:=true; document．irection:=wdLeftToRight; noencodingdialog:=false; =======以下是函数调用======== wordapplication1.document．.Open(FileName, ConfirmConversions, ReadOnly, AddToRecentFiles, Passworddocument． PasswordTemplate, Revert, WritePassworddocument． WritePasswordTemplate, Format, Visible, OpenConflictdocument． OpenAndRepair, document．irection, NoEncodingDialog); ================ 运行，出现‘types of actual and formal var parameters must be identical’错误，光标在visible后面闪动。 如果不加Visible参数，又会说 not enough actual parameters ---------------------------------------------- - |
|||||
| 作者： |
|
2004/3/1 23:08:48 | ||||
| 1楼： | wordapplication.document.open()弄得我一点脾气都没有了,不管怎么参照API说明加参数都不给一点面子. 请问哪位朋友有做过这方面的程序?给我发个例子看看,谢谢了 !能指点一下这个函数怎么用更是感激不尽! GOOGLE搜到的那个"DELPHI+WORD=数据库+公文处理"的文章就免了,确实没法通过,试N次了555555555 ---------------------------------------------- - |
|||||
| 作者： |
|
2004/3/2 14:17:18 | ||||
| 2楼： | 可以试试Servers 下的 Wordapplication 控件，也可采用 Ole 方式啊，若想用程序灵活控制word，可用 CreateOleObject('word.application')来编辑，那样只需调用常用方法或VBA 宏就很好用的，看你具体的需要了 ---------------------------------------------- - |
|||||
| 作者： |
|
2004/3/2 15:34:46 | ||||
| 3楼： | 对这个‘DELPHI+WORD=数据库+公文处理’也是不可以直接用的，你要在ｏｐｅｎ最后边还要加两个参数，这两个参数看ａｐｉ的提示，先定义，不用付值，再把它写到ｏｐｅｎ的参数中就可以了， 再不行，我给你发个例子 ---------------------------------------------- - |
|||||
| 作者： |
|
2004/3/2 19:39:02 | ||||
| 4楼： | 如果有例子请发到 shanghai83@zj165.com ---------------------------------------------- - |
|||||
| 作者： |
|
2004/3/3 18:17:26 | ||||
| 5楼： | 谢谢 启明星 同志：） 给偶发一个例子吧，mail: mengates@yahoo.com.cn  ---------------------------------------------- - |
|||||
| 作者： |
|
2004/3/3 18:23:18 | ||||
| 6楼： | 我把所有参数都完全按照API说明声明了，可就是“types of actual and formal var parameters must be identical” 郁闷 期待启明星的例子ing ---------------------------------------------- - |
|||||
| 作者： |
|
2004/3/3 19:11:15 | ||||
| 7楼： | 偶也要！ ----------------------------------------------  
|
|||||
| 作者： |
|
2004/3/4 17:59:04 | ||||
| 8楼： | 呼叫启明星.... 急 急 急 急需例子救命啊 ---------------------------------------------- - |
|||||
| 作者： |
|
2004/3/5 10:18:56 | ||||
| 9楼： | HELP 哪位知道该怎么弄啊 ---------------------------------------------- - |
|||||
| 作者： |
|
2004/3/5 14:12:21 | ||||
| 10楼： | procedure TForm1.Button1Click(Sender: Tobject); var MSWord: Variant; begin MSWord := CreateOLEObject('Word.Application');//连接Word ,须要在use后加ComObj MSWord.Documents.Open(FileName:='d:\test.doc', ReadOnly:=True);//打开外部Word文档 MSWord.Visible := 1;//是否显示文件编辑 end; 一位高手教我的。 ---------------------------------------------- - |
|||||
| 作者： |
|
2004/3/5 15:00:41 | ||||
| 11楼： | 啊哈！ 多谢多谢！ 太有用了  ---------------------------------------------- - |
|||||
| 信息 |
| 登陆以后才能回复 |
