Edit中如何插入字符串？

[lwbhero]

我想在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();
}

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

[qiuafa]

int pos = Source->SelStart
AnsiString temp=Source->Text;
temp.Insert(dynamic_cast<TBitBtn*>(Sender)->Caption,pos);
Source->SetFocus();
Source->Text=temp;
Source->SelStart=dynamic_cast<TBitBtn*>(Sender)->Caption.Length();

[hitbabiq]

setfocus()之后，selstart是0，其不是每次都插入到最前边的位置上了？