2
Я пытаюсь заменить текст в нижнем колонтитуле, я использую следующий код, через который я могу заменить обычный контент (тело), но не содержимое нижнего колонтитула/заголовокНевозможно заменить текст нижнего колонтитула в текстовом приложении через Delphi
myWinWordApp := CreateOLEObject('Word.Application');
myWinWordApp.visible := true;
myWinWordApp.documents.open('c:\ole.doc');
myWinWordApp.Selection.Find.Text := 'oo';
myWinWordApp.selection.Find.Replacement.Text := 'aa';
myWinWordApp.Selection.Find.Execute(Replace := 2);
любая помощь очень ценится. Заранее спасибо
Это не код Delphi ... Во всяком случае, я попытался бы установить представление в режим заголовка/нижнего колонтитула, возможно, выполнив что-то вроде «ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader», как показано [здесь] (здесь) http://www.your-save-time-and-improve-quality-technologies-online-resource.com/vba-word-footer-and-header.html) –
@Andreas Это код Delphi. Это поздний связанный именованный параметр. –
@ Давид: Да, вы правы. Я должен прочитать варианты ... (Немного смущен!) –