你也study吗?

解决方案 »

  1.   

    看demo中的一个实例程序,具体好象忘了,但记得那里有
      

  2.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      ss:TPoint;
    begin
      ss.X :=1;
      ss.Y:=3;
      memo1.SetFocus;
      memo1.CaretPos:=ss;
    end;
      

  3.   

    我的网站上有一控件SMEMO有此能力!
      

  4.   

    那怎么让滚动条一起跟着走?我的意思是,按照上面的方法Memo的光标移动了,但是如果光标移动到超过Memo的显示区域的时候,我就看不到光标了,如何设置才能让滚动条一起跟着走呢?