🚀 go-pugleaf

"Sky" <akeehuang@163.net> wrote in message
news:3e919b72$1@newsgroups.borland.com...

>     if (!ActiveControl->ClassNameIs("TEdit")) return;
>
>     TEdit *edit = dynamic_cast<TEdit *>(ActiveControl);

Since you're doing the dynamic_cast anyway, then the call to ClassNameIs()
is redundant and aonly adds extra runtime overhead.  Do this instead:

    void __fastcall TMainForm::Input_Symbol(AnsiString szSymbol)
    {
        TEdit *edit = dynamic_cast<TEdit *>(ActiveControl);
        if( !edit ) return;

>         int t = edit->SelStart;
>         AnsiString szText = edit->Text;
>         szText.Insert(szSymbol, t + 1);
>         edit->Text = szText;
>         edit->SelStart = t + szSymbol.Length();

You could use just the SelStart, SelLength, and SelText properties to
simplify that, then you don't need the temporary AnsiString at all:

    int t = edit->SelStart;
    edit->SelLength = 0;
    edit->SelText = szSymbol;
    edit->SelStart = t + szSymbol.Length();

When SelLength is 0, SelText inserts the new text into the edit control at
the position where SelStart is.


Gambit