Здравствуйте! Я пишу текстовый редактор в делфи и не знаю как найти количество страниц текста в ричэдите(или мемо) и номер текущей страницы, где расположен курсор, к примеру. Там вроде как надо находить длину текста, находяшийся в мемо, в пикселях и делить на размер листа А4 в пикселях, это чтобы узнать кол-во страниц. А как найти номер текущей страницы я вобще не знаю.
Вот так я написал, но это не работает в процедуре таймера.
size:=Canvas.Texthight(MEmo1.Text)div 50;
statusBar1.Panels[5].text:='Стр '+ floattostr(size);
Подскажите, пожалуйста, заранее благодарен! И если можно поподробней.