Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Replace OLE Word / 4 сообщений из 4, страница 1 из 1
24.02.2005, 13:28
    #32931120
zuzu
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Replace OLE Word
собственно вопрос, как перевести следующий скрипт VB на PowerBuilder
constant integer wdReplaceAll = 2
// VB code Selection.Find.Execute Replace:=wdReplaceAll
так оно не работает
lole_word.Selection.Find.Execute(Replace:=wdReplaceAll)
...
Рейтинг: 0 / 0
24.02.2005, 14:04
    #32931212
PL99
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Replace OLE Word
Я бы вызывал функцию со всеми параметрами
Код: plaintext
1.
2.
3.
4.
5.
Execute(FindText, MatchCase, MatchWholeWord, MatchWildcards, &
MatchSoundsLike, MatchAllWordForms, Forward, Wrap, Format, & 
ReplaceWith, Replace, MatchKashida, MatchDiacritics, MatchAlefHamza, & 
MatchControl)

wdReplaceAll =  2 
...
Рейтинг: 0 / 0
24.02.2005, 15:09
    #32931441
zuzu
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Replace OLE Word
PL99Я бы вызывал функцию со всеми параметрами
Код: plaintext
1.
2.
3.
4.
5.
Execute(FindText, MatchCase, MatchWholeWord, MatchWildcards, &
MatchSoundsLike, MatchAllWordForms, Forward, Wrap, Format, & 
ReplaceWith, Replace, MatchKashida, MatchDiacritics, MatchAlefHamza, & 
MatchControl)

wdReplaceAll =  2 

Спасибо, то что надо.
...
Рейтинг: 0 / 0
15.03.2005, 12:12
    #32960474
zuzu
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Replace OLE Word
может кто знает как менять текст в текстбоксах?

iole_word.Selection.Find.Execute(as_text, false, false, false, false, false, true, wdFindContinue, false, as_newtext, wdReplaceAll, false, false, false, false)

пробовал ставить везде true но никакого эффекта.

когда тоже самое делаю через макрос то работает а через оле не хочет
...
Рейтинг: 0 / 0
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Replace OLE Word / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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