| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как вставить кнопку в MS Word и обработать нажитие на нее? [D6, WinXP]
maxinfosoft © (2002-10-05 15:46:00)Как вставить кнопку в MS Word и обработать нажитие на нее? Киньте пожалуйста ссылку или примерчик.
Также очень хочется знать, как в этом случае получить выделенный текст в Word.
brestmarket (2002-10-05 20:43:00) [1]Я это отлично знаю и он здесь совсем не к месту!
alxx (2002-10-05 19:00:00) [2]Э-э, парень, ты знаешь че такое СОМ-сервер и сервер автоматизации?
maxinfosoft (2002-10-05 18:54:00) [3]Э-э, не... Надо наоборот запустить мое приложение из Word"a по нажатию на кнопку.
alxx (2002-10-05 18:14:00) [4]Надо написать COM-сервер и вызывать из VB функции из него - вот и получится - своя программа контролирует нажатия в Word.
maxinfosoft (2002-10-05 17:58:00) [5]С выделенным текстом разобрались, а как быть с обработкой нажатия на кнопку в Ворде своей программой?
alxx (2002-10-05 16:58:00) [6]Если речь идет о программе Delphi, то нужно создать COM-сервер и вызывать его так, например:
Например так:
Set DOB = CreateObject("SomeComServer.SomObject")
Dim ST As String
Dim ISS As InlineShape
If ActiveWindow.Selection.Type = wdSelectionInlineShape Then
CC = ActiveWindow.Selection.Range.InlineShapes.Count
ST = ActiveWindow.Selection.Range.InlineShapes.Item(CC).AlternativeText
DOB.Edit (ST)
Else
ST = "" " ActiveWindow.Selection.Text
DOB.SomeFunction (ST)
End If
maxinfosoft (2002-10-05 16:49:00) [7]Спасибо за ответ.
Мне это известно. Хотелось бы как-раз этот скрипт, т.е. пример.
Говорят на delphimagazine была целая статья об этом - не нашел.
Помогите, давно бьюсь - не выходит.
alxx (2002-10-05 16:33:00) [8]Надо создать шаблон .dot и кинуть ее в директорию Office\Startup
А в шаблоне добавить кнопку и обработать нажатие на VB.
| |
