flint2 писал(а):
Если вы считаете, что это будет работатьА что не так-то? Алгоритм я объяснил. Проверим расчет по коду:
Pos := Length(str) - Count - Pos + 2;
Length(str) = 10 (1234567890);
Pos = 2;
Count = 5
По формуле получаем Pos = 10 - 5 - 2 + 2 = 5.
Позиция 5 это 5 из данных (отсчет идет от 1, а не от 0), копируем следующую строку -- 56789, 9 -- это второй символ с конца (отсчет тоже идет от 1, а не от 0). Нули стоят в компоненте для того, чтобы не перекрывать чтение входных данных данными из свойств. Отсчет строки всегда берется с 1-го символа и с начала, и с конца. Но вот что надо обязательно сделать, так это заменить эти нули на нужные значения.
Вопрос -- что не так?