00问答网
所有问题
当前搜索:
delphi将Word文档分段
如何在
Delphi
中使用Ole操作
Word
-CSDN论坛
答:
一. 定义word应用程序,文档对象,比如:wordApp: OleVariant;wordDoc: OleVariant;二. 打开
word文档
wordApp := CreateOleObject('Word.Application');wordDoc := WordApp.Documents.Open(FileName:=filename,ReadOnly:= false, Revert:=True, Visible:= True);WordApp.Visible := false;三.表格插入...
我想在
Delphi
程序中直接调用
Word 文档
并使用 Word 的功能,这个程序...
答:
//方法二的参数可以直接使用
Delphi 的
数据类型。其它方法只能使用 OleVariant 类型.Ole := CreateOleObject('
Word
.Application');Ole.Application.Visible := true;NewDoc := Ole.Documents.Add('C:\abc.dot');DocTable := NewDoc.Tables.Item(1);DocTable.Cell(1,3).Range.Text := 'Hello!'...
如何用
DELPHI
中的
WORD
控件
答:
begin T.cell(i,j+1).range.text:=ADOQuery1.Fields[j].AsString;inc(j);end;inc(i);ADOQuery1.Next;end;--- 在
Word
中用宏来画表格,然后
把
它的语句copy下来!在
Delphi的
OLE中调用就可以了!
如何用
delphi的
OLEContainer操控MS
Word
答:
procedure TForm1.Button1Click(Sender: TObject);var wd,du:OLEVariant;begin wd:=CreateOleObject('Word.Application');//建立WinWord对像 du:=wd.Documents.Open('e:\a.doc'); //打开
Word文档
ShowMessage(String(wd.ActiveDocument.Name));//显示打开的文档名称 //以下可以插入你自己的...
怎样用
delphi
编写内嵌的读写
word
的编辑器
答:
Step1: 创建
Word
Application对象,如下: 函数CreateCOMObject将根据指定的ClassID创建对应的COM自动对象,声明如下: //unit COMObj function CreateCOMObject(const ClassID: TGUID): IUnknown; 在本例中,我们创建WordApplication对象的代码..
在
delphi
中如何内嵌
word
?
答:
// 创建新文档 procedure TfmMain.btNewDocClick(Sender: TObject);var DocTemplate,NewTemplate : OleVariant;begin Start
Word
App;DocTemplate := UnAssigned; // 打开新文档时使用的模板 NewTemplate := False; // 是否
将文档
作为模板打开 WordApp.Documents.Add(DocTemplate,NewTemplate);end;...
简单的
word
界面用
delphi
怎么做
答:
下载这套组建:DevExpress,安装,窗体添加dxRibbon组建即可
delphi
中dde的四个组件简单使用
答:
首先,在开发工具的选择上,选择了提供有现成的DDE 系列组件的 Borland
Delphi
5.0。既然以Microsoft
Word
作为要连接的服务器,在与其建立连接之前要先设定好连接的服务与主题,由于本例只要求通过本程序控制Word的一些操作动作,如打开新
文件
、关闭文件、插入表格等等,所以可以分别设定这两项为:"Winword"...
如何在
delphi
中和当前运行的
word
进行交互
答:
delphi
调用
word
打开一个
文档
,兼容性比较好的办法,是使用 oleObject 来调用本机安装的 word,示例代码如下:procedure TForm1.Button1Click(Sender: TObject);var MS
Word
: Variant;begin MSWord := CreateOLEObject('Word.Application');//连接Word MSWord.Documents.Open(FileName:='D:\Temp\...
Delphi
IDTcpServer 如何实现向指定的Client 发送数据
答:
//将数据
分段
发送 if iLength>iBYTEPERSEND then iLength:=iBYTEPERSEND; GetMem(bufSend,iLength+1); try //读取
文件
流数据 fsSend.Read(bufSend^,iLength); //发送长度为iLength的数据 Socket.SendBuf(bufSend^,iLength); //进度条显示 Probar.Position:=fsSend.Position; finally //释放内存 FreeMem...
<涓婁竴椤
1
2
3
4
5
6
7
8
9
10
涓嬩竴椤
灏鹃〉
其他人还搜