看过一段代码
NewTemplate := DocFileNameWithPath;
NoneTemplate := EmptyParam;
dataform.WordApplication1.Connect;
dataform.WordApplication1.Visible:=true;
MyDoc:=dataform.WordApplication1.Documents.Add(NewTemplate,NoneTemplate);MyDoc.BookMarks.Item('SBND_1').Select;
dataform.WordApplication1.Selection.Text := SB_Year;MyDoc.BookMarks.Item('XMBH').Select;
dataform.WordApplication1.Selection.Text := dataform.Query2.fieldbyname('BH').asstring
但是其中的 nweTemplate
mydoc 还有路径等 怎么定义 3q大家
NewTemplate := DocFileNameWithPath;
NoneTemplate := EmptyParam;
dataform.WordApplication1.Connect;
dataform.WordApplication1.Visible:=true;
MyDoc:=dataform.WordApplication1.Documents.Add(NewTemplate,NoneTemplate);MyDoc.BookMarks.Item('SBND_1').Select;
dataform.WordApplication1.Selection.Text := SB_Year;MyDoc.BookMarks.Item('XMBH').Select;
dataform.WordApplication1.Selection.Text := dataform.Query2.fieldbyname('BH').asstring
但是其中的 nweTemplate
mydoc 还有路径等 怎么定义 3q大家
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货