Автор | Сообщение |
|
| постоянный участник
|
Пост N: 2434
Зарегистрирован: 12.09.06
|
|
Отправлено: 27.11.12 20:07. Заголовок: Как вывести окно Word на передний план?
Проблема появилась на Word2010. До этого все нормально показывалось и сейчас показывает. Вот мой код: oWord := TOleAuto():New( "Word.Application" ) oDocs := oWord:Documents oDocs:Open( cFileDoc ) oActive := oWord:ActiveDocument oSelect := oWord:Selection oMarks := oActive:BookMarks oWord:Visible := .T. oWord:WindowState := 1 // Maximize oSelect:HomeKey(6) Что нужно сделать еще для Word2010 ?
|
|
|
Ответов - 24
, стр:
1
2
All
[только новые]
|
|
|
| |
Пост N: 167
Зарегистрирован: 17.06.10
|
|
Отправлено: 02.03.13 23:16. Заголовок: A видимость для word..
A видимость для word'a, перед загрузкой файла, случаем не фалсе ? oWrd:Visible:= .F.
|
|
|
|
| постоянный участник
|
Пост N: 2722
Зарегистрирован: 12.09.06
|
|
Отправлено: 03.03.13 08:24. Заголовок: fil пишет: A видимо..
fil пишет: цитата: | A видимость для word'a, перед загрузкой файла, случаем не фалсе ? |
| Нет ! В самом начале темы я привел свой код, синеньким цветом... oWord:Visible := .T. Может там что добавить нужно ? И еще сделал добавление в функцию: HB_FUNC( MAXIMIZE ) { ShowWindow( (HWND) hb_parnl(1), SW_RESTORE ); ShowWindow( (HWND) hb_parnl(1), SW_MAXIMIZE ); }
|
|
|
|
| |
Пост N: 168
Зарегистрирован: 17.06.10
|
|
Отправлено: 03.03.13 10:35. Заголовок: Синенький текст я ви..
Синенький текст я видел. Там oWord:Visible := .T. устанавливается после открытия файла, а желательно перед. Возможно стоит сначала вывести Word на экран, а потом открывать файл
|
|
|
|
| постоянный участник
|
Пост N: 2723
Зарегистрирован: 12.09.06
|
|
Отправлено: 03.03.13 13:40. Заголовок: Т.е. ставлю сразу за..
Т.е. ставлю сразу за oWord := TOleAuto():New( "Word.Application" ) ?
|
|
|
Ответов - 24
, стр:
1
2
All
[только новые]
|
|