谁有代码，给我看看。不胜感激！

begin
TempPath := 'POWERPNT.EXE';
TempParams := '/s "e:电信网管介绍.ppt"';
ShellExecute(Handle,'Open',PChar(TempPath),Pchar(TempParams),nil,SW_SHOWNORMAL);
end;


这是我打开ppt的代码！你可以变换一下打开word！！
注意这里的ppt“电信网管系统”我是放在e盘根目录下的哦！
同时，别忘了在uses中包含shellapi

TempPath := 'POWERPNT.EXE';
是不是要换成TempPath := 'word.EXE'啊？
可是不能执行啊！
变量TempPath是不是要定义成string类型？