Есть форма с расположенными на ней компонентами TMemo и TEdit, кнопки TSpeedButton (по нажатию на кнопку этого типа фокус ввода на неё не переносится). Требуется по нажатию на кнопку вставить произвольный текст в то место, где сейчас находится курсор (то есть не известно заранее в какой именно компонент и не обязательно в конец текста). Это позволяет сделать компонент TActionList (стандартный Action - TEditPaste), но из буфера обмена. А хотелось бы содержимое буфера обмена не портить, ибо не спортивно   .

тогда можно так:

Спасибо! Правда я не понимаю как это работает :(.

Классы TEdit, TMemo (а также TMaskEdit, TRichEdit) являются наследниками класса TCustomEdit. Т.е. любой из этих классов можно привести к TCustomEdit и работать с ними одинаково.
this->ActiveControl - это активный оконный компонент формы. Это какой либо класс (TEdit, TMemo, ...) приведённый в TWinControl.
dynamic_cast приводит TWinControl к TCustomEdit по особым правилам, и если приведение невозможно (на форме активен другой компонент, который не является наследником TCustomEdit, то (e == 0), и условие не выполняется.