powered by simpleCommunicator - 2.0.41     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Вывод переменных из VFP9 в Word 2016
6 сообщений из 6, страница 1 из 1
Вывод переменных из VFP9 в Word 2016
    #40029155
p672
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Удалось сделать вывод значений из VFP9 на лист Word 2016 в поля (элемент управления формы) в соответствии с значениями закладок (абв, где)
Вот текст программы:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
*Создаем новый документ MS WORD на базе ранее созданного шаблона
LOCAL loWord, loDoc
loWord = CREATEOBJECT( 'WORD.APPLICATION')
loDoc=m.loWord.Documents.Add('c:\DOG_VSTAV\'+'dg.docx')

*Подставляем необходимые значения в поля

m.loDoc.FormFields("абв").Result="Федор"
m.loDoc.FormFields("где").Result="Иван"

*Делаем созданный документ видимым
m.loWord.Visible = .T.


Всё работает правильно..
Проблема: значения выводятся на лист правильно, но вокруг этих выведенных значений серый фон.
Документ в будущем планируется использовать как чистовик, как избавится от серого фона?
Искал настройки типа background color чтобы выставить белый цвет фона, не нашёл.
Помогите пожалуйста!

Либо подскажите другой элемент управления взамен поле (элемент управления формы)
...
Рейтинг: 0 / 0
Вывод переменных из VFP9 в Word 2016
    #40029180
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Это, скорее всего, Вы так настроили фон полей ввода. Можно поискать в Word, где он меняется, а можно просто удалить поля ввода после их заполнения примерно такой командой

Код: sql
1.
m.loDoc.Fields.unlink()



Эту команду надо дать в конце. Когда все поля будут заполнены. После этого сами поля будут удалены, но введенный в них текст останется
...
Рейтинг: 0 / 0
Вывод переменных из VFP9 в Word 2016
    #40029188
p672
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ВладимирМ,

Спасибо!
Попробовал, подтверждаю - команда помогла - серый фон под заменёнными элементами пропал!
Принял к сведению!
...
Рейтинг: 0 / 0
Вывод переменных из VFP9 в Word 2016
    #40042138
p672
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
После вывода в WORD 2016 из VFP 9 SP2
окно WORD 2016 с готовым документом появляется ПОЗАДИ окон VFP 9 SP2
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
if v_upro=.f.
erase c:\dog\d1.docx
copy file c:\dog\d.docx to c:\dog\d1.docx
local a, b
a=createobject('word.application')
b=m.a.documents.add('c:\dog\d1.docx')
m.b.formfields("w_tel").result=v_tel
m.b.formfields("w_sa").result=v_sa
m.b.fields.unlink()

наверно нужно что-то сюда добавить

m.a.visible=.t.
endif



Нужно добавить в программу строку задания свойства типа windowstate для окна WORD 2016 - чтобы оно появлялось ВПЕРЕДИ окон программы VFP 9 SP2

что-то типа:
m.a.activate=.t.
m.a.windowstate= ? какое число - не знаю

-Подскажите пожалуйста! заранее благодарен!
...
Рейтинг: 0 / 0
Вывод переменных из VFP9 в Word 2016
    #40043451
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если "в общем случае", то сюда

Как вывести приложение на передний план

Про Word там в самом конце.

А если нужен частный вариант, то можно так

авторОднако в отношении Word или Excel есть специфический способ активизации, основанный на том, что разворачивание этого окна на максимум из свернутого (минимизированного) состояния автоматически приводит к его активизации.

Приложение Word

* Выводится экземпляр приложения Word на передний план
#DEFINE wdWindowStateMinimize 2
#DEFINE wdWindowStateMaximize 1

loWord.WindowState = wdWindowStateMinimize && Сворачиваем окно
loWord.WindowState = wdWindowStateMaximize && Разворачиваем окно, что приводит к его активизации
...
Рейтинг: 0 / 0
Вывод переменных из VFP9 в Word 2016
    #40043481
p672
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ясно, спасибо.
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Вывод переменных из VFP9 в Word 2016
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]