powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / найти слово в текст
8 сообщений из 8, страница 1 из 1
найти слово в текст
    #38827180
fatimaaaa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
я хочу найти слово в текст
Когда слово найдено, оно будет хайлайт
что надо делать?
...
Рейтинг: 0 / 0
найти слово в текст
    #38827421
Penner
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
x='abc'
y='123abc456'
if x$y
...
else
...
endif
...
Рейтинг: 0 / 0
найти слово в текст
    #38827422
Penner
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
x='abc'
y='123 abc 456'
for i=1 to getwordcount(y,' ')
if x=getwordnum(y,i,' '
...
endif
next
...
Рейтинг: 0 / 0
найти слово в текст
    #38827494
fatimaaaa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Penner,
если х не известно, что надо делать?
может быть х будет лубой буква или слова
...
Рейтинг: 0 / 0
найти слово в текст
    #38827614
alextashk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
fatimaaaa,

Да x может быть любым.
Есть еще at. Наверняка эта функция лучше Вам подойдет.
Так как Вам нужно еще и подсветить это слово.


В начале было Слово...
...
Рейтинг: 0 / 0
найти слово в текст
    #38827813
sg12
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
fatimaaaaPenner,
если х не известно, что надо делать?
может быть х будет лубой буква или слова

Для ввода слов используется объект TextBox, для отображения текста - EditBox.
*** Text1.Init
THISFORM.Edit1.VALUE = FILETOSTR('файл')
*** Text1.InteractiveChange
LOCAL lnPos
Thisform.Edit1.SelStart = 0
lnPos = AT(ALLTRIM(This.Value),Thisform.Edit1.Value)
IF lnPos = 0
RETURN
ENDIF
Thisform.Edit1.SelStart = lnPos - 1
Thisform.Edit1.SelLength = LEN(ALLTRIM(This.Value))
Thisform.Edit1.Refresh()
...
Рейтинг: 0 / 0
найти слово в текст
    #38833675
fatimaaaa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
alextashk,
Как я могу использовать функцию АТ()
...
Рейтинг: 0 / 0
найти слово в текст
    #38834236
alextashk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
fatimaaaa,


Только по прямому назначению.

Посмотри предыдущий совет, там все подробно разжовано.
Надо только текстбокс и едитбокс бросить на форму.
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / найти слово в текст
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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