Tad, слушай, меня в твоем подходе не устраивает только то, что при такой постановке кода, Replace выдает RunTimeError. Это раз, второе: если стоит ITM_ADD, где Row := Control.Count -- его нет, и что это получится тогда, что Row при Add будет неопределен.

Единственное, что можно сделать, так это вот так


Но преимущества тут я никакго не вижу для режима Add, только для Insert-a и Replac-a
И не надо, чтобы Insert выполнял роль Add -- бред это. Сделать это можно, но не нужно

------------ Дoбавленo в 12.30:
Опередил с исправлениями. Да, можно и так сделать, как в 2.6 (а что это за номера, я не помню таких версий )