escribir un texto justo donde esté el cursos en un memo
 

tengo un editor de textos, y quiero por ejemplo que haya un botón tal que al pulsarlo, escriba la fecha actual justos donde esté situado el cursos de escribir.
he estado buscando por todos lados pero lo único que encuentro es la inserción en una nueva línea. sé que tengo que usar la propiedad selstart, que me indica el index de justo donde tengo el cursor, pero no sé como insertar el texto.

Memo1.SelText := DateToStr(Now());

// Saludos