|
|
От: | Tsnec | |
| Дата: | 13.02.03 11:11 | ||
| Оценка: | |||
Wrd=CreateOleObject("Word.Application");
Variant currentDoc = Wrd.OlePropertyGet("ActiveDocument");
Variant Shapes = currentDoc.OlePropertyGet("Shapes");
Function AddPic("AddPicture");
Shapes.Exec( AddPic << WideString("Test.bmp"));
AddPic.ClearArgs();