Поиск определенного слова в Word и загрузка его в массив

[KBO]

Доброго времени суток форумчане, помогите пожалуста. Вопрос:
Есть док-т Word (примером 20 стр), неизвестно на каких страницах, есть слова , например:
"Наименование: Стулья",
"Наименование: Столы",
"Наименование: Табуретки", и т.д.
Мне нужно загнать эти словосочетания ("Наименование: ....",) в динамический массив, но мне сначало необходимо их найти во ВСЕМ документе.
Существет следующая модель:

var str1: string;
a1, b1: olevariant;
Words_Templs: variant;
...
Words_Templs.Selection.Find.ClearFormatting;
//    With Words_Templs.Selection.Find
        Words_Templs.Selection.Find.Text := 'Наименование';
        Words_Templs.Selection.Find.Replacement.Text := '';
        Words_Templs.Selection.Find.Forward := True;
        Words_Templs.Selection.Find.Wrap := wdFindContinue;
        Words_Templs.Selection.Find.Format := False;
        Words_Templs.Selection.Find.MatchCase := False;
        Words_Templs.Selection.Find.MatchWholeWord := False;
        Words_Templs.Selection.Find.MatchWildcards := False;
        Words_Templs.Selection.Find.MatchSoundsLike := False;
        Words_Templs.Selection.Find.MatchAllWordForms := False;
//    End With
    Words_Templs.Selection.Find.Execute;
    a1 := wdLine;
    b1 := wdExtend;
    Words_Templs.Selection.EndKey(a1, b1);
    str1 := Words_Templs.Selection.Text;
    ...

этот код находит только первое вхождение "Наименование..." и другие не ищет,
и я не знаю, в каком месте заполнять динамический массив, но так чтобы там были все наименования, даже если они одинаковые

Заранее Спасибо.