Есть ли здесь любители FoxPro?

← →
}|{yk © (2004-08-31 15:25) [0]

Что значит эта функция?
FUNCTION fuNtelef M.isTr = CHRTRAN(STR((ASC(SUBSTR(baZa.teLef, 1, 1))*256+ASC(SUBSTR(baZa.teLef,; 2, 1)))*256+ASC(SUBSTR(baZa.teLef, 3, 1)), 7), " ", "0") IF LEFT(M.isTr, 1)=="0" M.isTr = " "+RIGHT(M.isTr, 6) ENDIF RETURN SUBSTR(M.isTr, 1, 3)+"-"+SUBSTR(M.isTr, 4, 2)+"-"+SUBSTR(M.isTr, 6, 2)

← →
KSergey © (2004-08-31 15:36) [1]

CHRTRAN( ) Function

Replaces each character in a character expression that matches a character in a second character expression with the corresponding character in a third character
expression.

Syntax

CHRTRAN(<expC1>, <expC2>, <expC3>)

Returns

Character

Remarks

CHRTRAN( ) translates the character expression <expC1> using the translation
expressions <expC2> and <expC3>.

Parameters

<expC1>, <expC2>, <expC3>

If a character from <expC1> is found in <expC2>, the character in <expC1> is replaced
by the character from <expC3> that"s in the same position in <expC3> as is the
character in <expC2>.
If <expC3> has fewer characters than <expC2>, the additional characters in <expC2>
are translated to null characters. If <expC3> has more characters than <expC2>, the
additional characters are ignored.

SUBSTR - выделене подстроки (строка, с_какой_позиции[, сколько])

ASC - ASCII код первого символа строки

STR - преобразует число в строку (строковое представление) (число[, общая_длина_результата[, кол-во_десятичных_разрядов]])

А дальше сам прорывайся ;)

← →
NickBat © (2004-08-31 17:26) [2]

CHRTRAN( ) Function
Функция позволяет заменять строку посимвольно с использованием шаблона. Например

CHRTRAN("мама","муа","пке")
вернет строку "пепе".

Перекодировка по таблице пользователя

Есть ли здесь любители FoxPro? Найти похожие ветки