打开WORD文档 ( 积分: 50 )

  • 主题发起人 主题发起人 lsglishiguang
  • 开始时间 开始时间
L

lsglishiguang

Unregistered / Unconfirmed
GUEST, unregistred user!
很简单,在一个按扭事件中打开一个WORD文档,供使用者浏览即可.
还有我用QUICKCHM做了个帮助文档,怎样在我的应用程序中打开他呢?
 
很简单,在一个按扭事件中打开一个WORD文档,供使用者浏览即可.
还有我用QUICKCHM做了个帮助文档,怎样在我的应用程序中打开他呢?
 
用webbrower,OleContainer,或者用SERVER组件!
 
打开帮助文件使用:
ShellExecute(0,Nil,Pchar(HelpPath),Nil,Nil,SW_NORMAL);
 
打开WORD文件使用:
shellexecute(handle,'open','f:/aa.doc',nil,nil,0);别忘了加上shellapi这个unit
 
HINSTANCE ShellExecute(

HWND hwnd, // handle to parent window
LPCTSTR lpOperation, // pointer to string that specifies operation to perform
LPCTSTR lpFile, // pointer to filename or folder name string
LPCTSTR lpParameters, // pointer to string that specifies executable-file parameters
LPCTSTR lpDirectory, // pointer to string that specifies default directory
INT nShowCmd // whether file is shown when opened
);
API帮助,可以看看
 
打开word文档:
WordObj : OleVariant;

try
WordObj:= GetActiveOleObject('Word.Application');

except
try
WordObj:= CreateOleObject('Word.Application');

except
ShowMessage('请确定Macrosoft Word正确安装');
exit;
end;

end;

WordObj.Documents.Open(FileName := '文件名称(包含路径)');
WordObj.WindowState := wdWindowStateMaximize;
//最大化
 
不好意思,一共只有50分,下次不吧,谢谢各位了
 
后退
顶部