关于MEMO编辑框中用运算符编辑的问题

Question

我现在做自定义函数的功能，现在设了加、减、乘、除四个运算符按钮。我想实现的功能就是在
光标所在处插入运算符
例如：在memo现在有两个公式，如下公式A公式B
我把光标移到公式A后，然后点击加运算符，编辑框中出现的效果为
公式A+公式B
请各位大侠提供思路应如何实现，本人先在此谢谢了

Answer 1

var pos:integer;
begin
  with Memo1 do
    begin
      pos:=SelStart;
      Text:=Copy(Text,0,pos)+'+'+Copy(Text,pos+1,length(Text)-pos);
    end;
end;

Answer 2

呵呵，感谢liangqingzhi(老之) ，已实现，非常感谢