L lemondu Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-17 #1 目的：当光标位置不在richedit的可视范围内的时候自动卷滚到当前行。
Y YFeral Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-17 #2 aPoint: TPoint; begin GetCursorPos(aPoint); //aPoint中即为屏幕位置。 end;
影 影 子 Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-17 #3 光标还是鼠标？ 光标位置如下： richedit1.CaretPos.X(Y)
影 影 子 Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-17 #4 类似这个，改一下就行了。 http://www.delphibbs.com/delphibbs/dispq.asp?lid=1502621
J jsxjd Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-17 #6 使 RichEdit 当前行可见: richedit1.Perform(EM_SCROLLCARET ,0,0); richedit1.setfocus;
Y YFeral Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-17 #7 我想你无非是这种情况： 当当前控件不是richEdit时，让richedit的行为当前行。 if (ActiveControl as TRichEdit) = richedit{你的richEdit的名} then begin //加入选中第一行的代码。 end;
我想你无非是这种情况： 当当前控件不是richEdit时，让richedit的行为当前行。 if (ActiveControl as TRichEdit) = richedit{你的richEdit的名} then begin //加入选中第一行的代码。 end;
