Функция ATLINE()

Возвращает номер строки с первым вхождением символьного выражения или memo-поля в другое символьное выражение или memo-поле, считая от первой строки.

Синтаксис:

ATLINE(cSearchExpression, cExpressionSearched)

Параметры:
cSearchExpression
Задает символьное выражение, которое Visual FoxPro ищет в выражении cExpressionSearched.
cExpressionSearched
Задает символьное выражение, просматриваемое в поисках cSearchExpression.
В качестве cSearchExpression и cExpressionSearched могут фигурировать memo-поля любых размеров.
Чтобы получить всю символьную строку, содержащую найденное символьное выражение, используйте функцию MLINE( ).
Совет Функция ATLINE( ) предлагает удобный способ просмотра memo-полей.

Результат:
Числовой

Комментарии:
Функция ATLINE( ) просматривает второе символьное выражение в поисках первого символьного выражения. При этом принимается во внимание регистр символов этих выражений (то есть прописные или строчные). Для поиска без учета регистра используйте функцию ATCLINE( ).
Если поиск завершается успешно, функция ATLINE( ) возвращает номер строки, в которой найдено выражение. Если поиск не приводит к успеху, ATLINE( ) возвращает 0.
Номер строки, возвращаемый функцией ATLINE( ), определяется установкой SET MEMOWIDTH, даже если cExpressionSearched не является memo-полем. Подробнее об этом см. SET MEMOWIDTH.

Пример:

* В Примере 1 ищется первое вхождение символьной строки в memo-поле, а
* затем на экран выводятся имя и фамилия служащего и строка с memo
*-полем для этой записи.
* В Примере 2 демонстрируется, как ширина memo-поля влияет на ATLINE( ).
* Example 1
CLOSE DATABASES
OPEN DATABASE (HOME( ) + 'samples\data\testdata')
USE employee	&& Open employee table

CLEAR
STORE 'Japanese' TO gcFindString	&& Case sensitive
LOCATE FOR ATLINE(gcFindString, notes) != 0
? First_Name
?? Last_Name
? MLINE(notes, ATLINE(gcFindString, notes))

* Example 2
STORE '1234567890ABCDEFGHIJ' TO gcString
SET MEMOWIDTH TO 20
? ATLINE('AB', gcString)	&& Displays 1
SET MEMOWIDTH TO 10
? ATLINE('AB', gcString)	&& Displays 2

Предыдущий Шаг | Следующий Шаг | Оглавление
Автор Каев Артем - 23.11.2002