Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 06.10.2008, 10:28   #1
Hypermaster
Пользователь
 
Аватар для Hypermaster
 
Регистрация: 19.04.2008
Сообщений: 13
По умолчанию Создание гиперссылок в Word

Здравствуйте, пытаюсь приручить word через Delphi
Как можно(или это вообще невозможно) сделать выделенный текст в word гиперссылкой?
Узер выделяет текст, нажимает кнопку в моем приложении, у него запрашивается куды ссылаться и ОК!
w := CreateOleObject('Word.Application') ;
w.Documents.open(FileName:=TempS);
w.Visible := true;
...
Hypermaster вне форума Ответить с цитированием
Старый 06.10.2008, 11:39   #2
Hypermaster
Пользователь
 
Аватар для Hypermaster
 
Регистрация: 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);
Hypermaster вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Создание выпадающих списков в 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