with qry1,SQL do
begin
First;
while not qry1.Eof do
begin
FWord.Selection.Font.Name :='宋体'; ------------这些是属性
FWord.Selection.Font.Size :=20;
FWord.Selection.Font.Bold :=2;
FWord.Selection.paragraphs.Alignment := wdAlignParagraphCenter;
FWord.Selection.TypeText( qry1.FieldByName('fgt_no').AsString); -----------这句是添加文本
FWord.Selection.Typeparagraph;//换行
Next;
end;
end; 我想请问 我添加的是流 用哪个方法? FWord.Selection.TypeText( qry1.FieldByName('fgt_no').AsString); -----------这句是添加文本这些的属性 方法 我可以在哪里找到。delphi 里面好像.不出来的。
begin
First;
while not qry1.Eof do
begin
FWord.Selection.Font.Name :='宋体'; ------------这些是属性
FWord.Selection.Font.Size :=20;
FWord.Selection.Font.Bold :=2;
FWord.Selection.paragraphs.Alignment := wdAlignParagraphCenter;
FWord.Selection.TypeText( qry1.FieldByName('fgt_no').AsString); -----------这句是添加文本
FWord.Selection.Typeparagraph;//换行
Next;
end;
end; 我想请问 我添加的是流 用哪个方法? FWord.Selection.TypeText( qry1.FieldByName('fgt_no').AsString); -----------这句是添加文本这些的属性 方法 我可以在哪里找到。delphi 里面好像.不出来的。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货