есть задача - печатать в ворде список. я сделал свой стиль, теперь хочу назначить этому стилу формат списка. делаю как в макросе на басике - получаю listlevel:

Код

MyList = MSWord.Exec (PropertyGet("ListGalleries")).  Exec (Function("Item") << wdNumberGallery).  Exec (PropertyGet("ListTemplates")).  Exec (Function("Item") << 1).  Exec (PropertyGet("ListLevels")).  Exec (Function("Item") << 1);

далее связываем со своим стилем:

Код

MyAnswersList.Exec (PropertySet("LinkedStyle") << "_My style");

далее связываем стиль со списком:

Код

MyStyle.Exec (Procedure("LinkToListTemplate")  << MSWord.Exec (PropertyGet("ListGalleries")).       Exec (Function("Item") << wdNumberGallery).       Exec (PropertyGet("ListTemplates")).       Exec (Function("Item") << 2))  << 1;

но когда в форде на абзаце со стилем _My style я нажимаю правой кнопкой, выбираю "список", то прямоугольник стоит на последнем эл-те в галерее списков, т.е. связи с первым эл-м нет . но ведь я связывался с первым эл-м! это нужно для изменения св-ва списка - иногда его нужно начинать сначала. в макросе это делается заданием св-ва StartAt в единицу у стиля списка под нужным номером

Я не понял - ты в Basiс - е пишешь чтоль? Если так, то тебе в другой раздел, иначе покажи Дельфовый код.

<Spawn>
это билдер, практически дельфи. их часто в одном разделе форума помещают, а тут разделение

Код

MyList = MSWord.ListGalleries.Item(wdNumberGallery).ListTemplates.Item(1).ListLevels.Item(1); ... MyAnswersList.LinkedStyle := "_My style"; ... MyStyle.LinkToListTemplate(MSWord.ListGalleries.Item(wdNumberGallery).ListTemplates.Item(1), (1);