Главная страница
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.025 c
1-1108043173
Phoenix
2005-02-10 16:46
2005.02.27
Создание инсталяшки на InstallShield Professional 6.2


1-1108103496
TPlus
2005-02-11 09:31
2005.02.27
VarArrayToMemoryStream


1-1108354381
CSC
2005-02-14 07:13
2005.02.27
Совместный доступ к нетипизированному файлу


3-1106807299
Behemoth
2005-01-27 09:28
2005.02.27
Ошибка при удалении задания в MSSQL


1-1108368591
Koshak
2005-02-14 11:09
2005.02.27
Стрелки