|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
06.10.2008, 10:28 | #1 |
Пользователь
Регистрация: 19.04.2008
Сообщений: 13
|
Создание гиперссылок в Word
Здравствуйте, пытаюсь приручить word через Delphi
Как можно(или это вообще невозможно) сделать выделенный текст в word гиперссылкой? Узер выделяет текст, нажимает кнопку в моем приложении, у него запрашивается куды ссылаться и ОК! w := CreateOleObject('Word.Application') ; w.Documents.open(FileName:=TempS); w.Visible := true; ... |
06.10.2008, 11:39 | #2 |
Пользователь
Регистрация: 19.04.2008
Сообщений: 13
|
Сам нашел ответ - если кому-то надо:
...var w,q:OleVariant; begin ... w := CreateOleObject('Word.Application') ; w.Documents.open(FileName:=TempS); q:=w.ActiveDocument.Range(w.Selecti on.Start,w.Selection.End); Link := 'Какой-нибудь.doc'; q.Hyperlinks.Add(q,'', Link ,EmptyParam,EmptyParam); |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Создание выпадающих списков в Word | Dux | Microsoft Office Word | 12 | 25.08.2008 09:50 |
MS Word | Witaliy | Общие вопросы Delphi | 6 | 27.04.2008 20:53 |
Ms Word | Farel | Общие вопросы Delphi | 0 | 12.01.2008 16:48 |
удаление гиперссылок | Gambler | Microsoft Office Word | 0 | 30.10.2006 23:23 |