我想在edit中光标的当前位置插入一个字符串，并把光标放到该字符串后，代码如下（Source是个Edit控件)：

void __fastcall TForm1::Fun_absClick(TObject *Sender)
{   
     Source->SetFocus();
     AnsiString temp=Source->Text;
     Source->Text=temp.Insert(dynamic_cast<TBitBtn*>(Sender)->Caption,Source->SelStart);
     Source->SelStart+=dynamic_cast<TBitBtn*>(Sender)->Caption.Length();
}

可是每次执行完后光标都不动，而且插入的位置也不对。
大侠帮帮忙!