Есть компонент, хелпа по нему не могу найти , может кто-нить подскажет ???

На VB это делается вроде так:

Код

Selection.Sections(1).Footers(1).PageNumbers.Add PageNumberAlignment:= _        wdAlignPageNumberRight, FirstPage:=True

(нумерация в правом нижнем углу)

компонента TWordApplication имеет аналогичные свойства

Нету таких свойств ...
Selection.Sections(1).

Цитата(Marriage @ 28.10.2004, 13:02)

Есть компонент, хелпа по нему не могу найти , может кто-нить подскажет ???

Смотрите в таких случаях объектую модель требуемого приложения MS Office. Ее можно найти в справках к этим офисным приожением.

Все .. Разобрался сам методом тыка ...


WordApp.ActiveWindow.ActivePane.View.SeekView := wdSeekCurrentPageHeader;
WordApp.Selection.Font.Size := 10;
WordApp.Selection.TypeText('ñòð ');
WordApp.Selection.Fields.Add(WordApp.Selection.Range, Type_,EmptyParam,EmptyParam);
WordApp.Selection.TypeText(' èç ');
WordApp.Selection.Fields.Add(WordApp.Selection.Range, Type1_,EmptyParam,EmptyParam);
WordApp.Selection.ParagraphFormat.Alignment := wdAlignParagraphRight;
WordApp.ActiveWindow.ActivePane.View.SeekView := wdSeekMainDocument;
WordApp.ActiveDocument.PrintPreview;
WordApp.ActiveWindow.ActivePane.View.Zoom.Percentage := 100;