自己对DELPHI学习的一点体会

				Delphi中RichEdit获得得知当前行号 (2000年8月9日) 
				
				本站更新  分类:   作者:srw  推荐:   阅读次数:530  
				(http://www.codesky.net)  
				
				--------------------------------------------------------------------------------
				
				用RichEdit（或者memo）控件制作文本编辑器时，通过访问lines count属性可以得到总行
				数，但是若想知道光标当前所在行的行号就麻烦了，因为delphi没有提供这个属性。要实
				现这个编辑器必备功能，就须调用em_LineFromChar。请试试下面的程序。
				先在窗口中布置一个RichEdit或者memo（命名为editor），以及一个button。在button的onclick
				事件中写入下列代码。
				var
				CurrentLine:Integer;
				begin
				CurrentLine:=Editor