Свойство CountOfLines

Возвращает значение типа Long, содержащее число строк программы в программном модуле. Только для чтения.