5,930
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
wzt1048 2002-05-12
- 打赏
- 举报
应该是shellexecute,可是我试了提示这句有错误：
[Error] Unit1.pas(30): Incompatible types: 'HWND' and 'PChar'
[Error] Unit1.pas(30): Incompatible types: 'Integer' and 'PChar'
到底要怎么做呢？
用WORD application 控件怎么做呢？
[Error] Unit1.pas(30): Incompatible types: 'HWND' and 'PChar'
[Error] Unit1.pas(30): Incompatible types: 'Integer' and 'PChar'
到底要怎么做呢？
用WORD application 控件怎么做呢？
dong163 2002-05-11
- 打赏
- 举报
WinEXec()
Uses Shellapi
ShellExcute(PChar('winword.exe'),nil,nil,sw_Normal,0);
Uses Shellapi
ShellExcute(PChar('winword.exe'),nil,nil,sw_Normal,0);
wzt1048 2002-05-11
- 打赏
- 举报
那么请教,怎么调用WORD呢?那里有OFFICE2000,WORD2000 单元的参考呢?谢谢
syfmoon 2002-05-11
- 打赏
- 举报
谢谢
chechy 2002-05-11
- 打赏
- 举报
从Servers页中拖一个PowerPointApplication，然后再uses中加上office2000，写下列代码：
procedure TForm1.Button4Click(Sender: TObject);
begin
PowerPointApplication1.Connect;
PowerPointApplication1.Visible := msoTrue;
end;
procedure TForm1.Button4Click(Sender: TObject);
begin
PowerPointApplication1.Connect;
PowerPointApplication1.Visible := msoTrue;
end;
