领测软件测试网
I kS-GfAPv1~"lEq6ch2s WordFont1.ConnectTo(WordApplication1.Selection.Paragraphs.Item(1).Range.Font);
NSBx4}vsD WordFont1.Bold:=integer(true);
软件测试技术网&?)l
jw*OA
r WordFont1.Size:=16;
软件测试技术网)p\
Myr 软件测试技术网*w G)Jqv(Ld%Xomd4S4y //-----------------------------粘贴图形-------------------------//
:TL2EY;Qk? Image1.Picture.SaveToClipboardFormat(MyFormat,AData,APalette);
软件测试技术网&rWo