Такое можно попытаться реализовать на RichEdit. Эзай пример ElementsDelphiExampleRichEdit.sha, там все понятно написано