var
//变体变量
VarWord:Variant; //打开Word
VarWord:=CreateOleObject('Word.Application');
//显示Word
VarWord.visible:=True;
//添加新Word文件
VarWord.Documents.Add;
//显示保存当前WORD文档
try VarWord.Documents.Item(1).Save; except end;
//变体变量
VarWord:Variant; //打开Word
VarWord:=CreateOleObject('Word.Application');
//显示Word
VarWord.visible:=True;
//添加新Word文件
VarWord.Documents.Add;
//显示保存当前WORD文档
try VarWord.Documents.Item(1).Save; except end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货