Help як вивести в компонент label1 кількість рядків в memo1

Help як вивести в компонент label1 кількість рядків в memo1
Почесний громадянин Повідомлень 4,037 Подякували 1,211 раз (а) в 865 повідомленнях

Чи не найкращий варіант. Уявіть у нього там так 2 мегабайта тексту. Цей метод буде моторошно гальмувати, тому що ds між пхп і soulengine дані тягає за допомогою "урлов" якщо я не помиляюся. Плюс саме по собі створення масиву тільки для підрахунку кількості рядків вважають не раціональним використанням.
Ось це тваріант краще

$ Lines = 1 + c ( "memo1") -> perform (201. 0x7fffffff. 0);
// В $ Lines буде кількість рядків в тексті.

- У тебе бувають напади ліні?
- У мене бувають напади активності, лінь у мене постійно.