请求高手帮忙解决

Question

我现在再做一个教务管理系统，其中有许多教学计划，要求用word编写，就是提供一共几个按钮（新建，打开等），这些教学计划要保存在数据库中，点名称的时候打开，这个怎么做？

Answer 1

//新建var
  vtemp,myworkbook:olevariant;
begin
  try
    vtemp:=createoleobject('word.application');
    myworkbook:=vtemp.documents.add;
    vtemp.visible:=true;
  finally
    myworkbook:=null;
    vtemp:=null;
  end;
end;//打开
var
  vtemp,myworkbook:olevariant;
begin
  try
    vtemp:=createoleobject('word.application');
    myworkbook:=vtemp.documents.open('filename');
    vtemp.visible:=true;
  finally
    myworkbook:=null;
    vtemp:=null;
  end;
end;end;

Answer 2

pppppppppppppppppppppppppppp
pppppppppppppppppppppppppppp
pppppppppppppppppppppppppppp
pppppppppppppppppppppppppppp
pppppppppppppppppppppppppppp
pppppppppppppppppppppppppppp
pppppppppppppppppppppppppppp
pppppppppppppppppppppppppppp
pppppppppppppppppppppppppppp
pppppppppppppppppppppppppppp
pppppppppppppppppppppppppppp
pppppppppppppppppppppppppppp