powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Replace OLE Word
4 сообщений из 4, страница 1 из 1
Replace OLE Word
    #32931120
zuzu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
собственно вопрос, как перевести следующий скрипт VB на PowerBuilder
constant integer wdReplaceAll = 2
// VB code Selection.Find.Execute Replace:=wdReplaceAll
так оно не работает
lole_word.Selection.Find.Execute(Replace:=wdReplaceAll)
...
Рейтинг: 0 / 0
Replace OLE Word
    #32931212
Фотография 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
Replace OLE Word
    #32931441
zuzu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
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
Replace OLE Word
    #32960474
zuzu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
может кто знает как менять текст в текстбоксах?

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


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