On-line: гостей 2. Всего: 2 [подробнее..]
АвторСообщение
постоянный участник




Пост 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 ?

Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 24 , стр: 1 2 All [только новые]





Пост N: 167
Зарегистрирован: 17.06.10
ссылка на сообщение  Отправлено: 02.03.13 23:16. Заголовок: A видимость для word..


A видимость для word'a, перед загрузкой файла, случаем не фалсе ?

oWrd:Visible:= .F.

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост 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 );
}

Спасибо: 0 
ПрофильЦитата Ответить



Пост N: 168
Зарегистрирован: 17.06.10
ссылка на сообщение  Отправлено: 03.03.13 10:35. Заголовок: Синенький текст я ви..


Синенький текст я видел. Там oWord:Visible := .T. устанавливается после открытия файла, а желательно перед. Возможно стоит сначала вывести Word на экран, а потом открывать файл


Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 2723
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 03.03.13 13:40. Заголовок: Т.е. ставлю сразу за..


Т.е. ставлю сразу за oWord := TOleAuto():New( "Word.Application" ) ?

Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 24 , стр: 1 2 All [только новые]
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 43
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет