Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.27;
Скачать: CL | DM;

Вниз

Word   Найти похожие ветки 

 
Niko4543   (2004-05-11 09:52) [0]

Привет всем.
У меня на форме лежит OleContainer в него загружен вордовский файл с 56 листами.
Вопрос: Как мне можно сделать чтобы по нажатию на кнопке в OleContainer`e  показывалась следующая страница(страница показывалясь случайным образом)??????
Заранее спасибо


 
Niko4543   (2004-05-13 14:17) [1]

Привет всем.
Да ответьте пожайлуста неполучается ничего.
Делаю так:

procedure TForm1.Button2Click(Sender: TObject);
var
 Whatr: OLEVariant;
 Which: OLEVariant;
 Count: OLEVariant;
 Name: OLEVariant;
begin
Whatr:=wdGoToPage;
Which:=wdGoToNext;
Count:=unAssigned;
Name:="3";
WordApplication1.Selection.GoTo_(Whatr, Which, Count, Name);
WordApplication1.Selection.Find.ClearFormatting;
  // With WordApplication1.Selection. Find.
    //   .Text = "";
   //    .Replacement.Text = "";
   //    .Forward = True;
   //    .Wrap = wdFindContinue;
   //    .Format = False;
   //    .MatchCase = False;
   //    .MatchWholeWord = False;
   //    .MatchWildcards = False;
   //    .MatchSoundsLike = False;
   //    .MatchAllWordForms = False;
end;


Заранее спасибо всем.



Страницы: 1 вся ветка

Текущий архив: 2005.02.27;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.032 c
1-1108019965
Артем К.
2005-02-10 10:19
2005.02.27
Стоит ли использовать DoubleBuffered?


14-1107856563
Vaitek
2005-02-08 12:56
2005.02.27
NTFS сжатые файлы/папки


1-1108414574
Kubic
2005-02-14 23:56
2005.02.27
срочно нужен компанент


14-1108014164
syte_ser78
2005-02-10 08:42
2005.02.27
Ошибка при устнаовке Win98


1-1108030234
Zhenja
2005-02-10 13:10
2005.02.27
QReport. Печать. Помогите пожалуйста.