Z zwqljh Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-28 #1 小弟现在做一个文件管理自动化，事先已经把文件名，文件内容简要，文件路径存入数据库 然后通过调用word和excel来打开文档，请问大侠怎样才能实现？谢谢！
Y yangkee Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-28 #2 简单啊，用shellexecute就可以了 用shellexecute为关键字在大富翁里查一下
Y yth Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-28 #3 ShellExecute( hwmd, //父窗口句柄 LPCSTR lpszOp;//要执行操作窜的地址 可以为open ,print默认为open LPCSTR lpszFile;//文件名窜的地址 LPCSTR lpszParams;//执行文件串的地址 LPCSTR lpszDir;//默认目录串的地址 int fsShowCmd;//打开时文件是否显示 ); 只要 ShellExeCute(Application.handle,'open','c:/documents/abc.doc',nil,nil,sw_ShowNormal);
ShellExecute( hwmd, //父窗口句柄 LPCSTR lpszOp;//要执行操作窜的地址 可以为open ,print默认为open LPCSTR lpszFile;//文件名窜的地址 LPCSTR lpszParams;//执行文件串的地址 LPCSTR lpszDir;//默认目录串的地址 int fsShowCmd;//打开时文件是否显示 ); 只要 ShellExeCute(Application.handle,'open','c:/documents/abc.doc',nil,nil,sw_ShowNormal);
卷 卷起千堆雪tyn Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-28 #4 ShellExecute(GetDeskTopWindow, 'open', '你要打开的文件的路径', nil, nil, 0);
W wantlong Unregistered / Unconfirmed GUEST, unregistred user! 2001-04-28 #5 //... Uses ComObj; //... var WordApp:Variant; begin try WordApp:= CreateOleObject('Word.Application');//创建Word对象 except ShowMessage('程序无法打开Word,请安装Word97或Word97以上的版本！'); Exit; end; WordApp.Visible:=True;//可见 WordApp.WindowState:=1;//窗体最大化 WordApp.Documents.Open(ExtractFilePath(Application.ExeName)+'/Temp.doc');//打开文档 end; //有问题和我联系，wantlong@263.net
//... Uses ComObj; //... var WordApp:Variant; begin try WordApp:= CreateOleObject('Word.Application');//创建Word对象 except ShowMessage('程序无法打开Word,请安装Word97或Word97以上的版本！'); Exit; end; WordApp.Visible:=True;//可见 WordApp.WindowState:=1;//窗体最大化 WordApp.Documents.Open(ExtractFilePath(Application.ExeName)+'/Temp.doc');//打开文档 end; //有问题和我联系，wantlong@263.net
无 无粮野鹤 Unregistered / Unconfirmed GUEST, unregistred user! 2001-05-04 #6 介绍一个网页给你，是Charles Calvert所著共8页 (1)“Automating Excel and Word”---- http://community.borland.com/article/0,1410,10126,00.html 及 (2)“Delphi and Word Part II”---- http://community.borland.com/article/0,1410,10043,00.html
介绍一个网页给你，是Charles Calvert所著共8页 (1)“Automating Excel and Word”---- http://community.borland.com/article/0,1410,10126,00.html 及 (2)“Delphi and Word Part II”---- http://community.borland.com/article/0,1410,10043,00.html
