Line count in text field

Hello.

I have multiline text field on form. I want to show to the user how many lines he entered into this field. Is it possible?

I tried to place simple text field with multiline option on, and also tried to place textdocument, but the problem is that the content of the field is updated only when the text control leaves focus.

May be this script helps you:

&AtClient
Procedure OnOpen(Cancel)
   AttachIdleHandler("UpdateInformation", 0.2);
EndProcedure

&AtClient
Procedure UpdateInformation()
   TextInField = Items.TextField.EditText
   // and blah blah blah......
EndProcedure

Hello. Thank you for this script, but it doens't work well. When I try to put lines count on the form from the idle handler like

LineCount = StrLineCount(TextInField); 

 
LineCount = StrLineCount(TextInField);
TextField = TextInField;

Try to change property "EditTextUpdate" of TextField. Or use DataProcessor in path.