delphi中如何打开新的word文档
1.按下面的方法打开word,但是没有新文档,得自己新建,能不能自动生成一个新文档.
2.打开word的时候,程序界面也跳出来了,能不能让它在word后,或者最小化
Delphi(Pascal) code:
uses comobj;
procedure TForm1.word1Click(Sender: TObject);
var Word: Variant;
begin
try
Word := CreateOLEObject('Word.Application');
Word.Visible := true;
except
Showmessage('初始化word失败，可能没装word，或者其他错误；请重起再试。');
word.DisplayAlerts := false;//是否提示存盘
word.Quit;//如果出错则退出
exit;
end;
Application.Restore;
Application.BringToFront;
end;
谢谢楼上的,孩子好漂亮
这样一来,第二个问题就没有了,但是excel在调用的时候,excel工作表出来了,接着程序界面也出来了呢,不知道大家有没有遇到这种情况.
Word.Documents.Add;
什么意思 解释一下
楼组excel 这样行不
Excel.Documents.Add;
excel的话：
Excel.Workbooks.Add
mark
相关问答：
我安装的是企业版。。。
我问下， CTRL+左键 能查看 windows.pas 吗？
就是 接口里的windows。
当然可以,CTRL+左键点击Interface部分的Windows就可以了
啥啥企业版？去安装目录看看lib文件夹下有没� ......
就是一个服务端和一个客户端，里边有一些共用单元 ，我在 工程的SEARCH PATH里设置的路径，
里边有个结构体，我在服务端打开，加了成员，但是我在客户端其他单元访问不到我新加的，我在客户端打开那个单元，确实加� ......
接收到的文本内容是ucs2编码格式，请问怎样转换成中文
按我的理解，UCS-2是字符集，具体的编码有UTF-8，UTF-16 (LE/BE)等。
如果你用Delphi 2009及以上版本，可以看看TEncoding类。
btw. 你说的转换成中文是啥意� ......
delphi 2007 + access 2007 +odbc +TADODataset,TADOConnection,TADOCommand
//删除数据
procedure TCDSSelectTools.DeleteMachine(byMachineID: string);
tmpCmd := TADOCommand.Create(ni ......
