用Delphi启动Word模板文件，修改后，保存时和Word文档保存一样。没有起到模板的作用，请高手指点迷经。(26分)

procedure Tkjgl_ktlx_sjwh_frm.FlatSpeedButton1Click(Sender: TObject);
var
path : string;
begin
path :=ExtractFilepath(application.ExeName);
path :=path+'word/' ;
open.InitialDir :=path ;
open.FileName :='科技项目合同书.dot';
if open.Execute then
begin
showmessage(open.FileName);
{ v_app:=CreateOleObject('Word.Application');
v_app.visible:=true;
v_app.documents.open(open.FileName)}
ShellExecute(handle,'open',pchar(open.FileName),nil,nil,SW_SHOWNORMAL);
end;
end;