Функция NextNumStr Назад В начало Вперед

Назначение

Функция увеличивает на 1 числовое значение, представленное строкой str: из строки выбрасываются все нечисловые символы, инкрементируется оставшееся число, затем все нечисловые символы возвращаются на место.

Если инкремент сделать не удается (не хватает длины поля), то возвращается строка, заполненная нулями по всей длине поля.

Функция получает аргумент как var-параметр, меняет его и возвращает значение.

Для улучшения читаемости кода и для обеспечения совместимости с возможными изменениями функции в будущем рекомендуется использовать обращение вида:

str := NextNumStr(str)

Описание

function NextNumStr(var str : string) : string;

Параметры

str - обрабатываемая строка с номером.

Возвращаемое значение

Функция возвращает модифицированную строку.

Смотрите также

PrevNumStr

Примеры

Пример 1

NextNumStr ('Скл750#12.01.99.') = 'Скл750#12.02.00.'

Функция выделит число 750120199 и добавит к нему 1. После модификации строка будет выглядеть следующим образом: 'Скл750#12.02.00.'

Пример 2

NextNumStr ('999')='000'